Sybase NNTP forums - End Of Life (EOL)

The NNTP forums from Sybase - forums.sybase.com - are now closed.

All new questions should be directed to the appropriate forum at the SAP Community Network (SCN).

Individual products have links to the respective forums on SCN, or you can go to SCN and search for your product in the search box (upper right corner) to find your specific developer center.

Transparant window

3 posts in Objects Last posting was on 2003-03-03 13:54:34.0Z
Shrek Posted on 2003-02-28 08:27:33.0Z
Newsgroups: sybase.public.powerbuilder.objects
From: "Shrek" <Shrek@hotmail.com>
Subject: Transparant window
Date: Fri, 28 Feb 2003 09:27:33 +0100
Lines: 8
X-Priority: 3
X-MSMail-Priority: Normal
X-Newsreader: Microsoft Outlook Express 6.00.2800.1106
X-MimeOLE: Produced By Microsoft MimeOLE V6.00.2800.1106
NNTP-Posting-Host: 193.190.121.69
Message-ID: <364_FtEbIYw3CHA.235@forums.sybase.com>
Path: forums-1-dub!forums-1-dub!forums-master.sybase.com!forums.sybase.com
Xref: forums-1-dub sybase.public.powerbuilder.objects:7219
Article PK: 734511

Hello,

Anybody knows how to make a window transparant.
(I know this can be done in Win 2000, but I can't find the correct api call)

TIA


Andy Turiansky [TeamSybase] Posted on 2003-03-02 03:11:28.0Z
Newsgroups: sybase.public.powerbuilder.objects
Reply-To: "Andy Turiansky [TeamSybase]" <NOSPAM@aturiansky@comcast.net>
From: "Andy Turiansky [TeamSybase]" <aturiansky@comcast.net>
Subject: Re: Transparant window
Date: Sat, 1 Mar 2003 22:11:28 -0500
Lines: 43
X-Priority: 3
X-MSMail-Priority: Normal
X-Newsreader: Microsoft Outlook Express 6.00.2800.1123
X-MimeOLE: Produced By Microsoft MimeOLE V6.00.2800.1123
NNTP-Posting-Host: pcp02145427pcs.kenets01.pa.comcast.net 68.82.176.120
Message-ID: <364_4chmCwG4CHA.261@forums.sybase.com>
References: <364_FtEbIYw3CHA.235@forums.sybase.com>
Path: forums-1-dub!forums-1-dub!forums-master.sybase.com!forums.sybase.com
Xref: forums-1-dub sybase.public.powerbuilder.objects:7222
Article PK: 734508

This worked in PB 6.5.. give it a try
// Add the external function prototypes
FUNCTION LONG GetWindowLongA (ULONG a_hWnd, LONG a_nIndex) &
LIBRARY "USER32.DLL"

FUNCTION LONG SetWindowLongA (ULONG a_hWnd, LONG a_nIndex, &
LONG dwNewLong) &
LIBRARY "USER32.DLL"

// In open event of window add the following code
CONSTANT LONG GWL_EXSTYLE= -20
CONSTANT ULONG WS_EX_TRANSPARENT = 32
ULONG ul_style
ULONG ul_hWnd

// Get the existing extended style in the window structure
ul_hWnd = Handle (THIS)
ul_style = GetWindowLongA (ul_hWnd, GWL_EXSTYLE)
// Append the transparent style to it and update window structure
ul_style += WS_EX_TRANSPARENT
SetWindowLongA (ul_hWnd, GWL_EXSTYLE, ul_style)

--
Andy Turiansky [TeamSybase]

----------------------------------------------------------------------------
----

"Shrek" <Shrek@hotmail.com> wrote in message
news:FtEbIYw3CHA.235@forums.sybase.com...
> Hello,
>
> Anybody knows how to make a window transparant.
> (I know this can be done in Win 2000, but I can't find the correct api
call)
>
> TIA
>
>


Charles Enwesi Posted on 2003-03-03 13:54:34.0Z
Newsgroups: sybase.public.powerbuilder.objects
Date: Mon, 03 Mar 2003 08:54:34 -0500
From: Charles Enwesi <uche@wam.umd.edu>
User-Agent: Mozilla/5.0 (Windows; U; Windows NT 5.0; en-US; rv:1.0.2) Gecko/20021120 Netscape/7.01
X-Accept-Language: en-us, en
MIME-Version: 1.0
Subject: Re: Transparant window
Content-Type: text/plain; charset=us-ascii; format=flowed
Content-Transfer-Encoding: 7bit
Lines: 24
NNTP-Posting-Host: servbldg-382.umd.edu 128.8.187.126
Message-ID: <364_3E635E9A.2050205@wam.umd.edu>
References: <364_FtEbIYw3CHA.235@forums.sybase.com> <364_4chmCwG4CHA.261@forums.sybase.com>
Path: forums-1-dub!forums-1-dub!forums-master.sybase.com!forums.sybase.com
Xref: forums-1-dub sybase.public.powerbuilder.objects:7224
Article PK: 734514

I have a visual userobject (i guess u can call it window) type, i tried
this code and it does not work? Any ideas

Andy Turiansky [TeamSybase] wrote:
> This worked in PB 6.5.. give it a try
> // Add the external function prototypes
> FUNCTION LONG GetWindowLongA (ULONG a_hWnd, LONG a_nIndex) &
> LIBRARY "USER32.DLL"
>
> FUNCTION LONG SetWindowLongA (ULONG a_hWnd, LONG a_nIndex, &
> LONG dwNewLong) &
> LIBRARY "USER32.DLL"
>
> // In open event of window add the following code
> CONSTANT LONG GWL_EXSTYLE= -20
> CONSTANT ULONG WS_EX_TRANSPARENT = 32
> ULONG ul_style
> ULONG ul_hWnd
>
> // Get the existing extended style in the window structure
> ul_hWnd = Handle (THIS)
> ul_style = GetWindowLongA (ul_hWnd, GWL_EXSTYLE)
> // Append the transparent style to it and update window structure
> ul_style += WS_EX_TRANSPARENT
> SetWindowLongA (ul_hWnd, GWL_EXSTYLE, ul_style)
>