En cuanto a la solución de lepe , me surguen dos dudas , la primera es donde pongo :
TCta.Filter := 'codigo= ' + TContable.FieldByName('idcodigo').AsString;
Ya que TCta esta en el form FContable y la tabla TContable esta en el DataModule.
La segunda duda , es si pongo en el DataModule :
if Assigned(FContable) then
Lo que pasa , es que al ser FContable MDIChild , FContable = nil siempre . Por lo que nunca entra dentro del if ... then . Este era mi segunda duda , como hacer para poner código dentro del DataModule , que se ejecute cuando FContable este activo , se haya creado y ya esta activo , por que con if Assigned(FContable) then , no funciona , y la propiedad ActiveMDIChild , da error dentro de un DataModule .
Saludos
|