Erreur de division par 0 (MMX_FLAG)
Bonjour,
A l'execution mon programme (dev en Delphi 7) plante sur quelques PC, à chaque fois ce sont des PC equipées avec des Pentium 4 avec HT.
J'ai desactivé l'HT, rien n'y fait.
Alors J'ai installé delphi et reinstallé tous les compos etc (1 jour de travail...) pour pouvoir debugger.
Voici l'erreur remonté par delphi7 :
Citation:
---------------------------
Notification d'une exception du débogueur
---------------------------
Le projet mptransa.exe a provoqué une classe d'exception EZeroDivide avec le message 'Division par zéro en virgule flottante'. Processus stoppé. Utilisez Pas-à-pas ou Exécuter pour continuer.
---------------------------
OK Aide
---------------------------
Le code s'arrete dans l'unité JclSysInfo à l'emplacement suivant :
Code:
1 2 3 4 5 6 7 8 9 10 11
| procedure GetCpuInfo(var CpuInfo: TCpuInfo);
begin
CpuInfo := CPUID;
CpuInfo.IsFDIVOK := TestFDIVInstruction;
if CpuInfo.HasInstruction then
begin
if (CpuInfo.Features and TSC_FLAG) = TSC_FLAG then
GetCpuSpeed(CpuInfo.FrequencyInfo);
CpuInfo.MMX := (CpuInfo.Features and MMX_FLAG) = MMX_FLAG;
end;
end; |
sur la ligne
Code:
CpuInfo.MMX := (CpuInfo.Features and MMX_FLAG) = MMX_FLAG;
Vous avez des idées ?
Merci