uses
System,
LCLType,
LCLIntf,
LMessages,
LCLProc,
Classes,
Controls,
Graphics,
ExtCtrls,
Forms,
StdCtrls,
kfunctions,
kcontrols;