Bei try..except Zeilenr. der fehlerhaften Zeile ausgeben?

[Muetze1]

Um das angesprochene Problem zu beheben, nutze ich immer einen solchen (oder ähnlich gelagerten) Code:

Delphi-Quellcode:

Function MyStrToFloat(AString: String): Float;
Begin
  AString := StringReplace(AString, '.', DecimalSeparator, []);
  AString := StringReplace(AString, ',', DecimalSeparator, []);
  Result := StrToFloat(AString);
End;