uses
System,
Classes,
LResources,
Forms,
Controls,
Graphics,
Dialogs,
BGRAVirtualScreen,
BGRABitmapTypes;