Caption in neu erzeugtem Formular verändern?

[PeterPanino]

Hallo Delphi-Programmierer!

Ich habe in meinem Programm ein zusätzliches Formular (MyForm), das nicht in der Projektdatei (.dpr) erzeugt wird, sondern erst wenn es benötigt wird:

Delphi-Quellcode:

var
  ThisForm: TMyForm;

ThisForm := TMyForm.Create(self);
try
  with ThisForm do
  begin
    Caption := 'Meine Titelzeile'; // funktioniert!
    Edit1.Text := 'Mein Text'; // funktioniert!
  end;
  Application.BringToFront;
  if ThisForm.ShowModal = mrOK then
  begin
    // Tue etwas
  end;
finally
  ThisForm.Free;
end;

In der Unit von MyForm kann ich alle Steuerelemente von MyForm beliebig verändern, NUR NICHT die Caption von MyForm:

Delphi-Quellcode:

Edit1.Text := 'NEU'; // funktioniert!
MyForm.Caption := 'NEU'; // funktioniert NICHT!

Warum kann ich in der MyForm-Unit die Titelzeile des Formulars nicht verändern?

Wie kann ich sie trotzdem verändern?

Wäre für jeden Hinweis sehr dankbar!

[s.h.a.r.k]

Hey.

In welcher Funktion verwendest du den Code

Delphi-Quellcode:

Edit1.Text := 'NEU'; // funktioniert!
MyForm.Caption := 'NEU'; // funktioniert NICHT!

Wenn du ihn beim OnCreate der MyForm einfügst ist es klar dass es nicht geht. Denn wenn du die Form erstellst wird die Caption auf 'Neu' gesetzt, danach führst du aber den Code Caption := 'Meine Titelzeile'; aus.

Mach mal nen Test und setz einen Button auf MyForm und änderen beim OnClick die Caption. Ändert sich dann was?!

Hatte letztens aber auch mal so ein komisches Problem mit dem ShowModal!

[PeterPanino]

Zitat von s.h.a.r.k:

In welcher Funktion verwendest du den Code

Natürlich nicht in OnCreate, sondern in einer User-Interaktion (Anwender klickt Button).

Vielen Dank für die Antwort!

[Mavarik]

Hallo!

Wie ist den Dein Zugriff? MyForm.Caption?

Das geht nicht, Du hast das Formular nicht mit der localen Variable MyForm erzeugt,
sondern mit ThisForm!!! Das sind zwei unterschiedliche Zeigter!

Also entweder mit self.Caption oder im Create die locale Variable verwenden!

Frank

[PeterPanino]

Zitat von Mavarik:

Hallo!

Wie ist den Dein Zugriff? MyForm.Caption?

Das geht nicht, Du hast das Formular nicht mit der localen Variable MyForm erzeugt,
sondern mit ThisForm!!! Das sind zwei unterschiedliche Zeigter!

Also entweder mit self.Caption oder im Create die locale Variable verwenden!

Frank

Danke! DAS war der Fehler!

Herzlichen Gruß,
Peter