![]() |
Registrar Clase Form no autocreada
Buen dia foristas.
Les expongo este detalle que traigo, anduve buscando y no encontre como. Mi detalle es el siguiente Tengo una Form no-Autocreable, en tiempo de ejecucion, la puedo mandar llamar de la siguiente forma: Primero debo registrar la clase en el create de la forma del menu procedure TFrmMenu.FormCreate(Sender: TObject); begin RegisterClass( TFrmPais ); RegisterClass( TFrmEstados ); end; Posteriormente la mando llamar de la siguiente forma: procedure TFrmMenu.gpoCatalogosItems0Click(Sender: TObject); var FormName: string; AForm: TForm; begin CierraForms; FormName := 'FrmPaises'; Application.CreateForm(TFormClass(FindClass('T'+FormName)), AForm); pnlTitulo.Caption := AForm.Caption; VerForma(AForm, Forma); end; y sin problema, todo funciona bien, mi detalle es que como hacer lo del RegisterClass( TFrmPais ); pero sin ponerlo fijo, requiero algo como: RegisterClass( 'TFrmPais' ); Pero no encuentro la manera. Espero haberme explicado. Gracias de antemano |
| La franja horaria es GMT +2. Ahora son las 11:14:52. |
Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2026, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi