Article View: pl.comp.lang.delphi.bazy-danych
Article #658Re: Obsługa wyjątku EDBEngineError
From: Pawel Koloszko
Date: Fri, 21 May 1999 06:11
Date: Fri, 21 May 1999 06:11
25 lines
1488 bytes
1488 bytes
Jacek Malinowski wrote in message <7i1t5n$img$1@korweta.task.gda.pl>...
>Jak nalezy obsłuzyc ten wyjątek z własny komunikatem ?
>I gdzie w Delphi 4.0 włącza się w opcjach obsługe wyjątków ?
Proponuje tak:
try
.....
except
on E : EDBEngineError do
begin
if Errors[ErrorCount - 1].ErrorCode = tu_kod_bledu then
zrob_cos_tam
else raise; // jezeli blad o innym kodzie niz tu_kod_bledu
end
else raise; // jezeli blad rozny od EDBEngineError
end;
A co do tej obslugi wyjatkow, to nie wiem czy o to ci chodzi ale zajrzyj do
Tools | Debugger Options
PK
Technical Details
Message-ID:
<8L613.34535$I1.664143@news.tpnet.pl>Path:
mbox-mo1.pugleaf.net!news-archive.icm.edu.pl!pingwin.icm.edu.pl!mat.uni.torun.pl!uw.edu.pl!news.nask.pl!orion.cst.tpsa.pl!news.tpnet.pl!not-for-mailReferences:
<7i1t5n$img$1@korweta.task.gda.pl>Show Full Headers
Complete Article Headers
Path: mbox-mo1.pugleaf.net!news-archive.icm.edu.pl!pingwin.icm.edu.pl!mat.uni.torun.pl!uw.edu.pl!news.nask.pl!orion.cst.tpsa.pl!news.tpnet.pl!not-for-mail From: "Pawel Koloszko" <pablo@zorba.zeto.olsztyn.pl> Newsgroups: pl.comp.lang.delphi.bazy-danych References: <7i1t5n$img$1@korweta.task.gda.pl> Subject: Re: Obsługa wyjątku EDBEngineError Lines: 27 X-Newsreader: Microsoft Outlook Express 4.72.3110.5 X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3 Message-ID: <8L613.34535$I1.664143@news.tpnet.pl> Date: Fri, 21 May 1999 08:11:55 +0200 NNTP-Posting-Host: 195.116.26.158 X-Complaints-To: abuse@tpsa.pl X-Trace: news.tpnet.pl 927266884 195.116.26.158 (Fri, 21 May 1999 08:08:04 MET DST) NNTP-Posting-Date: Fri, 21 May 1999 08:08:04 MET DST MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit