🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: borland.public.delphi.winforms.controls.using
Article #140

Re: closing a form

#140
From: Marc Rohloff TeamB
Date: Mon, 19 Jun 2006 22:57
25 lines
1747 bytes
On Sun, 18 Jun 2006 11:24:55 +0200, Guido Cavalera wrote:

> Class Function TfrmMenu.ShowMenu:System.Windows.Forms.DialogResult;
> Begin
>   With TfrmMenu.Create Do
>     Result:=ShowDialog();
> End;

You need to free resources when you are done with them.
Try:

Class Function TfrmMenu.ShowMenu:System.Windows.Forms.DialogResult;
  var f:TfrmMenu;
Begin
  f := TfrmMenu.Create;
  try
    Result:=ShowDialog();
  finally
    f.Free;
  end;   
End;

-- 
Marc Rohloff [TeamB]
marc rohloff -at- myrealbox -dot- com
Technical Details
Message-ID: <1oft4uvp9nzqo.dlg@dlg.marcrohloff.com>
Path: arc1-ca.pugleaf.net!g2news2.google.com!news3.google.com!news4.google.com!border1.nntp.dca.giganews.com!nntp.giganews.com!newsfeed00.sul.t-online.de!newsfeed01.sul.t-online.de!t-online.de!newsgroups.borland.com!not-for-mail
References: <4493e05e@newsgroups.borland.com> <wknorh5mcznl.dlg@dlg.marcrohloff.com> <44951be1@newsgroups.borland.com>

Show Full Headers
Complete Article Headers
X-Google-Thread: 1eff29,78d0e9f49945f91c
X-Google-Attributes: gid1eff29,public
X-Google-Language: ENGLISH,ASCII-7-bit
From: "Marc Rohloff [TeamB]" <"on request">
Subject: Re: closing a form
Newsgroups: borland.public.delphi.winforms.controls.using
User-Agent: 40tude_Dialog/2.0.15.1
MIME-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Content-Transfer-Encoding: 7bit
References: <4493e05e@newsgroups.borland.com> <wknorh5mcznl.dlg@dlg.marcrohloff.com> <44951be1@newsgroups.borland.com>
Date: Mon, 19 Jun 2006 18:57:10 -0400
Message-ID: <1oft4uvp9nzqo.dlg@dlg.marcrohloff.com>
X-Face: "huzh55Xi]!ZNni78>a*5+).`SK?<^q2MlHk-C]Z2M9T@\J5ZCB$95Ey+s"XQuhGFA[eutZ :0^AV!Q;t>gE`1-=8d;HZ6~*o1dH<X9\b$!|(}+I'!Xq)@3Op}%0ArW&nf'Qh*EwR
X-Antivirus: avast! (VPS 0625-1, 06/19/2006), Outbound message
X-Antivirus-Status: Clean
NNTP-Posting-Host: 65.31.1.121
X-Trace: newsgroups.borland.com 1150757839 65.31.1.121 (19 Jun 2006 15:57:19 -0700)
Lines: 25
X-Authenticated-User: mrohloff
Path: arc1-ca.pugleaf.net!g2news2.google.com!news3.google.com!news4.google.com!border1.nntp.dca.giganews.com!nntp.giganews.com!newsfeed00.sul.t-online.de!newsfeed01.sul.t-online.de!t-online.de!newsgroups.borland.com!not-for-mail