ViewVC Help
View File | Revision Log | Show Annotations | Download File | View Changeset | Root Listing
root/public/ibx/trunk/examples/isqlmonitor/RemoteMonitor.lpr
Revision: 33
Committed: Sat Jul 18 12:30:52 2015 UTC (8 years, 8 months ago) by tony
File size: 426 byte(s)
Log Message:
Committing updates for Release R1-3-1

File Contents

# Content
1 program RemoteMonitor;
2
3 {$mode objfpc}{$H+}
4
5 uses
6 {$IFDEF UNIX}{$IFDEF UseCThreads}
7 cthreads,
8 {$ENDIF}{$ENDIF}
9 Interfaces, // this includes the LCL widgetset
10 Forms, RemoteMonitorFormUnit
11 { you can add units after this };
12
13 {$R *.res}
14
15 begin
16 Application.Title := 'Remote Monitoring';
17 RequireDerivedFormResource := True;
18 Application.Initialize;
19 Application.CreateForm(TForm1, Form1);
20 Application.Run;
21 end.
22