uses
System,
LCLType,
LCLIntf,
LMessages,
LCLProc,
LResources,
Classes,
Controls,
Forms,
Graphics,
kfunctions,
kcontrols,
Themes;