Hint in der TNA

[Alexander]

nein ist keine Komponente, ist eine Funktion von mir. Ich wollte sie noch anhängen, dann habe ich es wohl vergessen

Delphi-Quellcode:

procedure TaskBarAddIcon;
var tnid : TNOTIFYICONDATA ;
begin
    tnid.cbSize := sizeof(TNOTIFYICONDATA);
    tnid.Wnd := Form1.handle;               
    tnid.uID := 1;                  
    tnid.uFlags := NIF_MESSAGE or NIF_ICON or NIF_TIP;
    tnid.uCallbackMessage := WM_TASKBAREVENT;        
    tnid.hIcon := form1.image2.picture.icon.handle;
    strcopy(tnid.szTip,'MailWatcher V 1.0'+#13+' e-Mails auf dem Server');                // Hint
    Shell_NotifyIcon(NIM_ADD, @tnid);
end;

Ich hoffe ihr könnt mir helfen