Hi!

Also ich habe eine Form, die ich mehrere Male erstellen muss. Das mache ich so:

markieren

Code:

Application.CreateForm(TfrmShortMessage, CreatedForm);
CreatedForm.Name := 'Seite' + IntToStr(NumberOfForms);
CreatedForm.FormStyle := fsStayOnTop;
//CreatedForm.Position := poScreenCenter;
CreatedForm.WindowState := wsNormal;

CreatedForm.Show;
Inc(NumberOfForms);

Jetzt will ich eine Form "von außen" wieder schließen lassen. Dies habe ich erfolglos versucht. Beide der folgenden Varianten haben nicht funktioniert:

1.)

markieren

Code:

for I := 1 to NumberOfForms-1 do
TForm(FindComponent('Seite' + IntToStr(I))).Close;

2.)

markieren

Code:

for I := 1 to NumberOfForms-1 do
TfrmShortMessage(FindComponent('Seite' + IntToStr(I))).Close;

Jedes Mal bekomme ich eine Zugriffsverletzung. Ist bestimmt ne kleine Sache, vielleicht kann mir ja jemand helfen.

Gruß Yheeky

Ähh, kurze Frage: Ist es vielleicht möglich, dass sich FindComponent nur auf Komponenten auf der Form und nicht auf die Form selbst bezieht?

Moin Yheeky,

FindComponent bezieht sich immer auf die Komponenten, die sich in dem Container befinden, zu dem FindComponent gehört, wie Du schon richtig angenommen hast.
Du müsstest also in Deinem Falle Application.FindComponent verwenden.

Ah! Okay danke, also das Schließen der Form klappt jetzt einfach mit Destroy. Was wäre aber, wenn ich nur die Caption der Form ändern möchte? Caption gibt es nämlich nicht...

Moin Yheeky,

auch für Dich bitte:
Neue Frage, neuer Thread.

Danke.

Okay, sorry