uses
System,
LCLIntf,
LCLType,
LMessages,
Types,
StdCtrls,
Graphics,
classes,
Messages,
Controls,
DB,
DBCtrls,
cyHotLabel;