//

// Copyright (c) 2005-2009 Nokia Corporation and/or its subsidiary(-ies).

// All rights reserved.

// This component and the accompanying materials are made available

// under the terms of "Eclipse Public License v1.0"

// which accompanies this distribution, and is available

// at the URL "http://www.eclipse.org/legal/epl-v10.html".

//

// Initial Contributors:

// Nokia Corporation - initial contribution.

//

// Contributors:

//

// Description:

//

//! @file

//! @SYMTestSuiteName		GRAPHICS-WSERV-Window-PublicApi

//! @SYMScriptTestEnvironment	This test script requires a basic ROM.

///////////////////////////////////////////////////////////////////////////////

// GRAPHICS-WSERV-Window-PublicApi.script

//

// Tests all public elements of the RWindow class

// as a means of confidence that the API works as expected.

//

// The purpose is to provide a regression test suite of PublishedAll APIs for

// RWindow related classes.

// Negative testing is performed to confirm that correct errors are returned

// when incorrect parameters are given.

//

// The tests are fully automated.

///////////////////////////////////////////////////////////////////////////////

LOAD_SUITE	T_GraphicsWservAPI

// ****************************************************************************

// RWindow

// ****************************************************************************

START_TESTCASE	GRAPHICS-WSERV-Window-PublicApi-0001

//! @SYMTestCaseID		GRAPHICS-WSERV-Window-PublicApi-0001

//! @SYMAPI			RWindow

//! @SYMAuthor			Victor Liu

//! @SYMCreationDate		20/12/2006

//! @SYMTestCaseDesc		RWindow(): create a RWindow object with C++ default constructor

//!				Uses API elements: RWindow()

//! @SYMTestActions		1.	Create a RWindow object with the C++ default constructor

//! @SYMTestStatus		Implemented

//! @SYMTestPriority		Low

//! @SYMTestExpectedResults	RWindow object was created without causing panic

//! @SYMTestType		CIT

	START_TEST_BLOCK	10		T_GraphicsWservAPI	\graphics\GRAPHICS-WSERV-Window-PublicApi.ini

		CREATE_OBJECT	RWindow		win

		COMMAND		win		new

	END_TEST_BLOCK

END_TESTCASE	GRAPHICS-WSERV-Window-PublicApi-0001

START_TESTCASE	GRAPHICS-WSERV-Window-PublicApi-0002

//! @SYMTestCaseID		GRAPHICS-WSERV-Window-PublicApi-0002

//! @SYMAPI			RWindow

//! @SYMAuthor			Victor Liu

//! @SYMCreationDate		20/12/2006

//! @SYMTestCaseDesc		RWindow(RWsSession &aWs): create a RWindow object within the specified RWsSession

//!				Uses API elements: RWsSession::Connect, RWindow()

//! @SYMTestActions		1.	Create and connect a RWsSession

//!				2.	Create a RWindow within the RWsSession

//! @SYMTestStatus		Implemented

//! @SYMTestPriority		Critical

//! @SYMTestExpectedResults	RWindow object was created without causing panic

//! @SYMTestType		CIT

	START_TEST_BLOCK	10		T_GraphicsWservAPI	\graphics\GRAPHICS-WSERV-Window-PublicApi.ini

		CREATE_OBJECT	RWsSession	ws

		CREATE_OBJECT	RWindow		win

		COMMAND		ws		new

		COMMAND		ws		Connect

		COMMAND		win		new			GRAPHICS-WSERV-Window-PublicApi-0002-0001-new_command004

		COMMAND		ws		Close

	END_TEST_BLOCK

END_TESTCASE	GRAPHICS-WSERV-Window-PublicApi-0002

START_TESTCASE	GRAPHICS-WSERV-Window-PublicApi-0003

//! @SYMTestCaseID		GRAPHICS-WSERV-Window-PublicApi-0003

//! @SYMAPI			RWindow

//! @SYMAuthor			Victor Liu

//! @SYMCreationDate		20/12/2006

//! @SYMTestCaseDesc		Construct(const RWindowTreeNode &parent, TUint32 aHandle): complete construction of a RWindow

//!				Uses API elements: RWsSession::Connect, RWindowGroup::Construct, RWindow::Construct

//! @SYMTestActions		1.	Create and connect a RWsSession, and within the RWsSession

