Mainmenü Frage

[Marcel Gascoyne]

Zitat von 150gozilla:

Wie mache ich das, das die hints von dem menüpunkt, in einer statusbar dargestellt werden ?

Schreib einen Eventhandler für Application.OnHint und ändere dort die Statusleiste:

Delphi-Quellcode:

type
  TMainForm = class(TForm)
  ...
  private
    procedure UpdateStatus(Sender: TObject);
  end;

procedure TMainForm.UpdateStatus(Sender: TObject);
begin
  StatusBar.Panels[0].Text := Application.Hint;
end;

procedure TMainForm.FormCreate(Sender: TObject);
begin
  Application.OnHint := UpdateStatus;
end;

Gruß,
Marcel