traytest.dpr

来自「这是 Delphi 系统托盘 TrayIcon 控件的例子」· DPR 代码 · 共 14 行

program TrayTest;

uses
  Forms,
  TrayMain in 'TrayMain.pas' {Form1};

{$R *.res}

begin
  Application.Initialize;
  Application.CreateForm(TForm1, Form1);
  Application.Run;
end.