[delphi] Alle hints in de statusbar

[Cryothic]

He, ik zit ff met een probleempje waar ik niet uitkom.

Ik wil de longhints (dus die na de | ) in de statusbar, op panel[1] hebben zodra ik de muis over iets heen haal.

Maar tot nu toe heb ik geen succes.|:(
De Statusbar.Autohint optie hielp niet, en ook een procedure koppelen aan de Application.OnShowHint is me niet gelukt.

[Cryothic]

laat maar, ik heb hem al.
sorry jullie gestoord te hebben, en hierbij: slotje

Voor de mensen die ook nog op zoek zijn:

1 procedure:
Form1.DisplayHint(Sender : TObject);
Begin
statusbar.panels[1].Text := GetLongHint(Application.Hint);
End;

Form1.FormCreate(Sender : TObject);
Begin
Form1.OnHint := DisplayHint;
End;