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?