Acesso violation c dois DM e DBExpress com Firebird 1.5 ?
Coloquei dois data modules.
1º com SQLConnection.
2º - com SQSDataset, Prvider e ClienteDataset.
Quando vou fechar o formulário da a mensagem de erro Access vionation at address 004C955B in module ´Projeto.exe´. Read of Addre 00000058.
To queredo resouver este problema.
Já colequei ouro SQLConnection e o problema continua.
Crie outra aplicação e o problema não apareceu, mas quero saber oque deve ser nesta será um bug?
1º com SQLConnection.
2º - com SQSDataset, Prvider e ClienteDataset.
Quando vou fechar o formulário da a mensagem de erro Access vionation at address 004C955B in module ´Projeto.exe´. Read of Addre 00000058.
To queredo resouver este problema.
Já colequei ouro SQLConnection e o problema continua.
Crie outra aplicação e o problema não apareceu, mas quero saber oque deve ser nesta será um bug?
Max2006
Curtidas 0
Respostas
Max2006
23/05/2007
Este é o meu código quando fecho o formulário...
procedure T_frmCadPedido.FormClose(Sender: TObject; var Action: TCloseAction);
begin
//Destruição do formulário
Action:= caFree;
_dmCadPedido:= Nil;
end;
procedure T_frmCadPedido.FormDestroy(Sender: TObject);
begin
_dmCadPedido.cdsPedido.Close;
_dmCadPedido.cdsTipoPedito.Close;
_dmCadPedido.cdsCliente.Close;
_dmCadPedido.Free;
_dmCadPedido:= Nil;
procedure T_frmCadPedido.FormClose(Sender: TObject; var Action: TCloseAction);
begin
//Destruição do formulário
Action:= caFree;
_dmCadPedido:= Nil;
end;
procedure T_frmCadPedido.FormDestroy(Sender: TObject);
begin
_dmCadPedido.cdsPedido.Close;
_dmCadPedido.cdsTipoPedito.Close;
_dmCadPedido.cdsCliente.Close;
_dmCadPedido.Free;
_dmCadPedido:= Nil;
GOSTEI 0
Max2006
23/05/2007
A mensagem aparece quando eu abilito estas três primeiras linha que fecham o clietdatase.
Se eu desabilitar estas três linhas nada aparece...
Oque deve ser?
procedure T_frmCadPedido.FormDestroy(Sender: TObject);
begin
_dmCadPedido.cdsTipoPedito.Close;
_dmCadPedido.cdsPedido.Close;
_dmCadPedido.cdsCliente.Close;
_dmCadPedido.Free;
_dmCadPedido:= Nil;
End;
Se eu desabilitar estas três linhas nada aparece...
Oque deve ser?
procedure T_frmCadPedido.FormDestroy(Sender: TObject);
begin
_dmCadPedido.cdsTipoPedito.Close;
_dmCadPedido.cdsPedido.Close;
_dmCadPedido.cdsCliente.Close;
_dmCadPedido.Free;
_dmCadPedido:= Nil;
End;
GOSTEI 0
Max2006
23/05/2007
Eu estava destruindo o datamodule e depois pedia para fechar o clientedataset alterei a ordem e o sistema não teve mais erro...
GOSTEI 0