TTrayIcon will nicht funktionieren

**Tyler**

>> TurboDelphi <<

Ahoi,

hab mir schon die Beispielanwendung bei Borland runtergeladen, und den NEwsbeitrag gelesen, und hier im Forum gesucht - aber nichts hilft mir wirklich weiter.

Ich hab also meine Form, und darauf ein Trayicon. TrayIcon.Visible ist TRUE, ein Bild wurde als Icon zugeordnet und OnCreate wird Application.Minimize der Prozeudre AppMInimize zugeordnet, die wie folgt aussieht:

zusammenfalten · markieren

Delphi-Quellcode:

			procedure Tf_main.AppDeActivate(Sender: TObject);

begin

  AlphaBlendValue := 175  ;

end;

procedure Tf_main.AppMinimize(Sender: TObject);

begin

  Application.Minimize;

  f_main.Hide;

end;

procedure Tf_main.AppActivate(Sender: TObject);

begin

  AlphaBlendValue := 255;

end;

procedure Tf_main.FormCreate(Sender: TObject);

var

  d: PChar;

  v: Pointer;

  l: DWord;

  cData: array [0..2048] of char;

  cExe: array [0..255] of char;

begin

  Application.OnDeactivate := AppDeActivate;

  Application.OnActivate := AppActivate;

  Application.OnMinimize := AppMinimize;

end;

(die anderne Procs rein informativ, könnte ja sein, dass die sich gegenseitig behindern.

Tja nun. Was passiert? Nix.

Muss ich noch irgendwo was einstellen,zuordnen oder wie auch immer?

Danke euch!

TTrayIcon will nicht funktionieren

TTrayIcon will nicht funktionieren

Forumregeln