uses
System,
LSForms,
LResources,
Classes,
Forms,
StdCtrls,
ExtCtrls,
LCLType,
LCLIntf,
Graphics,
Controls,
CustomTimer,
Clipbrd;