Tray-Icon

[faux]

Zum Thema public/private:

unterschied AND public AND private liefert:
http://www.delphipraxis.net/internal...public+private

Zum Thema TPoint:

TPoint liefert:

Delphi-Quellcode:

type TPoint = packed record
  X: Longint;
  Y: Longint;
end;

[Matze]

Zitat:

Zitat von Xenonz

Delphi-Quellcode:

PopupMenu1: TPopupMenu;
Item11: TMenuItem;                                    //in welchem Reiter sind diese Menüs?
Item21: TMenuItem;
Item31: TMenuItem;

Das sind die Items, des Popupmenüs, das auf Rechtsklick in der TNA angezeigt wird (über den OI hinzufügen)

Zitat:

Zitat von Xenonz

Delphi-Quellcode:

//was ist der Unterschied
//zw. Public und Private?

Wurde ja schon angesprochen. Private ist jedenfalls nur in der Unit selbst verfügbar, public auch in anderen (Aufruf über UnitX.Prozedur / UnitX.Funktion

Zitat:

Zitat von Xenonz

Delphi-Quellcode:

Point: TPoint;                                                 //was ist ein TPoint?

Wurde auch bereits angesprochen, es sind hier quasi, vereinfacht ausgedrückt 2 Variablen in einer verpackt:
Point.X und Point.Y (beides vom Typ integer)

Zitat:

Zitat von Xenonz

Delphi-Quellcode:

if Msg.Msg = WM_USER + 20 then                                //   <hä?>

Reagiert auf die Windows Nachricht, also, wenn auf das TNA-Icon geklickt wurde (bearbeitet werden hier der Klick mit der linken, mittleren und rechten Maustaste)

Zitat:

Zitat von Xenonz

Delphi-Quellcode:

  //Shell_NotifyIcon(NIM_ADD, @IconData); // fügt das Icon ein end;         //</hä?>

Steht schon im Kommentar vor deinem: Es wird das Icon in die TNA eingefügt