Einzelnen Beitrag anzeigen

Hartfrid Krause

Registriert seit: 20. Feb 2007
90 Beiträge
 
Delphi XE6 Professional
 
#5

AW: mainmenu items ändern

  Alt 6. Feb 2013, 10:00
Ich stehe weiterhin auf dem schlauch:
im Objektinspektor rufe ich in onclick die procedure schraffiertfarbigpruef auf.

Die Abfragen
a. wie der Name des tmenueitem ist, um eine weitere procedure aufzurufen und
b. wie ich den Namen verändern kann
gelingt mir noch nicht


procedure tform8.schraffiertFarbigPruef(sender:TObject);
begin
//if TmenuItem. sender =('schraffiert') then
begin
schraffieren(sender);
//....umbenennen des ersten items in farbe...
exit;
end;
{if mainmenue1.items....='farbig' then
begin
farbig(sender);
....umbenennen von farbig in schraffiert...
end; }
end;
  Mit Zitat antworten Zitat