>* Fix Image Transparency >* VFP/GDI+ has a bug where image transparency is not respected on buttons >* The solution is to load the picture in an image control first >* This program clears the image from cache and reloads it in an image control >Lparameters loControl as CommandButton >Local lcPicture, loImage as Image > >* Only applies to formats that support transparency >lcPicture = loControl.Picture >If Empty(lcPicture) or !InList(Upper(JustExt(lcPicture)),"JPG","PNG","GIF") > Return >EndIf > >* Clear image from cache >loControl.Picture = "" >Clear Resources (lcPicture) > >* Reload picture in Image control >loImage = CreateObject("Image") >loImage.Picture = lcPicture > >* Reset Picture on control >loControl.Picture = lcPicture >>