Aquí:
with TVisualizacionFactura.Create(Self) do
try
SMDBGrid2.DataSource := DataSource1;
frDBDataSetFacturas.DataSource := DataSource1;
DBNavigator1.DataSource := DataSource1;
// podrías haber creado una propiedad o método
// que al pasarle un Datasource ya se encargara el solo
// de asignarlo donde se necesitara. (por comodidad, digo yo).
ShowModal;
finally
free;
end;
Creas un TVisualizacionFactura (supongo que el form que muestra
los datos de la factura)... bueno...
Y supongo que con
ShowMessage(FloatToStr( ListadoFactura.IBQueryFacturasDeuda.Value));
intentas acceder al padre por medio de la referencia LISTADOFACTURA.
Pero... ¿Tiene asignado al padre?
Generalmente, una violación de acceso, viene provocada por el uso de una referencia invalida (supongo que a nil).
¿Le has pasado al formulario hijo el formulario Padre? Vamos, ¿LISTADOFACTURA := Padre?
¿o es listadofactura es la variable que te crea el delphi cuando te crea un form y resulta que no la estás usando?
De todas formas, para lo que haces no requieres conocer el form padre. En el DataSource que pasas YA TIENES el DATASET en el cual buscas info, luego haz algo del estilo:
ShowMessage(FloatToStr( SMDBGrid2.DataSource.Dataset.FieldByName('UnoDeLosCampos').AsLoqueToque));
|