TrayIcon und PopUp / Program unsichtbar machen

Biarchiv · Beiträge: 688

Hallo,

Wie kann man ein Fenster minimieren so das es unsichtbar wird. In der Taskleiste habe ich es schon entfernt. Der Sinn soll sein das das Program im hintergrund läuft und nur als TrayIcon ansteuern kann.

Wie kann ich es schaffen wenn ein ich mein Programm als TrayIcon anzeigen lasse. Ich habe es geschaft das mit der RechtenMaus mein PopUpMenu1 aufgeht. Allerdings geht es irrgendwo auf. Wie kann ich die Position steuern so das es neben dem Icon aufgeht?

Moderiert von Tino: Absätze entfernt.

Tweafis · Beiträge: 647 WinXP + fbsd Delphi 5 Prof

markieren

Delphi-Quelltext

1:	PopupMenu1.Popup(x,y);

Du brauchst eben die Koordinaten deines Trayicons.

Moderiert von Tino: Delphi-Tags hinzugefügt.

_________________
.: Es wird der Tag kommen, an dem wir es nicht mehr ändern können :.

Ehemaliges Mitglied Erhaltene Danke: 1

Dann gib ihm doch die richtige Antwort: GetCursorPos. Andererseits: nach TNA oder Tray suchen hätte mehr als genug Beispiele gebracht.

danielsun · Hält's aus hier Beiträge: 7

Biarchiv hat folgendes geschrieben:

...Ich habe es geschaft das mit der RechtenMaus mein PopUpMenu1 aufgeht. Allerdings geht es irrgendwo auf. Wie kann ich die Position steuern so das es neben dem Icon aufgeht?

Auch ich möchte ein Icon in die Systray legen und mit Application.Hint und einem PopUp zuweisen.
bis jetzt:

markieren

Quelltext

1:
2:
3:
4:
5:
6:
7:
8:
9:
10:

var
  NID : TNotifyIconData = (
    cbsize           : sizeof(TNotifyIconData);
    uID              : 0;
    uFlags           : NIF_MESSAGE or NIF_ICON or NIF_TIP;
    uCallbackMessage : WM_TRAYMSG;
    //szTip            : 'irgendein String';
    //szTip            : LStrCpy(NID.szTip,pchar(Application.Hint));

  );

Folgendes soll passieren:
Wenn die Maus über das Icon in der Systray fährt soll es genauso wie in der Taskleiste den Application.Hint anzeigen und bei einem rechten Mausklick ein Popup an der Stelle des Cursors aufklappen.

Kann ich dem szTip irgendwie den Hint zuweisen oder was wollte mir Matthias damit sagen LStrCpy(NID.szTip,pchar(Application.Hint));

Also in 2:50 Std ist bei mir Wochenennnnnnndeeeeeeeeeeeeeeeeeeeeeee!! :->

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme