Einzelnen Beitrag anzeigen

neolithos

Registriert seit: 31. Jul 2003
Ort: Dresden
1.386 Beiträge
 
Delphi 7 Architect
 
#4

Re: MDI-Child per Function erzeugen

  Alt 10. Sep 2003, 08:56
Delphi-Quellcode:
function TclsExecuteFunction.OpenForm(clsForm :TFormClass): TForm;
begin
  Result := nil;
  try
    Result := clsForm.Create(Application.MainForm);
    ...
  except
    FreeAndNil(Result);
  end;
end;
- ciao neo -
Es gibt niemals dumme Fragen, sondern nur dumme Antworten!
  Mit Zitat antworten Zitat