Thema: Delphi tray

Einzelnen Beitrag anzeigen

Benutzerbild von Andidreas
Andidreas

Registriert seit: 27. Okt 2005
1.110 Beiträge
 
Delphi 10.1 Berlin Enterprise
 
#11

Re: tray

  Alt 16. Aug 2006, 14:44
hey,

kann mich raveniv nur anschließen mit dem cooltrayicon...
oder du nimmst von denn jedis die komponente... weiß leider net wie se heißt *gg*

hier hast mal no bisl source code falls du sowas noch gesucht hast

Delphi-Quellcode:
//******************************************************************************
// Tray Handling *
//******************************************************************************

//With Start Programm in Tray
procedure TMain_Form.CoolTrayIcon1Startup(Sender: TObject; var ShowMainForm: Boolean);

begin

  ShowMainForm := False;

end;

//On Click on Tray Symbol / Show Form
procedure TMain_Form.CoolTrayIcon1Click(Sender: TObject);

begin

  CoolTrayIcon1.ShowMainForm;
  CoolTrayIcon1.IconVisible := False;

end;

//On Minimize Click / Programm in Tray / Taskbar Symbol Hide
procedure TMain_Form.ApplicationEvents1Minimize(Sender: TObject);

begin

  CoolTrayIcon1.IconVisible := True;
  ShowWindow(application.Handle, SW_HIDE);

end;

Zitat von Balu der Bär:
Und morgen erklärt euch der Bär wie man eine Banane von der Staude holt, in diesem Sinne gute Nacht.
das hätte ich aber gern in bildern wie du ne staude hochkletterst und bannaen holst... aber wenn dann scho mal oben bist bring mir dann bitte ein paar mit... ach ja und cocos nüsse wären au net schlecht
Ein Programmierer Programmiert durchschnittlich 15 Code Zeilen pro Tag
Wir sind hier doch nicht bei SAP!!!

Aber wir habens bald
  Mit Zitat antworten Zitat