//!				2.	Create and construct a RWindowGroup (as the parent of RWindow to be constructed)

//!				3.	Create and construct a RWindow as the child of the RWindowGroup

//! @SYMTestStatus		Implemented

//! @SYMTestPriority		Critical

//! @SYMTestExpectedResults	Construct() method returns KErrNone without causing panic

//! @SYMTestType		CIT

	START_TEST_BLOCK	10		T_GraphicsWservAPI	\graphics\GRAPHICS-WSERV-Window-PublicApi.ini

		CREATE_OBJECT	RWsSession	ws

		CREATE_OBJECT	RWindowGroup	wingrp

		CREATE_OBJECT	RWindow		win

		COMMAND		ws		new

		COMMAND		ws		Connect

		COMMAND		wingrp		new			GRAPHICS-WSERV-Window-PublicApi-0003-0001-new_command004

		COMMAND		wingrp		Construct		GRAPHICS-WSERV-Window-PublicApi-0003-0001-Construct_command005

		COMMAND		win		new			GRAPHICS-WSERV-Window-PublicApi-0003-0001-new_command007

		COMMAND		win		Construct		GRAPHICS-WSERV-Window-PublicApi-0003-0001-Construct_command008

		COMMAND		win		Close

		COMMAND		wingrp		Close

		COMMAND		ws		Close

	END_TEST_BLOCK

END_TESTCASE	GRAPHICS-WSERV-Window-PublicApi-0003

START_TESTCASE	GRAPHICS-WSERV-Window-PublicApi-0004

//! @SYMTestCaseID		GRAPHICS-WSERV-Window-PublicApi-0004

//! @SYMAPI			RWindow

//! @SYMAuthor			Victor Liu

//! @SYMCreationDate		20/12/2006

//! @SYMTestCaseDesc		BeginRedraw(): begin redraw the window's invalid region

//!				Uses API elements: RWsSession::Connect, RWindowGroup::Construct, RWindow::Construct, RDrawableWindow::GetDrawRect

//! @SYMTestActions		1.	Create and construct a simple RWindow to test

//!					1.1	New and connect a RWsSession

//!					1.2	New and construct a RWindowGroup within the RWsSession

//!					1.3	New and construct a RWindow as the child of the RWindowGroup

//!				2.	Use RDrawableWindow::GetDrawRect to check if the drawing rectangle is empty

//!				3.	Execute BeginRedraw() method

//!				4.	Use RDrawableWindow::GetDrawRect to check if the drawing rectangle is the entire window

//!				5.	Close all objects used

//! @SYMTestStatus		Implemented

//! @SYMTestPriority		Critical

//! @SYMTestExpectedResults	1.	Run BeginRedraw() method without causing panic

//!				2.	Check if the drawing rectangle as expected

//!					2.1	before BeginRedraw(), the drawing rectangle is empty: TRect((0,0),(0,0))

//!					2.2	after BeginRedraw(), the drawing rectangle should be the window size (or the intital screen size)

//! @SYMTestType		CIT

	START_TEST_BLOCK	10		T_GraphicsWservAPI	\graphics\GRAPHICS-WSERV-Window-PublicApi.ini

		CREATE_OBJECT	RWsSession	ws

		CREATE_OBJECT	RWindowGroup	wingrp

		CREATE_OBJECT	RWindow		win

		COMMAND		ws		new

		COMMAND		ws		Connect

		COMMAND		wingrp		new			GRAPHICS-WSERV-Window-Setup-0001-0001-new_command004

		COMMAND		wingrp		Construct		GRAPHICS-WSERV-Window-Setup-0001-0001-Construct_command005

		COMMAND		win		new			GRAPHICS-WSERV-Window-Setup-0001-0001-new_command007

		COMMAND		win		Construct		GRAPHICS-WSERV-Window-Setup-0001-0001-Construct_command008

		COMMAND		win		GetDrawRect		GRAPHICS-WSERV-Window-PublicApi-0004-0001-GetDrawRect_command001

		COMMAND		win		BeginRedraw

		COMMAND		win		GetDrawRect		GRAPHICS-WSERV-Window-PublicApi-0004-0001-GetDrawRect_command003

		COMMAND		win		Close

		COMMAND		wingrp		Close

		COMMAND		ws		Close

	END_TEST_BLOCK

