🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

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

Re: Non-Modal for from Applet

#32406
From: Robert Kuhlmann
Date: Sun, 24 Nov 2002 19:43
25 lines
1634 bytes
adem schrieb:
>... 
> It briefly shows up and disappears.. What can I do to make it stay until
> the user closes it?
I assume "disappears" doesn't mean it is destroyed, just not visible any
more?

Then this may help
> Function CPlApplet(hWndCPL: hWnd; iMEssage: integer; lParam1: longint;
> lParam2: longint): LongInt Stdcall;
> Begin
>   Case iMessage Of
>     CPL_DBLCLK: Begin {Your code for dblclick handler here}
>         If Assigned(MyForm) Then MyForm.Show
>         Else Begin
>           MyForm := TMyForm.Create(Nil);
            MyForm.FormStyle := fsStayOnTop; //<<<
>           MyForm.Show;
>         End;
>       End;
>   End;
> End;

Bye
Robert
Technical Details
Message-ID: <3DE12BC7.9D57EE28@ewetel.net>
Path: arc1-ca.pugleaf.net!archiver1.google.com!news1.google.com!sn-xit-02!sn-xit-05!sn-xit-01!sn-xit-08!supernews.com!news.tele.dk!news.tele.dk!small.news.tele.dk!fu-berlin.de!news.uni-x.net!newsgroups.borland.com!not-for-mail
References: <3de0154e@newsgroups.borland.com>

Show Full Headers
Complete Article Headers
X-Google-Language: ENGLISH,ASCII-7-bit
X-Google-Thread: 109d30,f5d1b5cd7e4f9d2c
X-Google-Attributes: gid109d30,public
X-Google-ArrivalTime: 2002-11-24 12:15:20 PST
Message-ID: <3DE12BC7.9D57EE28@ewetel.net>
Date: Sun, 24 Nov 2002 20:43:03 +0100
From: Robert Kuhlmann <robert.kuhlmann1@ewetel.net>
X-Mailer: Mozilla 4.7 [de] (Win98; I)
X-Accept-Language: de
MIME-Version: 1.0
Newsgroups: borland.public.delphi.language.objectpascal
Subject: Re: Non-Modal for from Applet
References: <3de0154e@newsgroups.borland.com>
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
NNTP-Posting-Host: 80.228.80.188
X-Trace: newsgroups.borland.com 1038166983 80.228.80.188 (24 Nov 2002 11:43:03 -0800)
Lines: 25
Path: arc1-ca.pugleaf.net!archiver1.google.com!news1.google.com!sn-xit-02!sn-xit-05!sn-xit-01!sn-xit-08!supernews.com!news.tele.dk!news.tele.dk!small.news.tele.dk!fu-berlin.de!news.uni-x.net!newsgroups.borland.com!not-for-mail