Probe con la respuesta que me diste pero sigo con el mismo problema, me sigue tirando el mismo error
[Error] FMainGeneral.pas(1706): Incompatible types: 'TfrmForm' and 'Class reference'
Cita:
Empezado por maeyanes
Hola...
Como bien ya ha explicado ecfisa más arriba:
Código Delphi [-]procedure ShowFormModal(AFormClass: TFormClass); var AForm: TForm; begin AForm := AFormClass.Create(nil); try AForm.ShowModal finally AForm.Free end end; // Para llamarla ShowFormModal(TVentasFrm);
Saludos... |