fenster.caption ist leer?

[lorenz]

Hallo alle zusammen!

Ich habe mal wieder ein kleines Problem:

Ich erstelle mit MessageDlg('Das Dokument ' + kindfenster.Caption + ' ist nicht gespeichert. Wollen Sie vor dem Schließen speichern?', mtConfirmation, [mbYes, mbNo, mbCancel], 0); eine Sicherheitsabfrage vor dem Schließen eines Dokumentes, wenn es nicht gespeichert wurde.

Ich erhalte allerdings den Text

---------------------------
Bestätigung
---------------------------
Das Dokument ist nicht gespeichert. Wollen Sie vor dem Schließen speichern?
---------------------------
Ja Nein Abbrechen
---------------------------

Die Überschrift wurde im hauptfenster definiert:

Delphi-Quellcode:

procedure Thauptfenster.neuedateiExecute(Sender: TObject);
var fenster: Tkindfenster;
begin
neuzaehler:=neuzaehler+1;
fenster:=Tkindfenster.Create(Self);
fenster.Caption:= 'Unbenannt ' + inttostr(neuzaehler);
end;

Warum wird die Überschrift nicht angezeigt? Irgendeine Idee?

Man liest sich,

Lorenz