Inherits from
TForm
procedure Button1Click(Sender: TObject);
procedure Exit1Click(Sender: TObject);
Show the application
procedure FormCreate(Sender: TObject);
Save the Startup up preference in the following INI file.
procedure HideDemo1Click(Sender: TObject);
Quit the application
procedure ShowDemo1Click(Sender: TObject);
Show the application
procedure StartInSystemTrayClick(Sender: TObject);
Close the appliation.
procedure TrayIconClick(Sender: TObject);
If the application should be shown normally, show it.
Button1 : TButton;
Exit1 : TMenuItem;
HideDemo1 : TMenuItem;
Label1 : TLabel;
Memo1 : TMemo;
N1 : TMenuItem;
PopupMenu1 : TPopupMenu;
ShowDemo1 : TMenuItem;
StartInSystemTray : TCheckBox;
TrayIcon : TPGTrayIcon95;
procedure Button1Click(Sender: TObject);
procedure Exit1Click(Sender: TObject);
Show the application
procedure FormCreate(Sender: TObject);
Save the Startup up preference in the following INI file. This will } { be used in the Forms OnCreate event when the application is restarted.
procedure HideDemo1Click(Sender: TObject);
Quit the application
procedure ShowDemo1Click(Sender: TObject);
Show the application
procedure StartInSystemTrayClick(Sender: TObject);
Close the appliation.
procedure TrayIconClick(Sender: TObject);
If the application should be shown normally, show it. If the application } { was supposed to start hidden, we don't have to do anything, since it } { was already hidden by the changes that were made to the Project Source.
Button1 : TButton;
Exit1 : TMenuItem;
HideDemo1 : TMenuItem;
Label1 : TLabel;
Memo1 : TMemo;
N1 : TMenuItem;
PopupMenu1 : TPopupMenu;
ShowDemo1 : TMenuItem;
StartInSystemTray : TCheckBox;
TrayIcon : TPGTrayIcon95;