could be right there.
Although I will have to do something a bit special, its an MDI parent 
form...doh.

Jeremy

-----Original Message-----
From: "Andreas Toth" <[EMAIL PROTECTED]>
To: Multiple recipients of list delphi <[EMAIL PROTECTED]>
Date: Wed, 6 Nov 2002 11:50:09 +1300
Subject: RE: [DUG]:  Win9x logout type screen

> Not considering the disabling-of-the-desktop feature, the actual visual
> effect you're talking about, didn't it just draw every second line
> black
> similar to the following example, or did it do something fancier?
> 
> var
>   Row: Integer;
> begin
>   for Row := 0 to Pred(Height) do
>   begin
>     if not Odd(Row) then
>     begin
>       Canvas.Pen.Color  := clBlack;
>       Canvas.Pen.Style  := psSolid;
>       Canvas.Pen.Width  := 1;
>       Canvas.MoveTo(0, Row);
>       Canvas.LineTo(Width, Row);
>     end;
>   end;
> end;
> 
> -----Original Message-----
> From: [EMAIL PROTECTED] [mailto:owner-delphi@;delphi.org.nz]On
> Behalf Of vss
> Sent: Wednesday, 6 November 2002 10:30
> To: Multiple recipients of list delphi
> Subject: [DUG]: Win9x logout type screen
> 
> 
> Hi all
> IF ytou can remember back to windows 9x when you wanted to shut down,
> it
> gave you another screen that you selected what you wanted to do, BUT
> the
> important thing, is it drew like a curtain in the back ground to
> disable
> the whole of the background.
> I remembered seeing a control that did this back I think either delphi
> 1
> or Delphi 2, but ti was a DCU, and the auther never replied back then,
> so I doubt they will now :-)
> 
> Has anyone seen code to draw the background like I am wanting to do?
> 
> Thanks, Jeremy
> 
> -----------------------------------------------------------------------
> ----
>     New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
>                   Website: http://www.delphi.org.nz
> To UnSub, send email to: [EMAIL PROTECTED]
> with body of "unsubscribe delphi"
> Web Archive at: http://www.mail-archive.com/delphi%40delphi.org.nz/
> 
> -----------------------------------------------------------------------
> ----
>     New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
>                   Website: http://www.delphi.org.nz
> To UnSub, send email to: [EMAIL PROTECTED] 
> with body of "unsubscribe delphi"
> Web Archive at: http://www.mail-archive.com/delphi%40delphi.org.nz/

---------------------------------------------------------------------------
    New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
                  Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED] 
with body of "unsubscribe delphi"
Web Archive at: http://www.mail-archive.com/delphi%40delphi.org.nz/

Reply via email to