Vorallem liegt der Witz auch noch woanders
Der Üarameter von RunError ist ja angeblich als
Byte definiert ... aber in Wirklicheit scheint es sich um einen
Integer zu handeln?
Und der Fehler in dem oberen Bild ist ist leider nur eine "fehlerhafte" Transformationsfunktion (IntToStr).
OK eigentlich solten ja keine negativen Werte an RunError übermittelt werden. Bei einen "angeblichem" Wertebereich von 0..255 wäre das ja eh nicht möglich, aber da es sich ja um einen Integer handelt, ist es für mich halt eine fehlerhafte Prozedur
Delphi-Quellcode:
Var i: Integer;
Begin
i := -911235645;
RunError(i);
End;
dat reicht also schon aus.
Und wenn euch der angezeigte Text nicht gefällt, dann nehmt halt 'nen anderen negativen Wert.
