Man braucht die
Unit Math.
Delphi-Quellcode:
procedure TForm1.FormCreate(Sender: TObject);
begin
SetExceptionMask(exAllArithmeticExceptions);
...
end;
Hathor, du bist ein Schatz
Das war der entscheidende Hinweis
(asexuell natürlich) Damit läuft es nun auch im 64-Bit-Mode
Delphi-Quellcode:
Procedure TFormMain.FormCreate(Sender: TObject);
begin
{$IFDEF WIN64}
SetExceptionMask(exAllArithmeticExceptions);
Self.Caption := GLD.Programmtitel + '64-Bit-Version';
{$ELSE}
Self.Caption := GLD.Programmtitel + '32-Bit-Version';
{$ENDIF}
...
Laufen lassen und warten, wo der Debugger nach dem Knall hält, sagt dir nicht die Zeile?
Du natürlich auch
Aber die genaue Zeile läßt sich damit auch nicht herausfinden. Der Cursor steht immer da, wo ich ihn zuletzt hingestellt habe, auch mit deiner "Notlösung". Es gibt da offenbar keinen Rücksprung zum Delphi-Programm ... von wo auch immer ...
Das hat auf die richtige Fährte geführt. Danke Günter, du bist auch ein Schatz
