uses
System,
LCLIntf,
LCLType,
LMessages,
Messages,
SysUtils,
Classes,
Controls,
Graphics,
StdCtrls,
Math,
ClipBrd,
StCommon;