>> 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:
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!