Hi John,

If you are using WinNT/2000 (and I'm sure it would work in XP) you can use the SetLayeredWindowAttributes API to make the form transparent. Note: the form must be set "As Top Level" only.

Add to the init of the form:

IF ! 'FOXTOOLS' $ SET('LIBRARY')
	SET LIBRARY TO Home() + "FOXTOOLS.FLL"
ENDIF

** Store the Window Handle
DECLARE SetWindowLong IN Win32Api INTEGER, INTEGER, INTEGER
DECLARE SetLayeredWindowAttributes IN Win32Api INTEGER, STRING, INTEGER, INTEGER
DECLARE GetWindowLong IN Win32Api INTEGER, INTEGER

** You only need the following line if pre VFP7
**THIS.HWND = _WhTohWnd(_WFindTitl(THISFORM.CAPTION))

now call the following from the click of a button.:

nLevel = 75 && Can be a number between 0 and 255
SetWindowLong(THISForm.HWND, -20, 0x00080000)
SetLayeredWindowAttributes(THISForm.HWND, 0, nLevel, 2)

I got this from a post John Koziol made about a year ago. It's very cool.

I wrapped the whole thing up into a class that can do slow disolves and stuff. I can email you a copy if you like.

hth

>Hi,
>Any way to make my form look like WinCE form?
>I used to try Form transmormer v1.1, it is great!!! However, I want more.. :)
>I wish to have a form that transparent to desktop, but the form border still exist, and it work like a glass that will make the part of desktop under my form area look abit blur....
>is it possible to do so?
>
>Thank you