> With ShowWindow(Application.Handle, SW_HIDE), I am unsure of where to put
> this in my code. It won't work inthe oncreate for the form but it
> does work
> in a button or something. Any suggestions where to put it?
Do the following in your project file eg myapp.dpr (I use a tray icon in the
following app)
  Application.Initialize;
  Application.HelpFile := 'myapp.hlp';
  Application.ShowMainForm := False;

> How do you go about adding popupmenu items to the system tray icon?
You should find the tray icon component has an onclick event and
onmousemove, so in my case I put Showmain in the onclick event handler which
is on your component properties events;
you can work out the code to suit but here is a cut and paste of mine:

procedure TPRForm.ShowMain;
begin
  audrec := false;
  RxTrayIcon1.Animated := false;
//Disable all timers to ensure Zapping and other msg processing is stopped
  RxTimer2.enabled := false;
  RXTimer3.Enabled := false;
//  Add conditional for OSH here as well!
//  PRForm.FormStyle := fsStayOnTop;
  PRForm.Visible := true;
  Panel1.Visible := true;
  PRForm.Show;
  PRForm.BringToFront;

---------------------------------------------------------------------------
    New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
                  Website: http://www.delphi.org.nz

Reply via email to