source: branches/Xvcl/UFormMain.pas

Last change on this file was 19, checked in by chronos, 11 years ago
  • Added: Test implementation of custom VCL classes adapted to be used with virtual OS.
File size: 419 bytes
Line 
1unit UFormMain;
2
3interface
4
5uses
6 Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics,
7 Vcl.Controls, Vcl.Forms, Vcl.Dialogs, Vcl.ExtCtrls;
8
9type
10 TForm1 = class(Vcl.Forms.TForm)
11 Image1: TImage;
12 private
13 { Private declarations }
14 public
15 published
16 property FormState;
17 end;
18
19var
20 Form1: TForm1;
21
22implementation
23
24{$R *.dfm}
25
26end.
Note: See TracBrowser for help on using the repository browser.