gnustep/libs-back
0
0
Fork 0
mirror of https://github.com/gnustep/libs-back.git synced 2025-04-22 15:31:14 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions

Implement transparent windows on MS Windows.

Browse source 
git-svn-id: svn+ssh://svn.gna.org/svn/gnustep/libs/back/trunk@26963 72102866-910b-0410-8b05-ffd578937521
This commit is contained in:
fredkiefer 2008-10-24 17:35:45 +00:00
parent e8f4f76ae1
commit 666ead1082
3 changed files with 49 additions and 24 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

7
ChangeLog
View file

@ -1,3 +1,10 @@
2008-10-24 Fred Kiefer <FredKiefer@gmx.de>
* Source/win32/WIN32Server.m (-setalpha::): Implement transparent
windows.
* Source/winlib/WIN32GState.m (-DPSimage:...:): Call
SetStretchBltMode() before scaling a bitmap.
2008-10-24 Fred Kiefer <FredKiefer@gmx.de>
* Tools/xpbs.m (+initializePasteboard): Use XInternAtom when

17
Source/win32/WIN32Server.m
View file

@ -1442,6 +1442,23 @@ NSLog(@"Callback");
SetFocus((HWND)winNum);
}
- (void) setalpha: (float)alpha: (int) win
{
if (alpha > 0.99)
{
SetWindowLong((HWND)win, GWL_EXSTYLE,
GetWindowLong((HWND)win, GWL_EXSTYLE) & ~WS_EX_LAYERED);
RedrawWindow((HWND)win, NULL, NULL,
RDW_ERASE | RDW_INVALIDATE | RDW_FRAME | RDW_ALLCHILDREN);
}
else
{
SetWindowLong((HWND)win, GWL_EXSTYLE,
GetWindowLong((HWND)win, GWL_EXSTYLE) | WS_EX_LAYERED);
SetLayeredWindowAttributes((HWND)win, 0, 255 * alpha, LWA_ALPHA);
}
}
- (NSPoint) mouselocation
{
POINT p;

49
Source/winlib/WIN32GState.m
View file

@ -224,8 +224,8 @@ RECT GSViewRectToWin(WIN32GState *s, NSRect r)
hDC = [self getHDC];
if (!hDC)
{
[source releaseHDC: sourceDC];
return;
[source releaseHDC: sourceDC];
return;
}
}
@ -234,35 +234,35 @@ RECT GSViewRectToWin(WIN32GState *s, NSRect r)
case NSCompositeSourceOver:
{
#ifdef USE_ALPHABLEND
// Use (0..1) fraction to set a (0..255) alpha constant value
BYTE SourceConstantAlpha = (BYTE)(delta * 255);
BLENDFUNCTION blendFunc
= {AC_SRC_OVER, 0, SourceConstantAlpha, AC_SRC_ALPHA};
success = AlphaBlend(hDC,
x, y, w, h,
sourceDC,
rectFrom.left, rectFrom.top,
w, h, blendFunc);
/* There is actually a very real chance this could fail, even on
computers that supposedly support it. It's not known why it
fails though... */
if (success)
break;
// Use (0..1) fraction to set a (0..255) alpha constant value
BYTE SourceConstantAlpha = (BYTE)(delta * 255);
BLENDFUNCTION blendFunc
= {AC_SRC_OVER, 0, SourceConstantAlpha, AC_SRC_ALPHA};
success = AlphaBlend(hDC,
x, y, w, h,
sourceDC,
rectFrom.left, rectFrom.top,
w, h, blendFunc);
/* There is actually a very real chance this could fail, even on
computers that supposedly support it. It's not known why it
fails though... */
if (success)
break;
#endif
}
case NSCompositeCopy:
{
success = BitBlt(hDC, x, y, w, h,
sourceDC, rectFrom.left, rectFrom.top, SRCCOPY);
break;
success = BitBlt(hDC, x, y, w, h,
sourceDC, rectFrom.left, rectFrom.top, SRCCOPY);
break;
}
case NSCompositeClear:
{
break;
break;
}
default:
success = BitBlt(hDC, x, y, w, h,
sourceDC, rectFrom.left, rectFrom.top, SRCCOPY);
sourceDC, rectFrom.left, rectFrom.top, SRCCOPY);
break;
}
@ -270,9 +270,9 @@ RECT GSViewRectToWin(WIN32GState *s, NSRect r)
{
NSLog(@"Blit operation failed %d", GetLastError());
NSLog(@"Orig Copy Bits to %@ from %@", NSStringFromPoint(destPoint),
NSStringFromRect(destRect));
NSStringFromRect(destRect));
NSLog(@"Copy bits to {%d, %d} from {%d, %d} size {%d, %d}", x, y,
rectFrom.left, rectFrom.top, w, h);
rectFrom.left, rectFrom.top, w, h);
}
if (self != source)
@ -667,7 +667,8 @@ HBITMAP GSCreateBitmap(HDC hDC, int pixelsWide, int pixelsHigh,
if ((GetDeviceCaps(hDC, RASTERCAPS) & RC_BITBLT))
{
// FIXME: Should we call SetStretchBltMode first?
SetStretchBltMode(hDC, COLORONCOLOR);
if (!PlgBlt(hDC, pa, hDC2, 0, 0, pixelsWide, pixelsHigh, 0, 0, 0))
{
NSLog(@"Copy bitmap failed %d", GetLastError());