Schriftart oder drei Spalten Menü

[binio]

Also die Kombi:

Delphi-Quellcode:

procedure TForm1.FormCreate(Sender: TObject);
begin { TForm1.FormCreate }
  //Schriftart und Schriftgröße
  Screen.MenuFont.Name := 'Courier New';
  Screen.MenuFont.Size := 10;
  mainmenu1.OwnerDraw :=True;
  ...

klappt super !!!
Nur leider hab ich das Problem das ein Text in die Tastenkürzel reinragt (siehe Anhang).