Context Navigation

UFormMain.pas

Last change on this file was 19, checked in by chronos, 12 years ago
Added: Test implementation of custom VCL classes adapted to be used with virtual OS.
File size: 419 bytes

Line
1	unit UFormMain;
2
3	interface
4
5	uses
6	Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics,
7	Vcl.Controls, Vcl.Forms, Vcl.Dialogs, Vcl.ExtCtrls;
8
9	type
10	TForm1 = class(Vcl.Forms.TForm)
11	Image1: TImage;
12	private
13	{ Private declarations }
14	public
15	published
16	property FormState;
17	end;
18
19	var
20	Form1: TForm1;
21
22	implementation
23
24	{$R *.dfm}
25
26	end.

Note: See TracBrowser for help on using the repository browser.