Multiple Typ-Konvertierung (eleganter, als mein Weg?)

[himitsu]

Zitat von Satty67:

Aber denke mit EConvertError und EInvalidOp hat man das meiste abgedeckt, wenn's trotzdem noch knallt hat man wohl den Pointer versemmelt? Denke die zu erwartenden Fehler müssen erstmal reichen.

notfalls könnte man das on-do auch weglassen und alle exceptions behandeln
try Result := StrToInt64(PChar(aPtr)) except Result := 0; end; ansonsten dann wenigstens etwas machen, wenn man die Exception nicht behandeln will und wenn es auch nur das erneute auslösen dieder wäre ... besser als sie unter den tisch zu kehren und so das Result in einem undefinierten Zustand zu lassen
try Result := StrToInt64(PChar(aPtr)) except on EConvertError do Result := 0; else Raise end;