Pasar datos de un dbgrid a otro

Delphi

13/08/2017

Buenos dias amigos,soy novato en esto,necesitaba una ayuda.

Tengo dos formularios en las cuales tengo un dbgrid en cada fromulario,el segundo formulario es de consulta de productos,y la primera es un formulario de ventas,consegui hacer que del formulario2 pase la informacion al fromulario1,pero ya al pasar los datos necesito cerrar mi formulario2,pero corre un error al cerrar.
procedure TFrmConsProd.DBGrid1DblClick(Sender: TObject);
begin
dm_dados.sqlconprod.FieldByName('est_codigo').AsInteger;
dm_dados.tbl_saiproducto.Edit;
dm_dados.tbl_saiproductoSAIPROD_CODPRODUTO.AsInteger := dm_dados.sqlconprod.FieldByName('est_codigo').AsInteger;
frmconsprod.close;
end;

end.

Aqui una imagen del error
https://ibb.co/nQgEwa
Derlis

Derlis

Curtidas 0

Respostas

Gutierry Pereira

Gutierry Pereira

13/08/2017

Bom dia, o que tens é um violação de acesso. Isso ocorrer quando um objeto/recurso é chamado e o mesmo já não existe mais.
Isso deve estar ocorrendo se o seu formulário de produto estiver com um caFree no onclose ou em algum outro lugar vocês esta destruindo o mesmo e no formulário de vendas estiver tentando acessar alguma propriedade do formulário de produtos (como ele não existe mais o erro irá ocorrer).

Verifique no formulário de vendas se vocês esta utilizando o formulário de produtos depois de destruir o mesmo.

Espero ter ajudado.

Att: Gutierry Antonio
GOSTEI 0
POSTAR