TForm kann nicht übergeben werden!!!!

[GuenterS]

Hm das ist klar...

Du darfst Deiner Methode auch nicht einen Typ von TForm übergeben sondern definier dir einen Typ wie
TFormClass = class of TForm und verwende diesen.

Beispiel:

Delphi-Quellcode:

...

type 
   TFormClass = class of TForm;



procedure Tconfig_form.CreateShowmodalForm(ShowForm: TFormClass); 
begin 
  with ShowForm.Create(nil) do 
    begin 
      Showmodal; 
    end; 
end;