Moin !
Habe da diesen Code:
Delphi-Quellcode:
procedure TSourceNrCommRS232.ConfigDialog;
var
Form : TForm2;
ConfigFrame : TFrame;
begin
Form := TForm2.Create(NIL);
ConfigFrame := TNrCommConfig.Create(Form);
ConfigFrame.Parent := TForm2(Form).Panel2;
TNrCommConfig(ConfigFrame).COMPort := FNrComm;
Form.ShowModal;
TNrCommConfig(ConfigFrame).COMPort := NIL;
ConfigFrame.Free;
Form.Free;
end;
Form ist ein ganz normales Form mit nem Panel drauf. Ansonsten leer. Wird auch nicht zur Laufzeit mit automatisch angelegt.
Das Frame ist auch nix besonderes. Ein paar Konfig elemente drauf.
Wenn ich den Code starte sagt er mir:
Aus einem sichtbaren Fenster kann kein modales gemacht werden.
Kommt bei ShowModal.
Verstehe ich aber gerade nicht
