Source position: xcms.pp line 199
type TXcmsScreenInitProc = function(
para1: PDisplay;
para2: LongInt;
para3: PXcmsPerScrnInfo
):TStatus;