| Class TForm1 (unit Main) |
TForm
| Constructors |
| Functions |
procedure Button1Click(Sender: TObject);
procedure Exit1Click(Sender: TObject);
procedure FormCreate(Sender: TObject);
procedure HideDemo1Click(Sender: TObject);
procedure ShowDemo1Click(Sender: TObject);
procedure StartInSystemTrayClick(Sender: TObject);
procedure TrayIconClick(Sender: TObject);| Properties |
| Events |
| Variables |
Button1 : TButton;
Exit1 : TMenuItem;
HideDemo1 : TMenuItem;
Label1 : TLabel;
Memo1 : TMemo;
N1 : TMenuItem;
PopupMenu1 : TPopupMenu;
ShowDemo1 : TMenuItem;
StartInSystemTray : TCheckBox;
TrayIcon : TPGTrayIcon95;| Constructors |
| Functions |
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.
| Properties |
| Events |
| Variables |
Button1 : TButton;
Exit1 : TMenuItem;
HideDemo1 : TMenuItem;
Label1 : TLabel;
Memo1 : TMemo;
N1 : TMenuItem;
PopupMenu1 : TPopupMenu;
ShowDemo1 : TMenuItem;
StartInSystemTray : TCheckBox;
TrayIcon : TPGTrayIcon95;