Ballon Fensatertitel ändern

[kmma]

Wie kann man bei einem Balloon Hin den Fenstertitel ändern? Application.title bringt leider nichts.
Anhang 56960

[himitsu]

Kommt erstmal drauf an, wie du den anzeigen lässt.

TCustomTrayIcon.BalloonTitle
TBalloonHint.Title aka TCustomHint.Title
...

[kmma]

Ich habe ein TTrayIcon auf meinem Formular und setze mit Trayicon1.BalloonHint := 'Hint'; den Hint und zeige den Balloon mit Trayicon1.ShowBalloonHint; an.

[himitsu]

der erste Link :zwinker:

[kmma]

Ich finde da aber nicht den Fenstertitel, nur den Balloon Titel.

Delphi-Quellcode:

  Trayicon1.BalloonHint := 'My Hint';
  TrayIcon1.BalloonTitle := 'MyTitle';

Anhang 56961

[himitsu]

hmm ... der Name der EXE oder die Caption der ActiveForm? (MainForm)

[kmma]

Wie ich ja schon im Ursprungsposting geschrieben habe bring application.title leider nichts (das klappt z.B. bei einer Messagebox).

[himitsu]

Bezüglich Application.Title mußt'e etwas aufpassen, siehe Text nachfolgent


Ein Problem bei Windows?

Vcl.ExtCtrls.pas
NOTIFYICONDATAW.szTip := Application.Title;
NOTIFYICONDATAW.szTip := Self.Hint;
szTip wird beim Laden der Form auf Application.Title gesetzt (z.B. den Wert aus der DPR und nicht zur Laufzeit änderbar)
szTip wird aber auch nochmal durch TrayIcon.Hint überschrieben, falls es in der DFM gespeichert wurde.

NIF_TIP in NOTIFYICONDATAW.uFlags wird auch gesetzt ... nur dann wird szTip überhaupt verwendet.
hmmmmmmmmm


https://learn.microsoft.com/en-us/wi...otifyicondataw

[himitsu]

Seit 24 Jahren ist es ein szTip[128] und kein szTip[64] mehr,
und Delphi hat "neu" die uralte alte API implementiert,

aber daran sollte es eigentlich nicht liegen sollen. :gruebel: