Source position: syntextdrawer.pp line 126
type TheExtTextOutProc = procedure(
X: Integer;
Y: Integer;
fuOptions: UINT;
const ARect: TRect;
Text: PChar;
Length: Integer
) of object;