Source position: interfacebase.pp line 55
type TLCLWndMethod = procedure(
var TheMessage: TLMessage
) of object;