Hint in Statuszeile UND neben Button

[Micha]

Hint in Statuszeile UND neben Button

Wie stelle ich das an, dass der Hint in der Statuszeile und zugleich neben dem Button angezeigt wird.

Meine procure für die Statuszeile:

Delphi-Quellcode:

procedure Tfrm_main.ShowHint(Sender: TObject);
begin
 // Hint wird im Panel 1 angezeigt
  statusbar.Panels[1].Text := Application.Hint;
end;

procedure Tfrm_main.FormCreate(Sender: TObject);
begin
  Application.OnHint := MyHint;
  ShowHint           := True;
end;

Er zeigt mir zwar jetzt den Hint in der Statuszeile an, aber nicht mehr neben dem Button.

Hat jemand eine Lösung?

[Marcel Gascoyne]

Die Eigenschaft Hint besteht aus zwei Teilen, die durch einen senkrechten Strich | getrennt werden. Der linke Teil wird angezeigt wenn Du mit der Maus rüberfährst und der rechte Teil wird in der Stausleiste angezeigt.

Gruß,
Marcel

[Micha]

Sorry, hat sich zwar gut angehört, funktioniert aber leider nicht:

toolbtn_User.Hint := 'Ausbilderverwaltung | Ausbilderverwaltung';

[dopeline]

liegt es vielleicht daran, dass der strich | in dem string steht?
habe zwar keine möglichkeit es zu prüfen, aber vielleicht meint Marcel Gascoyne es so:
toolbtn_User.Hint := 'Ausbilderverwaltung' | 'Ausbilderverwaltung'; oder vielleich noch ne klammer drum, oder jeweils ein plus zwischen die strings und dem | ...

Gruß, dopeline

[scp]

Zitat von Delphi Hilfe:

Durch die Angabe von zwei Werten, die durch das Zeichen | voneinander getrennt sind, kann ein Kurzhinweis definiert werden, der sowohl vom Hilfetextfeld als auch von einer Ereignisbehandlungsroutine für OnHint verwendet wird. Ein Beispiel:

Edit1.Hint := 'Name|Geben Sie den Namen in das Eingabefeld ein';

Der Text 'Name' wird im Hilfetextfeld angezeigt, und der String 'Geben Sie einen Namen ein' kann mit Hilfe der Funktion GetLongHint für die Verwendung in der OnHint-Ereignisbehandlungsroutine extrahiert werden.

[Thunderchild]

Einfacher als mit Quelltect über onHint geht's so:
die Statusleiste hat eine Eigenschaft namens AutoHint. Wenn Du die auf true setzt, werden Hinweise automatisch angezeigt.
Beim Formular natürlich ShowHint:=true nicht vergessen. Dann dürfte's gehn. Da bei anderen Steuerelementen ParentShowHint auf true steht, müsste bei denen dann ShowHint auch auf true sein.
In dem Hint-String brauchst Du keine Leerzeichen um den | zu setzen.

Gruß