Delphi控件源码

开发平台：

Delphi

TrayDraw.dpr：源码内容

							program TrayDraw;
uses
  Forms,
  CtDraw in 'CtDraw.pas' {DrawForm};
{$R *.RES}
begin
  Application.Initialize;
  Application.Title := 'CoolTrayIcon Drawing Demo';
  Application.CreateForm(TDrawForm, DrawForm);
  Application.Run;
end.

						