END_TESTCASE	GRAPHICS-WSERV-Window-PublicApi-0004

START_TESTCASE	GRAPHICS-WSERV-Window-PublicApi-0005

//! @SYMTestCaseID		GRAPHICS-WSERV-Window-PublicApi-0005

//! @SYMAPI			RWindow

//! @SYMAuthor			Victor Liu

//! @SYMCreationDate		20/12/2006

//! @SYMTestCaseDesc		BeginRedraw(const TRect &aRect): begin redraw the rectangle of the window's invalid region

//!				Uses API elements: RWsSession::Connect, RWindowGroup::Construct, RWindow::Construct, RDrawableWindow::GetDrawRect

//! @SYMTestActions		1.	Create and construct a simple RWindow to test

//!					1.1	New and connect a RWsSession

//!					1.2	New and construct a RWindowGroup within the RWsSession

//!					1.3	New and construct a RWindow as the child of the RWindowGroup

//!				2.	Use RDrawableWindow::GetDrawRect to check if the drawing rectangle is empty

//!				3.	Execute BeginRedraw() method with specified rectangle

//!				4.	Use RDrawableWindow::GetDrawRect to check if the drawing rectangle the same as the specified

//!				5.	Close all objects used

//! @SYMTestStatus		Implemented

//! @SYMTestPriority		Critical

//! @SYMTestExpectedResults	1.	Run BeginRedraw() method without causing panic

//!				2.	Check if the drawing rectangle as expected

//!					2.1	before BeginRedraw(), the drawing rectangle is empty: TRect((0,0),(0,0))

//!					2.2	after BeginRedraw(), the drawing rectangle should be the same as the specified TRect((21,20),(51,50))

//! @SYMTestType		CIT

	START_TEST_BLOCK	10		T_GraphicsWservAPI	\graphics\GRAPHICS-WSERV-Window-PublicApi.ini

		CREATE_OBJECT	RWsSession	ws

		CREATE_OBJECT	RWindowGroup	wingrp

		CREATE_OBJECT	RWindow		win

		COMMAND		ws		new

		COMMAND		ws		Connect

		COMMAND		wingrp		new			GRAPHICS-WSERV-Window-Setup-0001-0001-new_command004

		COMMAND		wingrp		Construct		GRAPHICS-WSERV-Window-Setup-0001-0001-Construct_command005

		COMMAND		win		new			GRAPHICS-WSERV-Window-Setup-0001-0001-new_command007

		COMMAND		win		Construct		GRAPHICS-WSERV-Window-Setup-0001-0001-Construct_command008

		COMMAND		win		GetDrawRect		GRAPHICS-WSERV-Window-PublicApi-0005-0001-GetDrawRect_command001

		COMMAND		win		BeginRedraw		GRAPHICS-WSERV-Window-PublicApi-0005-0001-BeginRedraw_command002

		COMMAND		win		GetDrawRect		GRAPHICS-WSERV-Window-PublicApi-0005-0001-GetDrawRect_command003

		COMMAND		win		Close

		COMMAND		wingrp		Close

		COMMAND		ws		Close

	END_TEST_BLOCK

END_TESTCASE	GRAPHICS-WSERV-Window-PublicApi-0005

START_TESTCASE	GRAPHICS-WSERV-Window-PublicApi-0006

//! @SYMTestCaseID		GRAPHICS-WSERV-Window-PublicApi-0006

//! @SYMAPI			RWindow

//! @SYMAuthor			Victor Liu

//! @SYMCreationDate		20/12/2006

//! @SYMTestCaseDesc		EndRedraw(): end the current redraw

//!				Uses API elements: RWsSession::Connect, RWindowGroup::Construct, RWindow::Construct & BeginRedraw, RDrawableWindow::GetDrawRect

//! @SYMTestActions		1.	Create and construct a simple RWindow to test

//!					1.1	New and connect a RWsSession

//!					1.2	New and construct a RWindowGroup within the RWsSession

//!					1.3	New and construct a RWindow as the child of the RWindowGroup

//!				2.	Execute BeginRedraw(), then EndRedraw method

//!				3.	Use RDrawableWindow::GetDrawRect to check if the drawing rectangle is cleared back to empty

//!				4.	Close all objects used

//! @SYMTestStatus		Implemented

//! @SYMTestPriority		Critical

