1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
|
program MySQLSystemTrayMonitor;
{$R '..\..\..\res\windows\mysqlsystemtraymonitor.res' '..\..\..\res\windows\mysqlsystemtraymonitor.rc'}
uses
Instance,
gnugettext in '..\..\..\..\common\source\windows\gnugettext.pas',
Forms,
Main in 'Main.pas' {MainForm},
Pdh in 'Pdh.pas',
AuxFuncs in '..\..\..\..\common\source\windows\AuxFuncs.pas',
AdminService in 'AdminService.pas',
PNGImage in '..\..\..\..\common\source\windows\png\PNGImage.pas',
pnglang in '..\..\..\..\common\source\windows\png\pnglang.pas',
pngzlib in '..\..\..\..\common\source\windows\png\pngzlib.pas',
MySQLCommonFuncs in '..\..\..\..\common\source\windows\MySQLCommonFuncs.pas',
PNGTools in '..\..\..\..\common\source\windows\tools\PNGTools.pas';
{$R *.res}
begin
if not OtherInstanceIsRunning then
begin
Application.Initialize;
Application.ShowMainForm:=False;
Application.Title:='MySQL System Tray Monitor';
Application.CreateForm(TMainForm, MainForm);
Application.Run;
end;
end.
|
