DelphiZip / ZipMaster-Exceptions abfangen

[himitsu]

und im Notfall alle Exceptions abfangen

Delphi-Quellcode:

try
  Add;
except
  MeineFehlermeldung;
end;

du könnteast aber auch mal nachsehn von welchem Typ die Exception ist?

Delphi-Quellcode:

try
  Add;
except
  // igendwie so ... ohne ein Delphi kann ich so schlecht nachsehn -.-''
  ShowMessage(ExceptObject.TypName);
end;