//! @SYMTestExpectedResults	1. Run EndRedraw() method without causing panic

//!				2. Check if the drawing rectangle after call EndRedraw() is empty: TRect((0,0),(0,0))

//! @SYMTestType		CIT

	START_TEST_BLOCK	10		T_GraphicsWservAPI	\graphics\GRAPHICS-WSERV-Window-PublicApi.ini

		CREATE_OBJECT	RWsSession	ws

		CREATE_OBJECT	RWindowGroup	wingrp

		CREATE_OBJECT	RWindow		win

		COMMAND		ws		new

		COMMAND		ws		Connect

		COMMAND		wingrp		new			GRAPHICS-WSERV-Window-Setup-0001-0001-new_command004

		COMMAND		wingrp		Construct		GRAPHICS-WSERV-Window-Setup-0001-0001-Construct_command005

		COMMAND		win		new			GRAPHICS-WSERV-Window-Setup-0001-0001-new_command007

		COMMAND		win		Construct		GRAPHICS-WSERV-Window-Setup-0001-0001-Construct_command008

		COMMAND		win		BeginRedraw

		COMMAND		win		EndRedraw

		COMMAND		win		GetDrawRect		GRAPHICS-WSERV-Window-PublicApi-0006-0001-GetDrawRect_command003

		COMMAND		win		Close

		COMMAND		wingrp		Close

		COMMAND		ws		Close

	END_TEST_BLOCK

END_TESTCASE	GRAPHICS-WSERV-Window-PublicApi-0006

START_TESTCASE	GRAPHICS-WSERV-Window-PublicApi-0007

//! @SYMTestCaseID		GRAPHICS-WSERV-Window-PublicApi-0007

//! @SYMAPI			RWindow

//! @SYMAuthor			Victor Liu

//! @SYMCreationDate		20/12/2006

//! @SYMTestCaseDesc		Invalidate(): invalidate the entire window

//!				Uses API elements: RWsSession::Connect, RWindowGroup::Construct, RWindow::Construct & Activate & BeginRedraw & EndRedraw & GetInvalidRegion

//! @SYMTestActions		1.	Create and construct a simple RWindow to test

//!					1.1	New and connect a RWsSession

//!					1.2	New and construct a RWindowGroup within the RWsSession

//!					1.3	New and construct a RWindow as the child of the RWindowGroup

//!				2.	Activate, BeginRedraw and EndRedraw the RWindow to make the entire window is valid

//!				3.	Execute Invalidate() method for the entire window

//!				4.	Use GetInvalidRegion to check if the invalid region as specified (the entire window)

//!				5.	Close all objects used

//! @SYMTestStatus		Implemented

//! @SYMTestPriority		Critical

//! @SYMTestExpectedResults	1.	Run Invalidate() method without causing panic

//!				2.	Check if invalid region as specified

//!					2.1	before Invalidate(), there's NO invalid region: NULL region can be represented by TRect((0,0),(0,0))

//!					2.2	after Invalidate(), the invalid region should be the window size (or the intital screen size)

//! @SYMTestType		CIT

	START_TEST_BLOCK	10		T_GraphicsWservAPI	\graphics\GRAPHICS-WSERV-Window-PublicApi.ini

		CREATE_OBJECT	RWsSession	ws

		CREATE_OBJECT	RWindowGroup	wingrp

		CREATE_OBJECT	RWindow		win

		COMMAND		ws		new

		COMMAND		ws		Connect

		COMMAND		wingrp		new			GRAPHICS-WSERV-Window-Setup-0001-0001-new_command004

		COMMAND		wingrp		Construct		GRAPHICS-WSERV-Window-Setup-0001-0001-Construct_command005

		COMMAND		win		new			GRAPHICS-WSERV-Window-Setup-0001-0001-new_command007

		COMMAND		win		Construct		GRAPHICS-WSERV-Window-Setup-0001-0001-Construct_command008

		COMMAND		win		Activate

		COMMAND		win		BeginRedraw

		COMMAND		win		EndRedraw

		COMMAND		win		GetInvalidRegion	GRAPHICS-WSERV-Window-PublicApi-0007-0001-GetInvalidRegion_command004

		COMMAND		win		Invalidate

		COMMAND		win		GetInvalidRegion	GRAPHICS-WSERV-Window-PublicApi-0007-0001-GetInvalidRegion_command006

		COMMAND		win		Close

		COMMAND		wingrp		Close

		COMMAND		ws		Close

	END_TEST_BLOCK

