Source position: xcms.pp line 224
function XcmsAllocColor(
para1: PDisplay;
para2: TColormap;
para3: PXcmsColor;
para4: TXcmsColorFormat
):TStatus;