TabControl1.Tabs[i].Text

[ldzaferi]

Hi,
ich habe folgendes Problem. Und Zwar schreibe ich meine Semester-Arbeit in Delphi und ich muss einen HTML-EDITOR (Like PHASE 5 - HTML EDITOR DEN MAN IM NET GRATIS DOWNLOADEN KANN) Programmieren.
Wenn ich auf z.B. eine Neue HTML Seite (Date_New) klicke macht er mir schön eine Neue Tab und mit dem Namen den ich Hart-Codiert habe z.B. (Unbennant1.html).
Nun möchte ich diesen Namen aber ändern mit einem PopUp Menu, rechter Mausklick_umbenennen das Aktuelle Tab. Wenn ich das tuhe, verschwinden immer alle anderen Tabs nur der eine, denn ich umbenannt habe bleibt übrig. Kann mir jemand helfen

Delphi-Quellcode:

procedure TForm3.Button1Click(Sender: TObject);
begin
  if copy(edit1.Text,length(Edit1.Text)-4,Length(Edit1.Text)) <> '.html' then
   Form1.TabControl1.Tabs.Text := Edit1.Text + '.html'
  else
  //Form1.TabControl1.Tabs[Form1.TabControl1.TabIndex].Text := Edit1.Text;
   Form1.TabControl1.Tabs[1] := edit1.Text;
end;

Hier sieht man noch wie ich es Probiert habe bisher.