procedure ShowColl(Acontrol : TWinControl);export;
  begin    FrmColl := TFrmColl.Create(Acontrol);
    //FrmColl.Parent := Acontrol;
    //Frmcoll.BringToFront ;
    FrmColl.ShowModal;
  end;
exports 
showcoll index 1;
这样写对吗??可是怎么窗口不显示了呢??