END_TESTCASE	GRAPHICS-WSERV-Window-PublicApi-0007

START_TESTCASE	GRAPHICS-WSERV-Window-PublicApi-0008

//! @SYMTestCaseID		GRAPHICS-WSERV-Window-PublicApi-0008

//! @SYMAPI			RWindow

//! @SYMAuthor			Victor Liu

//! @SYMCreationDate		20/12/2006

//! @SYMTestCaseDesc		Invalidate(const TRect &aRect): invalidate a rectangle area within the window

//!				Uses API elements: RWsSession::Connect, RWindowGroup::Construct, RWindow::Construct & Activate & BeginRedraw & EndRedraw & GetInvalidRegion

//! @SYMTestActions		1.	Create and construct a simple RWindow to test

//!					1.1	New and connect a RWsSession

//!					1.2	New and construct a RWindowGroup within the RWsSession

//!					1.3	New and construct a RWindow as the child of the RWindowGroup

//!				2.	Activate, BeginRedraw and EndRedraw the RWindow to make the entire window is valid

//!				3.	Execute Invalidate() method with specified rectangle ((11,10),(81,60))

//!				4.	Use GetInvalidRegion to check if the invalid region as specified

//!				5.	Close all objects used

//! @SYMTestStatus		Implemented

//! @SYMTestPriority		Critical

//! @SYMTestExpectedResults	1.	Run Invalidate() method without causing panic

//!				2.	Check if invalid region as specified

//!					2.1	before Invalidate(), there's NO invalid region: NULL region can be represented by TRect((0,0),(0,0))

//!					2.2	after Invalidate(), the invalid region should be the same as specified TRect((11,10),(81,60))

//! @SYMTestType		CIT

	START_TEST_BLOCK	10		T_GraphicsWservAPI	\graphics\GRAPHICS-WSERV-Window-PublicApi.ini

		CREATE_OBJECT	RWsSession	ws

		CREATE_OBJECT	RWindowGroup	wingrp

		CREATE_OBJECT	RWindow		win

		COMMAND		ws		new

		COMMAND		ws		Connect

		COMMAND		wingrp		new			GRAPHICS-WSERV-Window-Setup-0001-0001-new_command004

		COMMAND		wingrp		Construct		GRAPHICS-WSERV-Window-Setup-0001-0001-Construct_command005

		COMMAND		win		new			GRAPHICS-WSERV-Window-Setup-0001-0001-new_command007

		COMMAND		win		Construct		GRAPHICS-WSERV-Window-Setup-0001-0001-Construct_command008

		COMMAND		win		Activate

		COMMAND		win		BeginRedraw

		COMMAND		win		EndRedraw

		COMMAND		win		GetInvalidRegion	GRAPHICS-WSERV-Window-PublicApi-0008-0001-GetInvalidRegion_command004

		COMMAND		win		Invalidate		GRAPHICS-WSERV-Window-PublicApi-0008-0001-Invalidate_command005

		COMMAND		win		GetInvalidRegion	GRAPHICS-WSERV-Window-PublicApi-0008-0001-GetInvalidRegion_command006

		COMMAND		win		Close

		COMMAND		wingrp		Close

		COMMAND		ws		Close

	END_TEST_BLOCK

END_TESTCASE	GRAPHICS-WSERV-Window-PublicApi-0008

START_TESTCASE	GRAPHICS-WSERV-Window-PublicApi-0009

//! @SYMTestCaseID		GRAPHICS-WSERV-Window-PublicApi-0009

//! @SYMAPI			RWindow

//! @SYMAuthor			Victor Liu

//! @SYMCreationDate		15/03/2007

//! @SYMTestCaseDesc		GetInvalidRegion(RRegion &aRegion): get the invalid region

//!				Uses API elements: RWsSession::Connect, RWindowGroup::Construct, RWindow::Construct, RWindowBase::Activate

//! @SYMTestActions		1.	Create and construct a simple RWindow to test

//!					1.1	New and connect a RWsSession

//!					1.2	New and construct a RWindowGroup within the RWsSession

//!					1.3	New and construct a RWindow as the child of the RWindowGroup

