|
disculpas ..
como no he respondido ningun mensaje , no sabia como hacerlo .. y lei la guia de estilo despues de enviarte el email ... disculpas nuevamente...
El problema es que al hacerlo como me indicaste ...
Frm: TForm;
begin
if lApaisada then
Frm :=TFImpOcapa.Create(Application)
else
Frm :=TFImpOc.Create(Application);
with Frm do begin
QRParam.Caption := EProveedor.text;
QREntEstimada.Caption := EFechaEstimada.Text;
....
end:
me dice que no reconoce QRParam ...(undeclared identifier) la primera instrucccion del with ...
probe poner a frm del tipo TFImpOcapa y paso bien ...pero no seria solucion ..verdad porque tambien necesito que sea TFImpoc ....
Gracias ...
|