Mainmenü Frage

[JasonDX]

In meiner OH steht geschrieben:

Set Hint to a string that provides more information about the meaning of the menu item than the Caption. The hint text appears in a Help Hint window when the user pauses with the mouse over the menu item if Help Hints are enabled (that is, if the Form’s and the Application’s ShowHint properties are true). It is also available for the code in the application’s OnHint event handler.

Zu deutsch:
ShowHint muss auf true gesetzt sein...

Fazit: Erst OH, dann suchen, dann fragen

[Luckie]

Menüitems haben kein Hinweisfenster. Deren Hints werden in einer, wenn vorhanden, Statuszeile ausgegeben.

[150gozilla]

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

[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

[JasonDX]

Zitat von 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:

Oder du stellst die Eigenschaft AutoHint der StatusBar auf true

[Marcel Gascoyne]

Zitat von Chimaira:

Oder du stellst die Eigenschaft AutoHint der StatusBar auf true

Hmm, scheint bei der Standard StatusBar tatsächlich so eine Eigenschaft zu geben
Bei der TBX StatusBar geht das nur so wie ich es beschrieben habe...

Gruß,
Marcel