🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: borland.public.delphi.language.objectpascal
Article #47

OpenDialog Generates 216 error on exit

#47
From: jhayward
Date: Tue, 08 Nov 2005 07:50
23 lines
1805 bytes
I have an application Built in Delphi 7 (Build 4.453).

The App. runs, and exits without error, Unless I call
OpenDialog.Execute.

I can start the App and close it, No problem.

If I start the App. and Click a button I dropped on just for this test
(Code Follows) Then exit (Selecting a file not required) I get a 216
after the End is called by my Project file.

Button code:

procedure TfrmParser.ToolButton5Click(Sender: TObject);
begin
  OpenDialog1.Execute;
end;

madExcept says the error is happening on Halt0 after Application.Run
has terminated (Got the idea of getting mad ;-) from another thread
here.

Is there a bug in Dialogs?
Technical Details
Message-ID: <1131436216.825055.324000@g49g2000cwa.googlegroups.com>
Path: arc1-ca.pugleaf.net!g2news1.google.com!postnews.google.com!g49g2000cwa.googlegroups.com!not-for-mail

Show Full Headers
Complete Article Headers
X-Google-Thread: 109d30,c5fe305e39bb363c,start
X-Google-Attributes: gid109d30,public
X-Google-Language: ENGLISH,ASCII-7-bit
Path: arc1-ca.pugleaf.net!g2news1.google.com!postnews.google.com!g49g2000cwa.googlegroups.com!not-for-mail
From: "jhayward@convertabase.com" <jhayward@convertabase.com>
Newsgroups: borland.public.delphi.language.objectpascal
Subject: OpenDialog Generates 216 error on exit
Date: 7 Nov 2005 23:50:16 -0800
Organization: http://groups.google.com
Lines: 24
Message-ID: <1131436216.825055.324000@g49g2000cwa.googlegroups.com>
NNTP-Posting-Host: 67.107.199.157
Mime-Version: 1.0
Content-Type: text/plain; charset="iso-8859-1"
X-Trace: posting.google.com 1131436221 2161 127.0.0.1 (8 Nov 2005 07:50:21 GMT)
X-Complaints-To: groups-abuse@google.com
NNTP-Posting-Date: Tue, 8 Nov 2005 07:50:21 +0000 (UTC)
User-Agent: G2/0.2
X-HTTP-UserAgent: Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1; SV1; .NET CLR 1.1.4322; .NET CLR 1.0.3705),gzip(gfe),gzip(gfe)
Complaints-To: groups-abuse@google.com
Injection-Info: g49g2000cwa.googlegroups.com; posting-host=67.107.199.157;
   posting-account=m0CV6wwAAACPh38hKDhGZwQK0aB_Cr9A