diskfree.dpr

来自「diskfree is tools for calculate free siz」· DPR 代码 · 共 24 行

program DiskFree;

uses
  Forms,
  Windows,
  DfMain in 'DfMain.pas' {MainForm},
  DfSetup in 'DfSetup.pas' {SetupForm},
  DfAbout in 'DfAbout.pas' {AboutBox},
  CoolTrayIcon in '..\CoolTrayIcon\CoolTrayIcon.pas';

{$R *.RES}
  
begin
  Application.ShowMainForm := False;
  ShowWindow(Application.Handle, SW_HIDE);

  Application.Initialize;
  Application.Title := 'Disk Free Monitor';
  Application.CreateForm(TMainForm, MainForm);
  Application.CreateForm(TSetupForm, SetupForm);
  Application.CreateForm(TAboutBox, AboutBox);
  Application.Run;
end.