Einzelnen Beitrag anzeigen

Benutzerbild von himitsu
himitsu

Registriert seit: 11. Okt 2003
Ort: Elbflorenz
44.184 Beiträge
 
Delphi 12 Athens
 
#8

Re: Bei try..except Zeilenr. der fehlerhaften Zeile ausgeben

  Alt 19. Mär 2007, 11:24
Na ja, ich auch nicht so, aber es gibt so Projekte wo die ganzen Debuginformationen mit in der Exe gepeichert werden und dann darüber die Zeile zur Position bestimmt werden kann.

und sowas?
Delphi-Quellcode:
Var LastPos: Integer;


LastPos := 0;
Try
  Befehl1;
  LastPos := 1;
  Befehl2;
  LastPos := 2;
  Befehl3;
  LastPos := 3;
  Befehl4;
  ...

Except
  Case LastPos of
    0: Fehler bei Befehl 1
    1: Fehler bei Befehl 2
    2: Fehler bei Befehl 3
    3: Fehler bei Befehl 4
    ...
  End;
End;
$2B or not $2B
  Mit Zitat antworten Zitat