Autor Téma: nested exception - koľko ich je a ako sa k nim dostať?  (Přečteno 94 krát)

Offline Stanislav Hruška

  • Padawan
  • ******
  • Příspěvků: 4338
  • Karma: 38
    • Verze Delphi: XE7 professional
Nič som k tomu nenašiel. Jeden z dôvodov je zistiť, či niektorá z nich je EFDDBEngineException. Tú potom obslúžiť samostatne.
Delphi XE7, FireBird
Expert na kladenie nejasne formulovaných otázok.

Online Delfin

  • Padawan
  • ******
  • Příspěvků: 1820
  • Karma: 70
  • SW konzultant
    • Verze Delphi: 2009, Tokyo, Rio
Re:nested exception - koľko ich je a ako sa k nim dostať?
« Odpověď #1 kdy: 21-07-2019, 14:00:22 »
Nič som k tomu nenašiel. Jeden z dôvodov je zistiť, či niektorá z nich je EFDDBEngineException. Tú potom obslúžiť samostatne.

Vubec nerozumim. Ptas se kolik ma Exception uvnitr InnerException (tedy nemusi jit specificky o EFDDBEngineException)? Pokud ano, proc toto potrebujes zjistovat?

P.S. mohl bys prosim psat dotazy nejen do titulku, ale i do obsahu zprav?
« Poslední změna: 21-07-2019, 14:07:09 od Delfin »
I'm a soldier, so don't panic! I know the underground! I like the WTFPL license! No more Google, go duck, go!

Offline pf1957

  • Padawan
  • ******
  • Příspěvků: 2568
  • Karma: 131
    • Verze Delphi: D2007, XE3, DX10
Re:nested exception - koľko ich je a ako sa k nim dostať?
« Odpověď #2 kdy: 21-07-2019, 16:41:52 »
Excellent
Rated 1 time
Nič som k tomu nenašiel. Jeden z dôvodov je zistiť, či niektorá z nich je EFDDBEngineException. Tú potom obslúžiť samostatne.
Co bys k tomu chtel najit? Kazda  Exception ma property InnerException, takze je musis prolezt:
Kód: Delphi [Vybrat]
  1. except on E: Exception do
  2.   begin
  3.     inner :=E.InnerException;
  4.     while Assigned(inner) do
  5.       begin
  6.         ...
  7.         inner := inner.InnerException;
  8.       end;
  9.   end;
  10.  

Online Delfin

  • Padawan
  • ******
  • Příspěvků: 1820
  • Karma: 70
  • SW konzultant
    • Verze Delphi: 2009, Tokyo, Rio
Re:nested exception - koľko ich je a ako sa k nim dostať?
« Odpověď #3 kdy: 21-07-2019, 17:28:42 »
Co bys k tomu chtel najit? Kazda  Exception ma property InnerException, takze je musis prolezt:
Kód: Delphi [Vybrat]
  1. except on E: Exception do
  2.   begin
  3.     inner :=E.InnerException;
  4.     while Assigned(inner) do
  5.       begin
  6.         ...
  7.         inner := inner.InnerException;
  8.       end;
  9.   end;
  10.  

Podobnym zpusem se daji i spocitat, Proc je ovsem zahadou...
I'm a soldier, so don't panic! I know the underground! I like the WTFPL license! No more Google, go duck, go!

Offline Stanislav Hruška

  • Padawan
  • ******
  • Příspěvků: 4338
  • Karma: 38
    • Verze Delphi: XE7 professional
Re:nested exception - koľko ich je a ako sa k nim dostať?
« Odpověď #4 kdy: 21-07-2019, 17:53:59 »
V skutočnosti ma počet nezaujíma. Len som si myslel, že tam bude nejaký zoznam :)
Citace
P.S. mohl bys prosim psat dotazy nejen do titulku, ale i do obsahu zprav?
Môžem. Len som si myslel, že nebudem zbytočne zdvojovať text.
Delphi XE7, FireBird
Expert na kladenie nejasne formulovaných otázok.

Offline pf1957

  • Padawan
  • ******
  • Příspěvků: 2568
  • Karma: 131
    • Verze Delphi: D2007, XE3, DX10
Re:nested exception - koľko ich je a ako sa k nim dostať?
« Odpověď #5 kdy: 21-07-2019, 20:21:45 »
Excellent
Rated 1 time
V skutočnosti ma počet nezaujíma. Len som si myslel, že tam bude nejaký zoznam :)
Tak treba metoda class helperu, ktera ti treba TList<Exception> vrati (a sezname nebude exceptions vlastnit).

Online Delfin

  • Padawan
  • ******
  • Příspěvků: 1820
  • Karma: 70
  • SW konzultant
    • Verze Delphi: 2009, Tokyo, Rio
Re:nested exception - koľko ich je a ako sa k nim dostať?
« Odpověď #6 kdy: Dnes v 00:03:35 »
Tak treba metoda class helperu, ktera ti treba TList<Exception> vrati (a sezname nebude exceptions vlastnit).

Urcite je to vhodna metoda reseni. Jinak vlastnit objekty TList<T> nemuze (to by musel byt TObjectList<T>) ;)
I'm a soldier, so don't panic! I know the underground! I like the WTFPL license! No more Google, go duck, go!