🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: borland.public.cppbuilder.nativeapi
Article #8350

Re: Allowing app to close when system asks, but prompt for user

#8350
From: Oren Halvani
Date: Tue, 02 Nov 2004 00:39
22 lines
1449 bytes
// in header

protected:
  BEGIN_MESSAGE_MAP
     VCL_MESSAGE_HANDLER(WM_QUERYENDSESSION, TMessage, OnQueryEndSession)
  END_MESSAGE_MAP(TForm)
  void __fastcall OnQueryEndSession(TMessage & Msg);

// in unit

void __fastcall TForm1::OnQueryEndSession(TMessage &Msg)
{

  TObject::Dispatch(&Msg);
  Close();
}

hope, this will work for you..



Oren
Technical Details
Message-ID: <4186d785$1@newsgroups.borland.com>
Path: arc1-ca.pugleaf.net!g2news1.google.com!news2.google.com!proxad.net!213.200.89.82.MISMATCH!tiscali!newsfeed1.ip.tiscali.net!newsfeed00.sul.t-online.de!newsfeed01.sul.t-online.de!t-online.de!newsgroups.borland.com!not-for-mail
References: <4186b4ba$1@newsgroups.borland.com> <4186b6d1$1@newsgroups.borland.com> <4186c388$1@newsgroups.borland.com> <4186c8dd$1@newsgroups.borland.com>

Show Full Headers
Complete Article Headers
X-Google-Thread: 10cc67,ed85e305ef3f7bba
X-Google-Attributes: gid10cc67,public
X-Google-Language: ENGLISH,ASCII-7-bit
Reply-To: "Oren Halvani" <NoSpam@fdtd.com>
From: "Oren Halvani" <NoSpam@fdtd.com>
Newsgroups: borland.public.cppbuilder.nativeapi
References: <4186b4ba$1@newsgroups.borland.com> <4186b6d1$1@newsgroups.borland.com> <4186c388$1@newsgroups.borland.com> <4186c8dd$1@newsgroups.borland.com>
Subject: Re: Allowing app to close when system asks, but prompt for user
Date: Tue, 2 Nov 2004 01:39:50 +0100
Lines: 24
X-Priority: 3
X-MSMail-Priority: Normal
X-Newsreader: Microsoft Outlook Express 6.00.2800.1106
X-MimeOLE: Produced By Microsoft MimeOLE V6.00.2800.1106
NNTP-Posting-Host: 217.234.112.234
Message-ID: <4186d785$1@newsgroups.borland.com>
X-Trace: newsgroups.borland.com 1099356037 217.234.112.234 (1 Nov 2004 16:40:37 -0700)
Path: arc1-ca.pugleaf.net!g2news1.google.com!news2.google.com!proxad.net!213.200.89.82.MISMATCH!tiscali!newsfeed1.ip.tiscali.net!newsfeed00.sul.t-online.de!newsfeed01.sul.t-online.de!t-online.de!newsgroups.borland.com!not-for-mail