Ich wüsste jetzt nichts, außer Try-Except und im Except nochmals berechnen, ohne Überlaufprüfung.
Delphi-Quellcode:
// A := B * C; mit {$Q-}
mov eax,[ebp-$14]
imul dword ptr [ebp-$18]
mov [ebp-$10],eax
//A := B * C; mit {$Q+}
mov eax,[ebp-$14]
imul dword ptr [ebp-$18]
jno $0dde2376
call $0dd71098
mov [ebp-$10],eax