🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: pl.comp.lang.delphi
Article #346313

Re: Delphi XE2 co wywołało funcję

#346313
From: zpksoft
Date: Sun, 04 Feb 2018 15:32
34 lines
2648 bytes
W dniu niedziela, 4 lutego 2018 09:29:44 UTC+1 użytkownik zpksoft napisał:
> W dniu wtorek, 30 stycznia 2018 17:51:59 UTC+1 użytkownik Karol napisał:
> > Nie do końca o to chodziło
> > ponieważ
> > try
> >    //do something
> >      raise Exception.Create('Something bad happened...');
> >    except
> >      on e: exception do
> >      begin
> >      //rollback a transaction or whatever i need to do here
> >        MessageDlg('An error has occurred!' + #13#10 + e.Message + #13#10 
> > + 'Here is the stack trace:' + #13#10 + e.StackTrace, mtError, [mbOK], 0);
> >      end;  //except
> >    end;  //try-except
> > 
> > e.StackTrace jest puste  ---> '' .
> > 
> >..
> taka mała uwaga>
> 
> wiersz z raise.. powinien być w sekcji except inaczej się nie wykona, jeśli błąd wystąpi przed tą linią kodu.
> 
> Paweł

Hm.. właściwie nie wiem co jest w 

 //do something

W każdym razie dyrektywa raise powoduje przeskoczenie do sekcji except gdzie jako e.Message dostaniesz 'Something bad happened...'

Być może kod jest dobry tylko jako pseudukod nieco mnie zmylił.

Paweł
Technical Details
Message-ID: <00364a37-7044-41ab-93be-2e65448b7dc5@googlegroups.com>
Path: mbox-mo1.pugleaf.net!news-archive.icm.edu.pl!news.icm.edu.pl!news.nask.pl!news.nask.org.pl!news.unit0.net!weretis.net!feeder6.news.weretis.net!feeder.usenetexpress.com!feeder-in1.iad1.usenetexpress.com!border1.nntp.dca1.giganews.com!nntp.giganews.com!o66no116127ita.0!news-out.google.com!k194ni5232itb.0!nntp.google.com!o66no116123ita.0!postnews.google.com!glegroupsg2000goo.googlegroups.com!not-for-mail
References: <5a70803f$0$694$65785112@news.neostrada.pl> <5a708df3$0$694$65785112@news.neostrada.pl> <5a70a2ad$0$604$65785112@news.neostrada.pl> <cf989613-4db0-48f4-823e-1e87e120b0d6@googlegroups.com>

Show Full Headers
Complete Article Headers
X-Received: by 10.36.3.73 with SMTP id e70mr1027685ite.27.1517758368659;        Sun, 04 Feb 2018 07:32:48 -0800 (PST)
X-Received: by 10.157.11.124 with SMTP id p57mr811750otd.5.1517758368490; Sun, 04 Feb 2018 07:32:48 -0800 (PST)
Path: mbox-mo1.pugleaf.net!news-archive.icm.edu.pl!news.icm.edu.pl!news.nask.pl!news.nask.org.pl!news.unit0.net!weretis.net!feeder6.news.weretis.net!feeder.usenetexpress.com!feeder-in1.iad1.usenetexpress.com!border1.nntp.dca1.giganews.com!nntp.giganews.com!o66no116127ita.0!news-out.google.com!k194ni5232itb.0!nntp.google.com!o66no116123ita.0!postnews.google.com!glegroupsg2000goo.googlegroups.com!not-for-mail
Newsgroups: pl.comp.lang.delphi
Date: Sun, 4 Feb 2018 07:32:48 -0800 (PST)
In-Reply-To: <cf989613-4db0-48f4-823e-1e87e120b0d6@googlegroups.com>
Complaints-To: groups-abuse@google.com
Injection-Info: glegroupsg2000goo.googlegroups.com; posting-host=83.22.119.13; posting-account=8ND_mgoAAAD5J9y9fnaTB1Kcu7xKWk7Q
NNTP-Posting-Host: 83.22.119.13
References: <5a70803f$0$694$65785112@news.neostrada.pl> <5a708df3$0$694$65785112@news.neostrada.pl> <5a70a2ad$0$604$65785112@news.neostrada.pl> <cf989613-4db0-48f4-823e-1e87e120b0d6@googlegroups.com>
User-Agent: G2/1.0
MIME-Version: 1.0
Message-ID: <00364a37-7044-41ab-93be-2e65448b7dc5@googlegroups.com>
Subject: Re: Delphi XE2 co wywołało funcję
From: zpksoft <zpksoft@op.pl>
Injection-Date: Sun, 04 Feb 2018 15:32:48 +0000
Lines: 41
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit