Einzelnen Beitrag anzeigen

Benutzerbild von Bummi
Bummi

Registriert seit: 15. Jun 2010
Ort: Augsburg Bayern Süddeutschland
3.470 Beiträge
 
Delphi XE3 Enterprise
 
#2

AW: In der zeile der Menuebar einen Text anzeigen

  Alt 28. Nov 2011, 15:23
Einen MenuItem mit einem langen Dummytext erstellen, dieses Disablen , das Menü auf Ownerdraw setzen
und z.B.
Delphi-Quellcode:
procedure TForm2.MeinDummyMenueEintragDrawItem(Sender: TObject; ACanvas: TCanvas; ARect: TRect; Selected: Boolean);
begin
   Acanvas.Font.Color := clRed;
   Acanvas.TextOut(Arect.Left,Arect.Top,'Was auch immer ...');//TMenuItem(Sender).Caption);
end;
Thomas Wassermann H₂♂
Das Problem steckt meistens zwischen den Ohren
DRY DRY KISS
H₂ (wenn bei meinen Snipplets nichts anderes angegeben ist Lizenz: WTFPL)
  Mit Zitat antworten Zitat