Re: Delphi i problemik

Article View: alt.pl.mag.at

Article #35986

#35986

From: Stanislaw Kulczycki
Date: Tue, 03 May 2005 17:25

22 lines
1364 bytes

Raph Wrote:
(...)

Delphi juz nie pamietam... ale moze o to Ci chodzilo

procedure TForm1.btnWyjscieClick(Sender: TObject);
var
    decision: integer;
begin
      decision := Application.MessageBox('Na pewno chcesz
 zakończyć?','Potwierdzenie',MB_YesNo+MB_IconQuestion);

     if decision=IDYes then
        Close();
end;



-- 
Grung[@t]kce.one.pl
GG: 1430624
http://www.freebyte.one.pl

Technical Details

Message-ID: <d58c9l$jpi$1@nemesis.news.tpi.pl>

Path:

mbox-mo1.pugleaf.net!news-archive.icm.edu.pl!newsfeed.gazeta.pl!news.onet.pl!newsfeed.tpinternet.pl!nemesis.news.tpi.pl!news.tpi.pl!not-for-mail

References: <4277acce@news.home.net.pl>

Show Full Headers

Complete Article Headers

Path: mbox-mo1.pugleaf.net!news-archive.icm.edu.pl!newsfeed.gazeta.pl!news.onet.pl!newsfeed.tpinternet.pl!nemesis.news.tpi.pl!news.tpi.pl!not-for-mail
From: Stanislaw Kulczycki <grung@fatcat.ftj.agh.edu.pl>
Newsgroups: alt.pl.mag.at
Subject: Re: Delphi i problemik
Date: Tue, 03 May 2005 19:25:32 +0200
Organization: tp.internet - http://www.tpi.pl/
Lines: 22
Message-ID: <d58c9l$jpi$1@nemesis.news.tpi.pl>
References: <4277acce@news.home.net.pl>
NNTP-Posting-Host: bru25.neoplus.adsl.tpnet.pl
Mime-Version: 1.0
X-Trace: nemesis.news.tpi.pl 1115141237 20274 83.29.114.25 (3 May 2005 17:27:17 GMT)
X-Complaints-To: usenet@tpi.pl
NNTP-Posting-Date: Tue, 3 May 2005 17:27:17 +0000 (UTC)
User-Agent: Mozilla Thunderbird 1.0.2 (X11/20050325)
X-Accept-Language: en-us, en
In-Reply-To: <4277acce@news.home.net.pl>
X-Enigmail-Version: 0.90.2.0
X-Enigmail-Supports: pgp-inline, pgp-mime
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

Reply to Parent Message