//!				2.	Execute GetInvalidRegion() method and check if returned invalid region is NULL/empty

//!				3.	Activate the window

//!				4.	Execute GetInvalidRegion() and check again if returned the whole window

//!				5.	Close all objects used

//! @SYMTestStatus		Implemented

//! @SYMTestPriority		Critical

//! @SYMTestExpectedResults	1.	Run GetInvalidRegion() method without causing panic

//!				2.	Check returned invalid region for a initial window

//!					2.1	before Activate the window, there's NO invalid region: NULL region can be represented by TRect((0,0),(0,0))

//!					2.2	after Activate the window, the invalid region should be the window size (or the intital screen size)

//! @SYMTestType		CIT

	START_TEST_BLOCK	10		T_GraphicsWservAPI	\graphics\GRAPHICS-WSERV-Window-PublicApi.ini

		CREATE_OBJECT	RWsSession	ws

		CREATE_OBJECT	RWindowGroup	wingrp

		CREATE_OBJECT	RWindow		win

		COMMAND		ws		new

		COMMAND		ws		Connect

		COMMAND		wingrp		new			GRAPHICS-WSERV-Window-Setup-0001-0001-new_command004

		COMMAND		wingrp		Construct		GRAPHICS-WSERV-Window-Setup-0001-0001-Construct_command005

		COMMAND		win		new			GRAPHICS-WSERV-Window-Setup-0001-0001-new_command007

		COMMAND		win		Construct		GRAPHICS-WSERV-Window-Setup-0001-0001-Construct_command008

		COMMAND		win		GetInvalidRegion	GRAPHICS-WSERV-Window-PublicApi-0009-0001-GetInvalidRegion_command001

		COMMAND		win		Activate

		COMMAND		win		GetInvalidRegion	GRAPHICS-WSERV-Window-PublicApi-0009-0001-GetInvalidRegion_command003

		COMMAND		win		Close

		COMMAND		wingrp		Close

		COMMAND		ws		Close

	END_TEST_BLOCK

END_TESTCASE	GRAPHICS-WSERV-Window-PublicApi-0009

START_TESTCASE	GRAPHICS-WSERV-Window-PublicApi-0010

//! @SYMTestCaseID		GRAPHICS-WSERV-Window-PublicApi-0010

//! @SYMAPI			RWindow

//! @SYMAuthor			Victor Liu

//! @SYMCreationDate		20/12/2006

//! @SYMTestCaseDesc		SetBackgroundColor(TRgb aColor): set the background colour used for clearing in server-initiated redraws

//!				Uses API elements: RWsSession::Connect & SetAutoFlush, CWsScreenDevice::Construct & CreateContext & GetPixel, RWindowGroup::Construct,

//!				RWindow::Construct & SetRequiredDisplayMode & BeginRedraw & EndRedraw, CWindowGc::Activate & Deactivate

//! @SYMTestActions		1.	Setup and display a RWindow to test

//!					1.1	New and connect a RWsSession

//!					1.2	New and construct a CWsScreenDevice within the RWsSession

//!					1.3	Create a CWindowGc within the CWsScreenDevice (use CreateContext)

//!					1.4	New and construct a RWindowGroup within the RWsSession

//!					1.5	New and construct a RWindow as the child of the RWindowGroup

//!						and SetRequiredDisplayMode (to EColor4K) for the RWindow

//!					1.6	SetAutoFlush to TRUE for the RWsSession

//!					1.7	Activate the CWindowGc to the RWindow

//!				2.	Execute SetBackgroundColor to set the background color to the specified TRgb(255,0,0)

//!				3.	Run RWindow::BeginRedraw & EndRedraw to display the RWindow with new background color

//!				4.	Check if the expected background color displayed on the screen

//!				5.	Destruct and close all objects used

//! @SYMTestStatus		Implemented

//! @SYMTestPriority		Critical

//! @SYMTestExpectedResults	1.	Run SetBackgroundColor() method without causing panic

//!				2.	The whole window is displayed on the scrren with the background color TRgb(255,0,0)

//!					only check the sample rectangles: ((0,0),(20,20)), ((0,180),(20,200)), ((180,0),(200,20)), ((180,180),(200,200))

