TMenuItem und StatusBar

[Martin K]

So gehts - wenn ich z.B. in das zweite Panel der StatusBar schreiben will, was mit AutoHint nicht funzt:

Delphi-Quellcode:

procedure TForm1.FormCreate(Sender: TObject);
begin
  Application.OnHint := ApplicationHint;
end;

procedure TForm1.ApplicationHint(Sender: TObject);
begin
  StatusBar1.Panels[1].Text := Application.Hint;
end;

Danke nochmal an euch beide

Habs die ganze Zeit mit TControl(Sender).Hint anstatt Application.Hint probiert, doch das hat nich gefunzt.
Hätt ich früher mal in der Delphi-Hilfe nachgeschaut:
Da ist es ja mit Beispiel erklärt