Zitat von
copris:
Delphi-Quellcode:
procedure TfrmMain.CreatefrmStamm(const _Tag: integer; const Name: string);
var
Child: TfrmStamm;
begin
menuTxt := Name;
_CountWindow := _CountWindow +1;
Application.CreateForm(TfrmStamm, frmStamm);
frmStamm.Caption := Name + '_' + IntToStr(MDIChildCount);
end;
Alleine das kann schon gar nicht funktionieren. Damit das funktioniert benötigst du eine
class procedure. Du hast also das Formular erzeugt und rufst diese Prozedur auf. Darin erzeugt sich das Formular nochmals. Eines der beiden sieht man aber nicht, weil es noch wartet, sichtbar gemacht zu werden.
Bitte überdenke nochmals deine Struktur mit der
MDI-Anwendung und befolge auch den Hinweis meines Vorredners.
Bernhard