Erro ao iniciar o form relação de threads não encontrada
Bom .... como comecar.
Quando inicio aplicação e faço um procedimento de chamada de Form:
>application.CreatForm(TForm,Form);
>Form.ShowModal;
O aplicativo gera um erro, daqueles que remetem para um enderecamento que voce consegue encontrar no PE Explorer e que não te dizem nada.
Uso o delphi 7 , e quando vou fazer a chamada para qualquer form (No momento de criacao do form) ele gera o erro. O erro é gerado exatamente na Unit SysUtil.pas -> TThreadLocalCounter.Open(var Thread: PThreadInfo);
No laço :
while (P <> nil) and (P.ThreadID <> CurThread) do
P := P.Next;
Quando faço a chamada do form o ponteiro da estrutura PThreadInfo perde a relação e quando ele vai fazer a comparação no while ([b:8e105f5475]P.ThreadID[/b:8e105f5475]) gera o erro.
Detalhes:
1º No meu notebook funciona SP3 do Win
2º No meu desktop não funciona SP3 do Win
3º Na maquina virtual do mesmo desktop que não funciona (2º item) funciona sem problemas SP1 do Win.
Pula amor de DEUS , alguem ja passou por isso ou imahina o que pode ser?
Quando inicio aplicação e faço um procedimento de chamada de Form:
>application.CreatForm(TForm,Form);
>Form.ShowModal;
O aplicativo gera um erro, daqueles que remetem para um enderecamento que voce consegue encontrar no PE Explorer e que não te dizem nada.
Uso o delphi 7 , e quando vou fazer a chamada para qualquer form (No momento de criacao do form) ele gera o erro. O erro é gerado exatamente na Unit SysUtil.pas -> TThreadLocalCounter.Open(var Thread: PThreadInfo);
No laço :
while (P <> nil) and (P.ThreadID <> CurThread) do
P := P.Next;
Quando faço a chamada do form o ponteiro da estrutura PThreadInfo perde a relação e quando ele vai fazer a comparação no while ([b:8e105f5475]P.ThreadID[/b:8e105f5475]) gera o erro.
Detalhes:
1º No meu notebook funciona SP3 do Win
2º No meu desktop não funciona SP3 do Win
3º Na maquina virtual do mesmo desktop que não funciona (2º item) funciona sem problemas SP1 do Win.
Pula amor de DEUS , alguem ja passou por isso ou imahina o que pode ser?
Pedroso
Curtidas 0
Respostas
Pedroso
17/11/2008
Alguem tem alguma ideia ?
GOSTEI 0
Pedroso
17/11/2008
Bom ..... eu resolvi.
Se algum dia no futuro alguem passar a mesma coisa por favor contacte.
Se algum dia no futuro alguem passar a mesma coisa por favor contacte.
GOSTEI 0