Re: To Increase Speed of an application
"Gerald J. Clancy, Jr." <[email protected]>
| Newsgroups | gmane.comp.lang.delphi.programming |
|---|---|
| Message-ID | <[email protected]> |
You could AutoCreate the form(s) in the project file and not free them, but
this sucks resources. Would work if you don't have too many forms. It could
also affect what you want to do in the FormCreate event.
Jerry
At 04:06 PM 7/31/2003, you wrote:
>Hi,
>
>What about the changes below:
>
> > procedure TFrmMain.frm1Click(Sender: TObject);
> > var
> > I,j: Integer;
> > begin
> > j:=0;
> > if ChkPlant() = false then
> > exit;
> > Screen.Cursor := crHourglass;
> {Checks to see if the FRM1 is not already created}
> if not assigned(FRM1) then
> {if FRM1 is not created, then create it}
> FRM1 := TFRM1.Create(Application);
> > FRM1.ShowModal ;
> > FRM1.free;
> > Screen.Cursor := crDefault;
> > end;
>
>
>--
>Best regards,
> Daniel Rail
> Senior System Engineer
> ACCRA Group Inc. (www.accra.ca)
> ACCRA Med Software Inc. (www.filopto.com)
------------------------ Yahoo! Groups Sponsor ---------------------~-->
Buy Ink Cartridges or Refill Kits for Your HP, Epson, Canon or Lexmark
Printer at Myinks.com. Free s/h on orders $50 or more to the US & Canada. http://www.c1tracking.com/l.asp?cid=5511
http://us.click.yahoo.com/sO0ANB/LIdGAA/ySSFAA/i7folB/TM
---------------------------------------------------------------------~->
CodeCoffer - new Delphi code protection Tool!
http://www.delphicollection.com/public/CodeCoffer.htm
---------------------------------------------------------------
Unsubscribe:[email protected]
List owner:[email protected]
---------------------------------------------------------------
Your use of Yahoo! Groups is subject to http://docs.yahoo.com/info/terms/