Mdi, Modal Form Create

[ahmet_sinav]

harici bir unitten gönderilen parametrelerde belirtilen
formu mdi ve(ya) showmodal açmak mümkünmü? şöyle bir kod yazdım

Kod: Tümünü seç

procedure CreateForm(frmName:Tform;Mdi:Boolean=True);
begin
  if mdi then
  begin
    if not Assigned(frmName) then   
    begin  
      frmName:=TfrmName.Create(Nil);
      frmName.FormStyle:=fsMdiChild;
      frmName.visible:=true;
    end
    else begin
      frmName.WindowState:=wsNormal;
      frmName.BringToFront;
    end;
  end
  else begin
    Application.CreateForm(TfrmName,frmName);
    frmName.FormStyle:=fsNormal;
    frmName.Visible:=False;
  end;
end; 

şeklinde burada tfrmName kısmında undeclared identify hatası alıyorum doğal olarak fakat bu kısımda tfrmname yerine ne yazmalıyım. ilgili formun classını parametre olarak da gönderemedim..
Saygılar;

[ahmet_sinav]

procedure içerisine bir parametre daha ekledim:
frmNameCls:TFormClass;
şeklinde olayı çözdüm.
Saygılar;