Yes, and watch out for Windows 2003 TS - this does not seem to support Alphablend, so is specific to Windows 5.1 not 5.2
John -----Original Message----- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Kyley Harris Sent: Wednesday, 29 March 2006 4:27 p.m. To: 'NZ Borland Developers Group - Delphi List' Subject: RE: [DUG] Transparent Forms AlphaBlending is only on XP I think. But there is another way to do splash screens, by overriding forms CreateParams and turning off the OPAQUE setting. type TMyForm = class(TForm) procedure FormCreate(Sender: TObject); procedure CreateParams(var Params: TCreateParams); override; end; procedure TMyForm.CreateParams(var Params: TCreateParams); begin inherited CreateParams(Params); // this is the important constant! Params.ExStyle:= Params.ExStyle or WS_EX_TRANSPARENT; end; Procedure TMyForm.FormCreate(Sender: TObject); begin inherited; Canvas.Brush.Style := bsClear; end; -----Original Message----- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Matthew Comb Sent: Wednesday, 29 March 2006 4:19 p.m. To: [EMAIL PROTECTED]; NZ Borland Developers Group - Delphi List Subject: Re: [DUG] Transparent Forms Rohit, Just a question if you know it. What are the restrictions on AlphaBlending under windows. I had a feeling that it required XP but could be wrong. Matt. > Look at ALphaBlendxxx and TransparentColorxxx > > I have only played with it and came to the conclusion that it was good > for two things. Games and Viruses. Oh, you could have some fun and > games with it. Luckily, I am not a practical joker. > > Date sent: Wed, 29 Mar 2006 15:54:52 +1200 > From: Alister Christie <[EMAIL PROTECTED]> > To: NZ Borland Developers Group - Delphi List > <[email protected]> > Subject: [DUG] Transparent Forms > Send reply to: NZ Borland Developers Group - Delphi List > <[email protected]> > <mailto:[EMAIL PROTECTED]> > <mailto:[EMAIL PROTECTED]> > > [ Double-click this line for list subscription options ] > > I'm interested in doing a fancy transparent forms (for a splash screen). > Ideally I'd just place a PNG onto the form and the transparancy > would be worked out based on the alpha chanel of the PNG. > > Has anyone done anything like this? > > -- > Alister Christie > Computers for People > Ph: 04 471 1849 Fax: 04 471 1266 http://www.salespartner.co.nz PO Box > 13085 Johnsonville > Wellington > _______________________________________________ > Delphi mailing list > [email protected] > http://ns3.123.co.nz/mailman/listinfo/delphi > Regards > > Rohit > > ====================================================================== > CFL - Computer Fanatics Ltd. 21 Barry's Point Road, AKL, New Zealand > PH (649) 489-2280 > FX (649) 489-2290 > email [EMAIL PROTECTED] or [EMAIL PROTECTED] > ====================================================================== > > > _______________________________________________ > Delphi mailing list > [email protected] http://ns3.123.co.nz/mailman/listinfo/delphi > _______________________________________________ Delphi mailing list [email protected] http://ns3.123.co.nz/mailman/listinfo/delphi _______________________________________________ Delphi mailing list [email protected] http://ns3.123.co.nz/mailman/listinfo/delphi __________ NOD32 1.1460 (20060328) Information __________ This message was checked by NOD32 antivirus system. http://www.eset.com _______________________________________________ Delphi mailing list [email protected] http://ns3.123.co.nz/mailman/listinfo/delphi
