Programming AmigaOS 4: Transparent Windows - Revision history

Costel Mincea: Text replacement - "" to ""

2025-01-26T19:05:36Z

Text replacement - "<syntaxhighlight>" to "<syntaxhighlight lang="C" line>"

← Older revision		Revision as of 19:05, 26 January 2025
Line 9:		Line 9:
	In order to be able to use compositing you need AmigaOS in the version 4.1 (so, SysBase->lib_Version >= 53). Moreover, your screen must have a colour depth of at least 16 Bit (so Highcolour or Truecolour). The user can also set in the GUI-Prefs whether transparency is allowed. 'Visual effects for layer' must be activated for it. You can certainly check that in the following way:		In order to be able to use compositing you need AmigaOS in the version 4.1 (so, SysBase->lib_Version >= 53). Moreover, your screen must have a colour depth of at least 16 Bit (so Highcolour or Truecolour). The user can also set in the GUI-Prefs whether transparency is allowed. 'Visual effects for layer' must be activated for it. You can certainly check that in the following way:

	<syntaxhighlight>		<syntaxhighlight lang="C" line>
	if(( dri = IIntuition->GetScreenDrawInfo(window->WScreen) ))		if(( dri = IIntuition->GetScreenDrawInfo(window->WScreen) ))
	{		{
Line 28:		Line 28:
	You can also change all three tags retrospectively:		You can also change all three tags retrospectively:

	<syntaxhighlight>		<syntaxhighlight lang="C" line>
	Intuition->SetWindowAttrs(window,WA_Opaqueness,opaqueness,TAG_END);		Intuition->SetWindowAttrs(window,WA_Opaqueness,opaqueness,TAG_END);
	</syntaxhighlight>		</syntaxhighlight>
Line 34:		Line 34:
	On the other hand, you can request the current tag values with		On the other hand, you can request the current tag values with

	<syntaxhighlight>		<syntaxhighlight lang="C" line>
	IIntuition->GetAttr(WA_Opaqueness,winobj,&opaqueness)		IIntuition->GetAttr(WA_Opaqueness,winobj,&opaqueness)
	</syntaxhighlight>		</syntaxhighlight>
Line 40:		Line 40:
	The so far covered details are included in the sample program "OpaquenessExample.c", where you can try them out.		The so far covered details are included in the sample program "OpaquenessExample.c", where you can try them out.

	<syntaxhighlight>		<syntaxhighlight lang="C" line>
	/* Michael Christoph		/* Michael Christoph
	* OpaquenessExample.c		* OpaquenessExample.c
Line 255:		Line 255:
	IIntuition->ObtainBitMapInstance() declares a pointer to the image management. To get the actual image data you must request the desired values with IIntuition->BitMapInstanceControl(). Some important tags are here BMICTRL_GetWidth and BMICTRL_GetHeight for the size as well as BMICTRL_GetBitMap and BMICTRL_GetAlphaMap for the image data, i.e., the alpha mask. There is IIntuition->ReleaseBitMapInstance() and Iintuition->ReleaseBitMapSource() for release. The functions that you will need are compiled in the following list. The image data can be drawn with the usual functions such as IGraphics->BltBitMapTags().		IIntuition->ObtainBitMapInstance() declares a pointer to the image management. To get the actual image data you must request the desired values with IIntuition->BitMapInstanceControl(). Some important tags are here BMICTRL_GetWidth and BMICTRL_GetHeight for the size as well as BMICTRL_GetBitMap and BMICTRL_GetAlphaMap for the image data, i.e., the alpha mask. There is IIntuition->ReleaseBitMapInstance() and Iintuition->ReleaseBitMapSource() for release. The functions that you will need are compiled in the following list. The image data can be drawn with the usual functions such as IGraphics->BltBitMapTags().

	<syntaxhighlight>		<syntaxhighlight lang="C" line>
	struct Screen *scr;		struct Screen *scr;
	APTR source;		APTR source;
Line 299:		Line 299:
	The existing clipping system has been expanded in order to be able to set the areas in a window that display contents, that is, that let the background show through. With ILayers->InstallClipRegion() you could set even earlier rectangular areas in a window, in which a blit operation can draw data. This way, you can, for example, protect separate areas of a window too, if graphic data is larger than the window. However, in order to apply the ClipRect structure to an alpha channel you must use a private function of the layers. library:		The existing clipping system has been expanded in order to be able to set the areas in a window that display contents, that is, that let the background show through. With ILayers->InstallClipRegion() you could set even earlier rectangular areas in a window, in which a blit operation can draw data. This way, you can, for example, protect separate areas of a window too, if graphic data is larger than the window. However, in order to apply the ClipRect structure to an alpha channel you must use a private function of the layers. library:

	<syntaxhighlight>		<syntaxhighlight lang="C" line>
	ILayers->AllocClipRect()		ILayers->AllocClipRect()
	</syntaxhighlight>		</syntaxhighlight>
Line 305:		Line 305:
	This is provided exclusively for this task. The counterpart to it is ILayers->FreeClipRect(), that releases again the structure. The structure is already pre-initialised, so that only a few fields must be adjusted to your needs. On the one hand, you must store the graphic size in "bounds" and enter it in "BitMap". The required memory area for it can be created with IGraphics->AllocBitMap(). Then you must also blit the alpha-channel bitmap with IGraphics->BltBitMapTags(). The only thing you need to keep in mind in this whole procedure is that you automatically de-allocate the entered BitMap when you allocate the ClipRect structure! In case you do not want to do it, you must first set the field on NULL and de-allocate the BitMap with IGraphics->FreeBitMap(). These are the matching code rows for this part of the workshop:		This is provided exclusively for this task. The counterpart to it is ILayers->FreeClipRect(), that releases again the structure. The structure is already pre-initialised, so that only a few fields must be adjusted to your needs. On the one hand, you must store the graphic size in "bounds" and enter it in "BitMap". The required memory area for it can be created with IGraphics->AllocBitMap(). Then you must also blit the alpha-channel bitmap with IGraphics->BltBitMapTags(). The only thing you need to keep in mind in this whole procedure is that you automatically de-allocate the entered BitMap when you allocate the ClipRect structure! In case you do not want to do it, you must first set the field on NULL and de-allocate the BitMap with IGraphics->FreeBitMap(). These are the matching code rows for this part of the workshop:

	<syntaxhighlight>		<syntaxhighlight lang="C" line>
	struct ClipRect *ac;		struct ClipRect *ac;

Line 346:		Line 346:
	What is left is opening the window and blitting the graphic bitmap with IGraphics->BltBitMapRastPort(). You will need for it the following code rows:		What is left is opening the window and blitting the graphic bitmap with IGraphics->BltBitMapRastPort(). You will need for it the following code rows:

	<syntaxhighlight>		<syntaxhighlight lang="C" line>
	struct Window *win;		struct Window *win;

Line 369:		Line 369:
	The program "BorderlessWindow" serves as a complete example for this topic showing all the mentioned functions in a practical interplay. A matching graphic is also included. Have fun experimenting with the source-code and looking for new possibilities!		The program "BorderlessWindow" serves as a complete example for this topic showing all the mentioned functions in a practical interplay. A matching graphic is also included. Have fun experimenting with the source-code and looking for new possibilities!

	<syntaxhighlight>		<syntaxhighlight lang="C" line>
	/* Michael Christoph		/* Michael Christoph
	* BorderlessWindow.c		* BorderlessWindow.c

Costel Mincea: Translated source comments to English and fixed a couple of typos on my way (there may be more ;) )

2022-11-07T07:16:37Z

Translated source comments to English and fixed a couple of typos on my way (there may be more ;) )

Show changes

Frédéric Khannouf: Replaced german Word with english equivalent

2018-10-06T22:28:08Z

Replaced german Word with english equivalent

← Older revision		Revision as of 22:28, 6 October 2018
Line 20:		Line 20:
	= Transparent windows =		= Transparent windows =

	To make a window transparent, three new tags are sufficient. They must be passed as/when the window is opened to IIntuition->OpenWindowTags() ~~bzw.~~ IIntuition->NewObject(IWindow->WINDOW_GetClass(),...).		To make a window transparent, three new tags are sufficient. They must be passed as/when the window is opened to IIntuition->OpenWindowTags() or rather, IIntuition->NewObject(IWindow->WINDOW_GetClass(),...).

	With the tag "WA_Opaqueness" you can determine how opaque or transparent the complete window should be. The possible values margin begins with 0 for completely transparent, which means, you cannot see anything from the contents or the window itself and the underlying screen content is fully displayed. There are also value margins up to 255 for completely opaque display, which corresponds to the standard display. In that case, the complete window content is shown and what is behind is not visible. A mean value of 128 would display one half of the window content and one half of the screen behind it. However, if you want to use this setting, you must additionally set the tag "WA_OverrideOpaqueness" to TRUE. Only then will the global settings from the GUI-Prefs program be ignored and a divergent transparency will be possible for the selected window.		With the tag "WA_Opaqueness" you can determine how opaque or transparent the complete window should be. The possible values margin begins with 0 for completely transparent, which means, you cannot see anything from the contents or the window itself and the underlying screen content is fully displayed. There are also value margins up to 255 for completely opaque display, which corresponds to the standard display. In that case, the complete window content is shown and what is behind is not visible. A mean value of 128 would display one half of the window content and one half of the screen behind it. However, if you want to use this setting, you must additionally set the tag "WA_OverrideOpaqueness" to TRUE. Only then will the global settings from the GUI-Prefs program be ignored and a divergent transparency will be possible for the selected window.

Frédéric Khannouf: Corrected small typo

2018-10-04T21:30:48Z

Corrected small typo

← Older revision		Revision as of 21:30, 4 October 2018
Line 1:		Line 1:
	''This article was adapted from Amiga Future magazine's series on developing for AmigaOS....''		''This article was adapted from Amiga Future magazine's series on developing for AmigaOS....''

	With AmigaOS 4.1 a new technology was introduced, which lets you display (partially) transparent windows thus showing the content behind the window. ~~Aadditionally~~, with this technology you can create rounded window corners. We will take a closer look today at the programming characteristics behind these options.		With AmigaOS 4.1 a new technology was introduced, which lets you display (partially) transparent windows thus showing the content behind the window. Additionally, with this technology you can create rounded window corners. We will take a closer look today at the programming characteristics behind these options.

	In the first block we will deal with transparent windows, while in the second block we will see how you can create transparent areas within a window or how you can set the window based on the outline of an image.		In the first block we will deal with transparent windows, while in the second block we will see how you can create transparent areas within a window or how you can set the window based on the outline of an image.

Steven Solie: /* Window show yourself */

2016-09-24T21:01:17Z

Window show yourself

← Older revision		Revision as of 21:01, 24 September 2016
Line 552:		Line 552:

	Grab the test graphic here: [[Media:testpic.png\|testpic.png]].		Grab the test graphic here: [[Media:testpic.png\|testpic.png]].

			[[File:AF108_borderless_grab.png\|frame\|center]]

	= Outlook =		= Outlook =

Steven Solie: /* Window show yourself */

2016-09-24T20:59:34Z

Window show yourself

← Older revision		Revision as of 20:59, 24 September 2016
Line 437:		Line 437:

	/* die Grafik bei Bedarf in den Speicher laden (intern via Datatype) */		/* die Grafik bei Bedarf in den Speicher laden (intern via Datatype) */
	if((source = IIntuition->ObtainBitMapSource((STRPTR)args[ARG_filename],~~BMS_DoShade,TRUE,BMS_DoMask,TRUE,TAG_END)))~~		if((source = IIntuition->ObtainBitMapSource((STRPTR)args[ARG_filename],
			BMS_DoShade, TRUE,
			BMS_DoMask, TRUE,
		⚫	TAG_END)))
	{		{
	/* eine Bitmap-Instance fÂ¸r den eigenen Bildschirm anfordern */		/* eine Bitmap-Instance fÂ¸r den eigenen Bildschirm anfordern */
Line 454:		Line 457:
	if((ac = ILayers->AllocClipRect(&(scr->LayerInfo))))		if((ac = ILayers->AllocClipRect(&(scr->LayerInfo))))
	{		{
⚫	~~struct~~ ~~TagItem~~ ~~bmtags[3]~~ = { { BMATags_PixelFormat, PIXF_ALPHA8 },
⚫	{ BMATags_Friend, ~~(ULONG)~~scr->RastPort.BitMap },
⚫	{ TAG_END~~, 0 } };~~

	/* Alpha-ClipRect belegen und Speicher fÂ¸r Bitmap anfordern */		/* Alpha-ClipRect belegen und Speicher fÂ¸r Bitmap anfordern */
	ac->bounds.MinX = 0;		ac->bounds.MinX = 0;
Line 464:		Line 463:
	ac->bounds.MaxY = height-1;		ac->bounds.MaxY = height-1;
	ac->Next = NULL;		ac->Next = NULL;
	if((ac->BitMap = IGraphics->~~AllocBitMap~~(width,height,8,~~BMF_DISPLAYABLE\|BMF_CLEAR\|BMF_CHECKVALUE,(struct BitMap *)bmtags)))~~		if((ac->BitMap = IGraphics->AllocBitMapTags(width, height, 8,
			BMATags_Displayable, TRUE,
			BMATags_Clear, TRUE,
		⚫	BMATags_PixelFormat, PIXF_ALPHA8,
		⚫	BMATags_Friend, scr->RastPort.BitMap,
			TAG_END)))
	{		{
	/* Alpha-ClipRect mit der Alpha-Bitmap fÂ¸llen */		/* Alpha-ClipRect mit der Alpha-Bitmap fÂ¸llen */
Line 500:		Line 504:

	/* die Grafikdatei in das Fenster blitten */		/* die Grafikdatei in das Fenster blitten */
	IGraphics->BltBitMapRastPort(bitmap, 0, 0, win->RPort, ~~0, 0, width, height, MINTERM_A_TO_D);~~		IGraphics->BltBitMapRastPort(bitmap, 0, 0, win->RPort,
			0, 0, width, height, MINTERM_ABC \| MINTERM_ABNC);

	/* warten auf CTRL-C zum Programm beenden */		/* warten auf CTRL-C zum Programm beenden */
Line 540:		Line 545:
	else { IDOS->PrintFault(IDOS->IoErr(),"BorderlessWindow"); res = RETURN_ERROR; }		else { IDOS->PrintFault(IDOS->IoErr(),"BorderlessWindow"); res = RETURN_ERROR; }
	}		}
	else IDOS->Printf("~~program~~ ~~required~~ AmigaOS 4.1\n");		else IDOS->Printf("Program requires AmigaOS 4.1\n");

	return res;		return res;

Steven Solie: /* Window show yourself */

2016-09-24T20:58:50Z

Window show yourself

← Older revision		Revision as of 20:58, 24 September 2016
Line 360:		Line 360:
	{		{
	/* blit the graphic file into the window */		/* blit the graphic file into the window */
	IGraphics->BltBitMapRastPort(bitmap,0,0,win->RPort,0,0,width,height,~~0x0c0~~);		IGraphics->BltBitMapRastPort(bitmap, 0, 0, win->RPort, 0, 0, width, height, MINTERM_ABC\|MINTERM_ABNC);
	}		}
	</syntaxhighlight>		</syntaxhighlight>

Steven Solie: /* Window show yourself */

2016-09-24T20:45:48Z

Window show yourself

← Older revision		Revision as of 20:45, 24 September 2016
Line 371:		Line 371:

	<syntaxhighlight>		<syntaxhighlight>
	/* Michael Christoph ~~- Musterbeispiel */~~		/* Michael Christoph
	/* BorderlessWindow ~~- Bild laden und transparent anzeigen in einem rahmenlosen Fenster */~~		* BorderlessWindow.c
		⚫	*

		⚫	* gcc BorderlessWindow.c -o BorderlessWindow -l auto
⚫	/*
		⚫	*/
⚫	** gcc BorderlessWindow.c -o BorderlessWindow -l auto
⚫	*/

⚫	/************************ ~~PROGRAMM-PARAMETER~~ ******************************/

⚫	static const char *version = "\0$VER: BorderlessWindow 1.1 (22.07.2013) - (c) Jan.2009 by Meicky-Soft\n";

	/***************************** INCLUDES ***********************************/		/***************************** INCLUDES ***********************************/
Line 390:		Line 385:
	#include <intuition/bitmapshare.h>		#include <intuition/bitmapshare.h>
	#include <intuition/gui.h>		#include <intuition/gui.h>
	#include <libraries/Picasso96.h>

	#include <proto/exec.h>		#include <proto/exec.h>
Line 397:		Line 391:
	#include <proto/intuition.h>		#include <proto/intuition.h>
	#include <proto/layers.h>		#include <proto/layers.h>

		⚫	/******************************************************************************/

		⚫	static const char *version USED = "\0$VER: BorderlessWindow 1.1 (22.07.2013) - (c) Jan.2009 by Meicky-Soft\n";

	/******************************************************************************/		/******************************************************************************/
Line 429:		Line 427:
	if((scr = IIntuition->LockPubScreen((STRPTR)args[ARG_pubscreen])))		if((scr = IIntuition->LockPubScreen((STRPTR)args[ARG_pubscreen])))
	{		{
	/* sicherstellen dass der Bildschirm Alpha Composing ~~unterst~~¸tzt */		/* sicherstellen dass der Bildschirm Alpha Composing unterstÂ¸tzt */
	if(( dri = IIntuition->GetScreenDrawInfo(scr)))		if(( dri = IIntuition->GetScreenDrawInfo(scr)))
	{		{
Line 441:		Line 439:
	if((source = IIntuition->ObtainBitMapSource((STRPTR)args[ARG_filename],BMS_DoShade,TRUE,BMS_DoMask,TRUE,TAG_END)))		if((source = IIntuition->ObtainBitMapSource((STRPTR)args[ARG_filename],BMS_DoShade,TRUE,BMS_DoMask,TRUE,TAG_END)))
	{		{
	/* eine Bitmap-Instance f¸r den eigenen Bildschirm anfordern */		/* eine Bitmap-Instance fÂ¸r den eigenen Bildschirm anfordern */
	if((instance = IIntuition->ObtainBitMapInstance(source,scr,TAG_END)))		if((instance = IIntuition->ObtainBitMapInstance(source,scr,TAG_END)))
	{		{
Line 450:		Line 448:
	BMICTRL_GetWidth, &width,		BMICTRL_GetWidth, &width,
	BMICTRL_GetHeight, &height,		BMICTRL_GetHeight, &height,
	~~TAG_DONE~~ );		TAG_END );
	if(bitmap && alpha)		if(bitmap && alpha)
	{		{
Line 456:		Line 454:
	if((ac = ILayers->AllocClipRect(&(scr->LayerInfo))))		if((ac = ILayers->AllocClipRect(&(scr->LayerInfo))))
	{		{
	struct TagItem bmtags[3] = { { ~~BMATags_RGBFormat~~, ~~RGBFB_ALPHA8~~ },		struct TagItem bmtags[3] = { { BMATags_PixelFormat, PIXF_ALPHA8 },
	{ BMATags_Friend, (ULONG)scr->RastPort.BitMap },		{ BMATags_Friend, (ULONG)scr->RastPort.BitMap },
	{ TAG_END, 0 } };		{ TAG_END, 0 } };

	/* Alpha-ClipRect belegen und Speicher f¸r Bitmap anfordern */		/* Alpha-ClipRect belegen und Speicher fÂ¸r Bitmap anfordern */
	ac->bounds.MinX = 0;		ac->bounds.MinX = 0;
	ac->bounds.MinY = 0;		ac->bounds.MinY = 0;
Line 468:		Line 466:
	if((ac->BitMap = IGraphics->AllocBitMap(width,height,8,BMF_DISPLAYABLE\|BMF_CLEAR\|BMF_CHECKVALUE,(struct BitMap *)bmtags)))		if((ac->BitMap = IGraphics->AllocBitMap(width,height,8,BMF_DISPLAYABLE\|BMF_CLEAR\|BMF_CHECKVALUE,(struct BitMap *)bmtags)))
	{		{
	/* Alpha-ClipRect mit der Alpha-Bitmap f¸llen */		/* Alpha-ClipRect mit der Alpha-Bitmap fÂ¸llen */
	IGraphics->BltBitMapTags(BLITA_Source, alpha,		IGraphics->BltBitMapTags(BLITA_Source, alpha,
	BLITA_SrcType, BLITT_CHUNKY,		BLITA_SrcType, BLITT_CHUNKY,
Line 475:		Line 473:
	BLITA_Width, width,		BLITA_Width, width,
	BLITA_Height, height,		BLITA_Height, height,
	~~TAG_DONE~~ );		TAG_END );

	/* Rahmenloses Fenster ~~ˆffnen~~ */		/* Rahmenloses Fenster Ëffnen */
	if((win = IIntuition->OpenWindowTags(NULL,		if((win = IIntuition->OpenWindowTags(NULL,
	WA_Left, 1580,		WA_Left, 1580,
Line 493:		Line 491:
	WA_Title, "Borderless window",		WA_Title, "Borderless window",
	WA_IDCMP, IDCMP_MOUSEBUTTONS,		WA_IDCMP, IDCMP_MOUSEBUTTONS,
	~~TAG_DONE~~ )))		TAG_END )))
	{		{
	/* das komplette Fenster als dragable definieren */		/* das komplette Fenster als dragable definieren */
	struct Gadget draggad = { NULL, 0,0, width,height,		struct Gadget draggad = { NULL, 0,0, width,height,
	GFLG_GADGHNONE, 0, GTYP_WDRAGGING,		GFLG_GADGHNONE, 0, GTYP_WDRAGGING,
	NULL,NULL,NULL,0,0,0,NULL };		NULL,NULL,NULL,0,0,0,NULL };
	win->FirstGadget = &draggad;		win->FirstGadget = &draggad;

	/* die Grafikdatei in das Fenster blitten */		/* die Grafikdatei in das Fenster blitten */
	IGraphics->BltBitMapRastPort(bitmap,0,0,win->RPort,0,0,width,height,~~0x0c0~~);		IGraphics->BltBitMapRastPort(bitmap, 0, 0, win->RPort, 0, 0, width, height, MINTERM_A_TO_D);

	/* warten auf CTRL-C zum Programm beenden */		/* warten auf CTRL-C zum Programm beenden */
Line 509:		Line 507:
	res = RETURN_OK;		res = RETURN_OK;

	/* Fenster ~~schlieﬂen~~ */		/* Fenster schlieï¬en */
	IIntuition->CloseWindow(win);		IIntuition->CloseWindow(win);
	}		}
Line 544:		Line 542:
	else IDOS->Printf("program required AmigaOS 4.1\n");		else IDOS->Printf("program required AmigaOS 4.1\n");

	return( res );		return res;
	}		}
	</syntaxhighlight>		</syntaxhighlight>

Steven Solie: /* Transparent windows */

2016-09-24T20:25:18Z

Transparent windows

← Older revision		Revision as of 20:25, 24 September 2016
Line 41:		Line 41:

	<syntaxhighlight>		<syntaxhighlight>
	/* Michael Christoph ~~- Musterbeispiel */~~		/* Michael Christoph
	/* OpaquenessExample ~~- Fenster mit regulierbarer Transparenz */~~		* OpaquenessExample.c
		⚫	*

		⚫	* gcc OpaquenessExample.c -o OpaquenessExample -l auto
⚫	/*
		⚫	*/
⚫	** gcc OpaquenessExample.c -o OpaquenessExample -l auto
⚫	*/

⚫	/************************ ~~PROGRAMM-PARAMETER~~ ******************************/

⚫	static const char *version = "\0$VER: OpaquenessExample 1.0 (06.01.2009) - (c) Jan.2009 by Meicky-Soft\n";

	/***************************** INCLUDES ***********************************/		/***************************** INCLUDES ***********************************/
Line 71:		Line 66:
	#include <proto/slider.h>		#include <proto/slider.h>
	#include <proto/label.h>		#include <proto/label.h>

		⚫	/******************************************************************************/

		⚫	static const char *version USED = "\0$VER: OpaquenessExample 1.0 (06.01.2009) - (c) Jan.2009 by Meicky-Soft\n";

	/******************************************************************************/		/******************************************************************************/
Line 122:		Line 121:
	WA_Width, 400,		WA_Width, 400,
	WA_OverrideOpaqueness, TRUE, /* Globale Einstellungen ignorieren */		WA_OverrideOpaqueness, TRUE, /* Globale Einstellungen ignorieren */
	WA_Opaqueness, 255, /* Volldeckend ~~ˆffnen~~ */		WA_Opaqueness, 255, /* Volldeckend Ëffnen */
	WA_FadeTime, 500000, /* ~~Verzˆgerungszeit~~ in Mikrosekunden */		WA_FadeTime, 500000, /* VerzËgerungszeit in Mikrosekunden */
	(args[ARG_pubscreen] ? WA_PubScreenName : TAG_IGNORE), args[ARG_pubscreen],		(args[ARG_pubscreen] ? WA_PubScreenName : TAG_IGNORE), args[ARG_pubscreen],
	WINDOW_Position, WPOS_CENTERSCREEN,		WINDOW_Position, WPOS_CENTERSCREEN,
Line 159:		Line 158:
	SLIDER_LevelPlace, PLACETEXT_IN,		SLIDER_LevelPlace, PLACETEXT_IN,
	SLIDER_LevelMaxLen, 3,		SLIDER_LevelMaxLen, 3,
	~~TAG_DONE~~),		TAG_END),
	Label(" Opaqueness "),		Label(" Opaqueness "),
	CHILD_WeightedHeight, 0,		CHILD_WeightedHeight, 0,

	~~TAG_DONE~~),		TAG_END),
	~~TAG_DONE~~);		TAG_END);


Line 172:		Line 171:
	IIntuition->GetAttr(WINDOW_SigMask, win, &sigmask);		IIntuition->GetAttr(WINDOW_SigMask, win, &sigmask);

	/* ist Composing aktiviert und ~~mˆglich~~ ? */		/* ist Composing aktiviert und mËglich ? */
	if((dri = IIntuition->GetScreenDrawInfo(window->WScreen)))		if((dri = IIntuition->GetScreenDrawInfo(window->WScreen)))
	{		{
Line 182:		Line 181:
	/* deaktiviert: dann auch Gadgets sperren, da ohne Effekt */		/* deaktiviert: dann auch Gadgets sperren, da ohne Effekt */
	IIntuition->SetGadgetAttrs(GAD(OBJ_SLIDER_1),window,NULL,		IIntuition->SetGadgetAttrs(GAD(OBJ_SLIDER_1),window,NULL,
	GA_Disabled,TRUE,~~TAG_DONE~~);		GA_Disabled,TRUE,TAG_END);
	IIntuition->SetGadgetAttrs(GAD(OBJ_SLIDER_2),window,NULL,		IIntuition->SetGadgetAttrs(GAD(OBJ_SLIDER_2),window,NULL,
	GA_Disabled,TRUE,~~TAG_DONE~~);		GA_Disabled,TRUE,TAG_END);
	}		}
	}		}
Line 220:		Line 219:
	IIntuition->SetWindowAttrs(window, WA_Opaqueness, opaqueness, TAG_END);		IIntuition->SetWindowAttrs(window, WA_Opaqueness, opaqueness, TAG_END);

	/* SetWindowAttr() kehrt sofort ~~zur~~¸ck, daher warten wir kurz */		/* SetWindowAttr() kehrt sofort zurÂ¸ck, daher warten wir kurz */
	/* bis das Fenster das Fading abgeschlossen hat, bevor die ~~n‰chste~~ */		/* bis das Fenster das Fading abgeschlossen hat, bevor die nâ°chste */
	/* ~~Ver‰nderung~~ vorgenommen wird. */		/* Verâ°nderung vorgenommen wird. */
	IDOS->Delay(fade_time/2);		IDOS->Delay(fade_time/2);
	}		}
Line 241:		Line 240:
	else IDOS->Printf("program required AmigaOS 4.1\n");		else IDOS->Printf("program required AmigaOS 4.1\n");

	return( 0 );		return 0;
	}		}
	</syntaxhighlight>		</syntaxhighlight>

Steven Solie: /* Outlook */

2016-09-02T03:58:39Z

Outlook

← Older revision		Revision as of 03:58, 2 September 2016
Line 555:		Line 555:
	You can look forward to the next issue, in which we will deal with datatypes. Do not expect any novelties regarding the program, but for the sake of completeness we should mention these options as well.		You can look forward to the next issue, in which we will deal with datatypes. Do not expect any novelties regarding the program, but for the sake of completeness we should mention these options as well.

			[[File:AF108_FensterLoch_grab.png\|frame\|center]]
	FensterLoch.iff:
	With a hole in a window you can create funny effects, especially if you move the window around.		With a hole in a window you can create funny effects, especially if you move the window around.