Hint aktualisieren

[Phantom1]

Ich möchte gerne einen Hint mehrmals in der Sekunde aktualisieren.
Wenn ich mit der Maus auf eine Komponente zeige wird der Hint angezeigt für ein paar sekunden, soweit ok. Nur dieser Hint aktualisiert sich nicht mehrmals in einer Sekunde, sondern erst wieder wenn ich mit der Maus erneut auf die Komponente zeige. Wie kann ich das ändern?

mfg

[Schaedel]

Was für ne Komponente meinst du?

[Phantom1]

Es ist die TJvTrayIcon (Jedi's). Aber spielt das überhaupt eine rolle?

[ConstantGardener]

Hallo Phantom,

wenn Du den Inhalt von Hint der Komponente änderst und danach Application.ShowHint aufrufst müsste sich der Text aktualisieren. Evtl. ist auch noch ein Application.Processmessages nötig um die Anzeige zu aktualisieren.

ConstantGardener

[Phantom1]

@ConstantGardener: Application.ShowHint bewirkt leider überhaupt nichts. Eine andere Idee?

mfg

[Matze]

So ohne weiteres dürfte das nicht möglich sein, denke ich. Notfalls musst du dir das über ein evtl. dynamisch erzeugtes Formular selbst basteln. Afaik ist ein Hint nicht für die "Live-Aktualisierung" vorgesehen.

[Hawkeye219]

Hallo,

für "normale" Komponenten ist das durchaus möglich. Wenn man einen Handler für das Ereignis TApplication.OnShowHint bereitstellt (z.B. über TApplicationEvents), dann kann man dort die Eigenschaften des HintWindows konfigurieren:

Delphi-Quellcode:

procedure TDemoForm.ApplicationEvents1ShowHint (var HintStr: String;
  var CanShow: Boolean; var HintInfo: THintInfo);
begin
  if (HintInfo.HintControl = TheControl) then // hier das gewünschte Control einsetzen 
    HintInfo.ReshowTimeout := 100;            // hier die Zeit für die Aktualisierung in msec
end;

Ob das auch mit der TrayIcon-Komponente funktioniert, kann ich leider nicht sagen.

Gruß Hawkeye

[Phantom1]

@Hawkeye219: danke das funktioniert sehr gut!

mfg