uses
System,
LCLType,
LCLProc,
LMessages,
LCLIntf,
Types,
Classes,
Controls,
Graphics,
ExtCtrls,
Forms,
Math;