Discussion :

[dridri86]

Bonjour

J'ai développé une appli avec D6 équipée de la jvcl 2 (notamment pour les labels clignotants).
Je viens de changer mon PC de développement (un DELL dimension 5000) et au lancement de mon appli je me récupère un runtime error 216
qui provient du code de la jvcl suivant (dont je ne me sers pas à priori)

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

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;

Visiblement, cela plante à cette ligne
GetCpuSpeed(CpuInfo.FrequencyInfo);
avec message Division par zéro à virgule flottante.

J'ai testé avec un HP et un Dell Optiplex G520 et là aucun problème......

Je suppose que le problème a rapport avec mon proc

Merci pour vos suggestions pour résoudre ce problème.
[Modération]
Merci d'utiliser les balises code ou quote, Laurent Dardenne
[/Modération]

[[Silk]]

Salut,
j'ai eu le meme probleme que toi sur un AMD il n'y a pas lontemps.J'ai remarqué que cette erreur apparait avec n'importe quel composant de la JVCL, puis j'ai trouvé quelque chose dans la FAQ mais je n'ai pas testé encore
http://delphi.developpez.com/faq/?pa...ror216p4<br />
En esperant que celà peut t'aider
A+

[dridri86]

Bonjour

Merci Silk pour l'info

Je n'avais pas assez fouillé dans la FAQ.

En tout cas, je l'ai testé et cela fonctionnne

Encore merci