// Copyright (c) 1995-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:

// Test GDI scaling (pixels<->twips) functions

// You can probably delete this test as it is now done by TMSCRMOD for each screen mode.

// 

//

#include <e32std.h>

#include "W32STD.H"

#include "../tlib/testbase.h"

#include "TMAN.H"

class TScaleTest;

class CScaleWindow : public CTWin

	{

public:

	CScaleWindow(TScaleTest *aTest);

	void SetUpLD(TPoint pos,TSize size,CTWinBase *parent, CWindowGc &aGc);

	void Draw();

	void WinKeyL(const TKeyEvent &aKey,const TTime &aTime);

private:

	TScaleTest *iTest;

	};

class TScaleTest : public CTestBase

	{

public:

	TScaleTest();

	~TScaleTest();

	TestState DoTestL();

	void ConstructL();

private:

	CScaleWindow *iWin;

	TSize iWinSize;

	TInt iState;

	};

GLDEF_C CTestBase *CreateScaleTest()

	{

	return(new(ELeave) TScaleTest());

	}

CScaleWindow::CScaleWindow(TScaleTest *aTest) : CTWin(), iTest(aTest)

	{}

void CScaleWindow::SetUpLD(TPoint pos,TSize size,CTWinBase *parent, CWindowGc &aGc)

	{

	ConstructExtLD(*parent,pos,size);

	Activate();

	AssignGC(aGc);

	}

void CScaleWindow::Draw()

	{

	iGc->Clear();

	TSize twips=Client()->iScreen->SizeInTwips();

	TSize pixels=Client()->iScreen->SizeInPixels();

// Horizontal line

	TInt inches=twips.iWidth/KTwipsPerInch-1;

	TInt lineLen=Client()->iScreen->HorizontalTwipsToPixels(inches*KTwipsPerInch);

	TPoint linePos=TPoint((pixels.iWidth-lineLen)/2,pixels.iHeight/2);

	iGc->DrawLine(linePos,linePos+TPoint(lineLen,0));

	TBuf<0x20> buf;

	buf.Format(TRefByValue<const TDesC>(_L("Width %d\"")),inches);

	iGc->DrawText(buf,TPoint((pixels.iWidth-iFont->TextWidthInPixels(buf))/2,linePos.iY-iFont->HeightInPixels()+iFont->AscentInPixels()-2));

	TInt index;

	for(index=0;index<=inches;index++)

		{

		TInt dx=Client()->iScreen->HorizontalTwipsToPixels(index*KTwipsPerInch);

		TInt dy=Client()->iScreen->VerticalTwipsToPixels(KTwipsPerInch/(index==0 || index==inches ? 8 : 16));

		iGc->DrawLine(linePos+TPoint(dx,1), linePos+TPoint(dx,dy));

		}

// Vertical line

	inches=twips.iHeight/KTwipsPerInch;

	lineLen=Client()->iScreen->VerticalTwipsToPixels(inches*KTwipsPerInch);

	linePos.iY=(pixels.iHeight-lineLen)/2;

	iGc->DrawLine(linePos,linePos+TPoint(0,lineLen));

	buf.Format(TRefByValue<const TDesC>(_L("Height %d\"")),inches);

	iGc->DrawText(buf,TPoint(linePos.iX+10, pixels.iHeight/4));

	for(index=0;index<=inches;index++)

		{

		TInt dx=Client()->iScreen->HorizontalTwipsToPixels(KTwipsPerInch/(index==0 || index==inches ? 8 : 16));

		TInt dy=Client()->iScreen->VerticalTwipsToPixels(index*KTwipsPerInch);

		iGc->DrawLine(linePos+TPoint(1,dy), linePos+TPoint(dx,dy));

		}

	}

void CScaleWindow::WinKeyL(const TKeyEvent &,const TTime &)

	{

	CActiveScheduler::Stop();

	}

TScaleTest::TScaleTest() : CTestBase(_L("Scale"))

	{}

TScaleTest::~TScaleTest()

	{

	CTWin::Delete(iWin);

	}

void TScaleTest::ConstructL()

	{

	CScaleWindow *win=new(ELeave) CScaleWindow(this);

	win->SetUpLD(TPoint(0,0),Client()->iScreen->SizeInPixels(),Client()->iGroup,*Client()->iGc);

	iWin=win;

	Client()->iGroup->SetCurrentWindow(iWin);

	}

TestState TScaleTest::DoTestL()

	{

	switch(iState)

		{

		case 0:

			LogSubTest(_L("Scale 1"),1);

			CActiveScheduler::Start();

			iState++;

			break;

		default:

			return(EFinished);

		}

	return(ENext);

	}