MainMenu Item umbennenen

Martin W · Beiträge: 116

Hallo,

ich steh gerade vor einem weiteren Problem. Ich habe in einem Fenster oben eine Menüleiste (MainMenu1) erstellt und dort vier Items erstllt (Datei, Bearbeiten, Anzeigen, Hilfe). Vereinfacht gesagt möchte ich folgendes: Wenn ein Benutzer auf einen Button klickt soll das erste Item (Datei) zu "Windows" umbenannt werden.

markieren

Delphi-Quelltext

1:
2:
3:
4:

procedure TForm1.Button1Click(Sender: TObject);
begin
   // Jetzt soll das erste Menuitem von "Datei" nach "Windows" umbennant werden.
end;

Ich danke schon einmal für alle Antworten

Gruß
Martin

P.S.: Ich wusste nicht genau ob dieses Thread das Richtige ist, wenn nicht bitte einfach ins richtige verschieben.

ErnestoChe · Verfasst: Di 04.11.03 00:12

Hi,

das erste Item hat den Index 0:

markieren

Delphi-Quelltext

1:
2:
3:
4:

procedure TForm1.Button1Click(Sender: TObject);
begin
  MainMenu1.Items[0].Caption := 'Windows';
end;

MFG

- Ernesto -

Michael Stenzel · Beiträge: 133 D3 Prof, D7 PE

Hallo Martin.

Wenn Du nur den Anzeigetext(Caption) ändern möchtes, funktioniert es so.

markieren

Delphi-Quelltext

1:
2:
3:
4:

procedure TForm1.Button1Click(Sender: TObject); 
begin 
       MainMenu1.Items.Items[0].Caption := 'Windows'; 
end;

Michael.

Moderiert von Tino: Code- durch Delphi-Tags ersetzt.

Martin W · Beiträge: 116

Danke für die schnellen Antworten!!!!

Gruß
Martin[/b]

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme