Fórum Falha no Sistema #451763
13/08/2013
0
Pessoal, meu sistema começou a dar uma falha depois que utilizo uma dll dinamicamente.
Não dá nenhum erro durante a chamada da dll. Faço a utilização da mesma, depois limpo da memória desta forma abaixo.
procedure TfrmOrdServ.Ticket1Click(Sender: TObject);
var
libHandle : THandle;
FChamaRel : TChamaRel;
begin
try
libHandle := LoadLibrary('Gerador.dll');
try
if libHandle > 0 then
begin
@FChamaRel := GetProcAddress(libHandle,'OrdServ');
if not (@FChamaRel = Nil) then
FChamaRel(CodEmpresa,StrToInt(ID.Text))
else
raise TErrorForm.Create('Função não encontrada');
end else
raise TErrorForm.Create('Dll Não encontrada');
finally
FreeLibrary(libHandle);
end;
except on E: TErrorForm do
Application.MessageBox(PChar(e.Message),'Erro',mrNone + MB_ICONERROR);
end;
end;
O erro ocorre quando eu abro uma pasta ou o sistema fica parado por algum tempo, depois retorno ao sistema, ai sim, aparece o erro abaixo...
Já tendei colocar o exe no DEP, mas não resolveu...
Aguem pode ajudar?
Nome do Evento de Problema: APPCRASH
Nome do Aplicativo: SCI_500.exe
Versão do Aplicativo: 13.8.13.0
Carimbo de Data/Hora do Aplicativo: 520a28a0
Nome do Módulo de Falhas: StackHash_2264
Versão do Módulo de Falhas: 0.0.0.0
Carimbo de Data/Hora do Módulo de Falhas: 00000000
Código de Exceção: c0000096
Deslocamento de Exceção: 0ec50f4b
Versão do sistema operacional: 6.1.7600.2.0.0.256.1
Identificação da Localidade: 1046
Informações Adicionais 1: 2264
Informações Adicionais 2: 2264db07e74365624c50317d7b856ae9
Informações Adicionais 3: 875f
Informações Adicionais 4: 875fa2ef9d2bdca96466e8af55d1ae6e
Não dá nenhum erro durante a chamada da dll. Faço a utilização da mesma, depois limpo da memória desta forma abaixo.
procedure TfrmOrdServ.Ticket1Click(Sender: TObject);
var
libHandle : THandle;
FChamaRel : TChamaRel;
begin
try
libHandle := LoadLibrary('Gerador.dll');
try
if libHandle > 0 then
begin
@FChamaRel := GetProcAddress(libHandle,'OrdServ');
if not (@FChamaRel = Nil) then
FChamaRel(CodEmpresa,StrToInt(ID.Text))
else
raise TErrorForm.Create('Função não encontrada');
end else
raise TErrorForm.Create('Dll Não encontrada');
finally
FreeLibrary(libHandle);
end;
except on E: TErrorForm do
Application.MessageBox(PChar(e.Message),'Erro',mrNone + MB_ICONERROR);
end;
end;
O erro ocorre quando eu abro uma pasta ou o sistema fica parado por algum tempo, depois retorno ao sistema, ai sim, aparece o erro abaixo...
Já tendei colocar o exe no DEP, mas não resolveu...
Aguem pode ajudar?
Nome do Evento de Problema: APPCRASH
Nome do Aplicativo: SCI_500.exe
Versão do Aplicativo: 13.8.13.0
Carimbo de Data/Hora do Aplicativo: 520a28a0
Nome do Módulo de Falhas: StackHash_2264
Versão do Módulo de Falhas: 0.0.0.0
Carimbo de Data/Hora do Módulo de Falhas: 00000000
Código de Exceção: c0000096
Deslocamento de Exceção: 0ec50f4b
Versão do sistema operacional: 6.1.7600.2.0.0.256.1
Identificação da Localidade: 1046
Informações Adicionais 1: 2264
Informações Adicionais 2: 2264db07e74365624c50317d7b856ae9
Informações Adicionais 3: 875f
Informações Adicionais 4: 875fa2ef9d2bdca96466e8af55d1ae6e
Carlos Júnior
Curtir tópico
+ 0
Responder
Clique aqui para fazer login e interagir na Comunidade :)