Re: Delay in Formless GUI application

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

Article #32506

Back to borland.public.delphi.language.objectpascal Previous Next

#32506

From: Andy Hill
Date: Fri, 22 Nov 2002 16:52

27 lines
1463 bytes

You could try misuse of an event by doing:

program Project1;

uses
   Forms,
   SyncObjs,
   Unit1 in 'Unit1.pas' {Form1};

{$R *.res}

var
   Event: TEvent;
begin
   Event:=TEvent.Create(nil,True,False,'AnEventToWaitFor');
   Event.WaitFor(120000);
   Event.Free;
   Application.Initialize;
   Application.CreateForm(TForm1, Form1);
   Application.Run;
end.


-- 
Andy Hill.

Quidquid latine dictum sit, altum sonatur.

Technical Details

Message-ID: <3DDE60B2.3060101@cairnwebnospam.com>

Path:

arc1-ca.pugleaf.net!archiver1.google.com!news1.google.com!sn-xit-02!sn-xit-05!sn-xit-06!sn-xit-08!supernews.com!newsfeed.news2me.com!fu-berlin.de!news.uni-x.net!newsgroups.borland.com!not-for-mail

References: <j3irtukg6568s7q0ishs57vmrng5g284ra@4ax.com>

Show Full Headers

Complete Article Headers

X-Google-Language: ENGLISH,ASCII-7-bit
X-Google-Thread: 109d30,78305e78c1df1611
X-Google-Attributes: gid109d30,public
X-Google-ArrivalTime: 2002-11-22 09:15:38 PST
Message-ID: <3DDE60B2.3060101@cairnwebnospam.com>
Date: Fri, 22 Nov 2002 16:52:02 +0000
From: Andy Hill <a.hill@cairnwebnospam.com>
User-Agent: Mozilla/5.0 (Windows; U; Windows NT 5.0; en-US; rv:1.0.1) Gecko/20020826
X-Accept-Language: en-us, en
MIME-Version: 1.0
Newsgroups: borland.public.delphi.language.objectpascal
Subject: Re: Delay in Formless GUI application
References: <j3irtukg6568s7q0ishs57vmrng5g284ra@4ax.com>
Content-Type: text/plain; charset=us-ascii; format=flowed
Content-Transfer-Encoding: 7bit
NNTP-Posting-Host: 193.195.130.233
X-Trace: newsgroups.borland.com 1037983985 193.195.130.233 (22 Nov 2002 08:53:05 -0800)
Lines: 28
Path: arc1-ca.pugleaf.net!archiver1.google.com!news1.google.com!sn-xit-02!sn-xit-05!sn-xit-06!sn-xit-08!supernews.com!newsfeed.news2me.com!fu-berlin.de!news.uni-x.net!newsgroups.borland.com!not-for-mail

Reply to Parent Message