//! @SYMTestType		CIT

	START_TEST_BLOCK	10		T_GraphicsWservAPI	\graphics\GRAPHICS-WSERV-Window-PublicApi.ini

		CREATE_OBJECT	RWsSession	ws

		CREATE_OBJECT	CWsScreenDevice	scrdev

		CREATE_OBJECT	CWindowGc	wingc

		CREATE_OBJECT	RWindowGroup	wingrp

		CREATE_OBJECT	RWindow		win

		COMMAND		ws		new

		COMMAND		ws		Connect

		COMMAND		scrdev		new			GRAPHICS-WSERV-Window-Setup-0002-0001-new_command004

		COMMAND		scrdev		Construct		GRAPHICS-WSERV-Window-Setup-0002-0001-Construct_command005

		COMMAND		scrdev		CreateContext		GRAPHICS-WSERV-Window-Setup-0002-0001-CreateContext_command006

		COMMAND		wingrp		new			GRAPHICS-WSERV-Window-Setup-0002-0001-new_command008

		COMMAND		wingrp		Construct		GRAPHICS-WSERV-Window-Setup-0002-0001-Construct_command009

		COMMAND		win		new			GRAPHICS-WSERV-Window-Setup-0002-0001-new_command011

		COMMAND		win		Construct		GRAPHICS-WSERV-Window-Setup-0002-0001-Construct_command012

		COMMAND		win		SetRequiredDisplayMode	GRAPHICS-WSERV-Window-Setup-0002-0001-SetRequiredDisplayMode_command013

		COMMAND		ws		SetAutoFlush		GRAPHICS-WSERV-Window-Setup-0002-0001-SetAutoFlush_command015

		COMMAND		wingc		Activate		GRAPHICS-WSERV-Window-Setup-0002-0001-Activate_command017

		COMMAND		win		SetBackgroundColor	GRAPHICS-WSERV-Window-PublicApi-0010-0001-SetBackgroundColor_command001

		COMMAND		win		Activate

		COMMAND		win		BeginRedraw

		COMMAND		win		EndRedraw

		COMMAND		scrdev		checkRectColor		GRAPHICS-WSERV-Window-PublicApi-0010-0001-checkRectColor_command006

		COMMAND		wingc		Deactivate

		COMMAND		win		Close

		COMMAND		wingrp		Close

		COMMAND		wingc		~

		COMMAND		scrdev		~

		COMMAND		ws		Close

	END_TEST_BLOCK

END_TESTCASE	GRAPHICS-WSERV-Window-PublicApi-0010

START_TESTCASE	GRAPHICS-WSERV-Window-PublicApi-0011

//! @SYMTestCaseID		GRAPHICS-WSERV-Window-PublicApi-0011

//! @SYMAPI			RWindow

//! @SYMAuthor			Victor Liu

//! @SYMCreationDate		20/12/2006

//! @SYMTestCaseDesc		SetBackgroundColor(): set the background colour used for clearing in server-initiated redraws to none

//!				Uses API elements: RWsSession::Connect & SetAutoFlush, CWsScreenDevice::Construct & CreateContext & GetPixel, RWindowGroup::Construct,

//!				RWindow::Construct & SetRequiredDisplayMode & BeginRedraw & EndRedraw, CWindowGc::Activate & Deactivate

//! @SYMTestActions		1.	Setup and display a RWindow to test

//!					1.1	New and connect a RWsSession

//!					1.2	New and construct a CWsScreenDevice within the RWsSession

//!					1.3	Create a CWindowGc within the CWsScreenDevice (use CreateContext)

//!					1.4	New and construct a RWindowGroup within the RWsSession

//!					1.5	New and construct a RWindow as the child of the RWindowGroup

//!						and SetRequiredDisplayMode (to EColor4K) for the RWindow

//!					1.6	SetAutoFlush to TRUE for the RWsSession

//!					1.7	Activate the CWindowGc to the RWindow

//!				2.	Execute SetBackgroundColor to set the background color to clear, i.e. TRgb(255,255,255)

//!				3.	Run RWindow::BeginRedraw & EndRedraw to display the RWindow with new background color

//!				4.	Check if the expected background color displayed on the screen

//!				5.	Destruct and close all objects used

//! @SYMTestStatus		Implemented

//! @SYMTestPriority		Critical

//! @SYMTestExpectedResults	1.	Run SetBackgroundColor() method without causing panic

