habe in der zwischenzeit schon eine Lösung gefunden, die auch mit Panels funktioniert:
Delphi-Quellcode:
type
TmainForm = class(TForm)
procedure FormShow(Sender: TObject);
procedure DisplayHint(Sender: TObject);
end;
var
mainForm: TmainForm;
implementation
procedure TmainForm.Create(Sender: TObject);
begin
...
Application.OnHint := DisplayHint;
...
end;
procedure TmainForm.DisplayHint(Sender: TObject);
begin
StateBar.Panels[1].Text := GetLongHint(Application.Hint);
end;
Die Eigenschaft ShowHint von TmainForm muss zusätzlich noch auf True gesetzt werden.
Danach kann man bei Beliebigen Elementen die Eigenschaft Hint := 'help' setzen und es wird angezeigt.
@luckie, r_kerber & neolithos: Trotzdem herzlichen Dank!