uses
System,
LCLIntf,
LCLType,
LMessages,
Classes,
Controls,
FakeActiveX,
SysUtils,
Math,
DB,
VirtualTrees;