//!				2.	The whole window is displayed on the screen with the background color TRgb(255,255,255)

//!					only check the sample rectangles: ((0,0),(20,20)), ((0,180),(20,200)), ((180,0),(200,20)), ((180,180),(200,200))

//! @SYMTestType		CIT

	START_TEST_BLOCK	10		T_GraphicsWservAPI	\graphics\GRAPHICS-WSERV-Window-PublicApi.ini

		CREATE_OBJECT	RWsSession	ws

		CREATE_OBJECT	CWsScreenDevice	scrdev

		CREATE_OBJECT	CWindowGc	wingc

		CREATE_OBJECT	RWindowGroup	wingrp

		CREATE_OBJECT	RWindow		win

		COMMAND		ws		new

		COMMAND		ws		Connect

		COMMAND		scrdev		new			GRAPHICS-WSERV-Window-Setup-0002-0001-new_command004

		COMMAND		scrdev		Construct		GRAPHICS-WSERV-Window-Setup-0002-0001-Construct_command005

		COMMAND		scrdev		CreateContext		GRAPHICS-WSERV-Window-Setup-0002-0001-CreateContext_command006

		COMMAND		wingrp		new			GRAPHICS-WSERV-Window-Setup-0002-0001-new_command008

		COMMAND		wingrp		Construct		GRAPHICS-WSERV-Window-Setup-0002-0001-Construct_command009

		COMMAND		win		new			GRAPHICS-WSERV-Window-Setup-0002-0001-new_command011

		COMMAND		win		Construct		GRAPHICS-WSERV-Window-Setup-0002-0001-Construct_command012

		COMMAND		win		SetRequiredDisplayMode	GRAPHICS-WSERV-Window-Setup-0002-0001-SetRequiredDisplayMode_command013

		COMMAND		ws		SetAutoFlush		GRAPHICS-WSERV-Window-Setup-0002-0001-SetAutoFlush_command015

		COMMAND		wingc		Activate		GRAPHICS-WSERV-Window-Setup-0002-0001-Activate_command017

		COMMAND		win		SetBackgroundColor		GRAPHICS-WSERV-Window-PublicApi-0011-0001-SetBackgroundColor_command005

		COMMAND		win		Activate

		COMMAND		win		BeginRedraw

		COMMAND		win		EndRedraw

		COMMAND		scrdev		checkRectColor		GRAPHICS-WSERV-Window-PublicApi-0011-0001-checkRectColor_command006

		COMMAND		wingc		Deactivate

		COMMAND		win		Close

		COMMAND		wingrp		Close

		COMMAND		wingc		~

		COMMAND		scrdev		~

		COMMAND		ws		Close

	END_TEST_BLOCK

END_TESTCASE	GRAPHICS-WSERV-Window-PublicApi-0011

START_TESTCASE	GRAPHICS-WSERV-Window-PublicApi-0012

//! @SYMTestCaseID		GRAPHICS-WSERV-Window-PublicApi-0012

//! @SYMAPI			RWindow

//! @SYMAuthor			Victor Liu

//! @SYMCreationDate		20/12/2006

//! @SYMTestCaseDesc		SetSize(const TSize &size): set the size of the RWindow

//!				Uses API elements: RWsSession::Connect, RWindowGroup::Construct, RWindow::Construct, RWindowBase::Size

//! @SYMTestActions		1.	Create and construct a simple RWindow to test

//!					1.1	New and connect a RWsSession

//!					1.2	New and construct a RWindowGroup within the RWsSession

//!					1.3	New and construct a RWindow as the child of the RWindowGroup

//!				2.	Execute SetSize to set RWindow to the specified window size

//!				3.	Use RWindowBase::Size to check if the window size is the same as specified

//!				4.	Close all objects used

//! @SYMTestStatus		Implemented

//! @SYMTestPriority		Critical

//! @SYMTestExpectedResults	1.	Run SetSize() method without causing panic

//!				2.	RWindowBase::Size gets the window size as the specified (width 50, height 40)

//! @SYMTestType		CIT

	START_TEST_BLOCK	10		T_GraphicsWservAPI	\graphics\GRAPHICS-WSERV-Window-PublicApi.ini

		CREATE_OBJECT	RWsSession	ws

		CREATE_OBJECT	RWindowGroup	wingrp

		CREATE_OBJECT	RWindow		win