FTP | CCD | Buscar | Trucos | Trabajo | Foros |
#8
|
|||
|
|||
Lamento molestar tanto, pero hice todo y nada. Auxilio
procedure TMDI…. var Hija: Tform; Str_Forma: String; FormaClase: TFormClass; begin Try : begin Qad_Forma.Close; Qad_Forma.Parameters.ParamByName('Numero').Value := Int_NumeroForma; Qad_Forma.Open; : begin Str_Forma := 'T' + Qad_FormaORES_FORMA.Value; FormaClase := TFormClass(GetClass(Str_Forma)); Hija := TFormaClase.Create(Self); Hija.Show; end; end; : end; Initialization RegisterClass(TFormaClase); Hice todo esto, pero me sale un Error, "no declarado identificador TFormaClase", por fis que estoy haciendo mal si de acuerdo a un filtro en un query, tengo guardada en una tabla el nombre de l forma. |
|
|
|