if lWinControl.ClassName = 'TPairSplitter' then P := P;
Luiz _________________________________________________________________ To unsubscribe: mail [EMAIL PROTECTED] with "unsubscribe" as the Subject archives at http://www.lazarus.freepascal.org/mailarchives