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, 9 months ago) by tony
File size: 426 byte(s)
Log Message:
Committing updates for Release R1-3-1

File Contents

# User Rev Content
1 tony 31 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 tony 33 Application.Title := 'Remote Monitoring';
17 tony 31 RequireDerivedFormResource := True;
18     Application.Initialize;
19     Application.CreateForm(TForm1, Form1);
20     Application.Run;
21     end.
22