Einzelnen Beitrag anzeigen

Benutzerbild von haentschman
haentschman

Registriert seit: 24. Okt 2006
Ort: Seifhennersdorf / Sachsen
5.387 Beiträge
 
Delphi 12 Athens
 
#11

Re: FPU-Exceptions abschalten...Delphi Problem ?

  Alt 11. Jul 2007, 10:45
Hallo...

also:

Jcl8087. pas gefunden...
Bibliothekspfad gesetzt...
Unit eingebunden...
Code eingefügt...
Delphi-Quellcode:
procedure TForm1.FormCreate(Sender: TObject);
begin
  FPU:= Get8087ControlWord;
  Set8087ControlWord($133F)
end;
Delphi-Quellcode:
procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);
begin
  Set8087ControlWord(FPU)
end;
Starten...

...der Hammer ! ohne Fehler im Netz drucken...

Danke an Euch und die Jedis...
  Mit Zitat antworten Zitat