vc编写一个模拟时钟的程序(VC write an analog clock program)

vc

编写一个模拟时钟的程序（

VC write an analog clock program

）

I'm sorry, my program is too big, 4M, because there are other

functions

No way. Towel section procedures

Void CFill_areaView:: myShowColok (CDC, *pDC)

{

M_time=CTime:: GetCurrentTime ();

PDC->FillRect (&CRect (0,0, (), ()),

&CBrush (RGB (100100100));

CBrush brush (RGB (150150150));

CBrush *oldbrush=pDC->SelectObject (&brush);

CPen pen (PS_SOLID, 3, RGB (0,0,0));

CPen *oldpen=pDC->SelectObject (&pen);

PDC->Ellipse ( (), /2- ( ()), /2,

()

(/2-10

()),

/2-

(

()),

/2,

(), /2+ ( ()), /2, () (&CRect (), /2+

( ()), /2-10 (/2-10) /2) /2-10 ());

PDC->Ellipse (&CRect ( ()), /2-3, (),

/2-3, (), /2+3, () /2+3);

CPen PEN2 (PS_SOLID, 7, RGB (0,0,0));

PDC->SelectObject (&pen2);

PDC->MoveTo ( (), /2, (), /2-16*

( (), /2-10) /20);

PDC->LineTo ( (), /2-15* ( ()), /20,

(), /2-6* ( ()) /2-10) /20 (/2-10);

PDC->LineTo ( (), /2-15* ( ()), /20,

(), /2+12* ( ()) /2-10) /20 (/2-10);

PDC->LineTo ( (), /2+15* ( ()), /20,

(), /2+12* ( ()) /2-10) /20 (/2-10);

PDC->LineTo ( (), /2+15* ( ()), /20,

(), /2-6* ( ()) /2-10) /20 (/2-10);

PDC->LineTo ( (), /2, (), /2-16*

( (), /2-10) /20);

PDC->MoveTo ( (), /2-15* ( ()), /20+25,

(), /2+12* ( ()) /2-10) /20 (/2-10);

PDC->LineTo ( (), /2-15* ( ()), /20+25,

(),

/2+12*

(

())

/2-10)

/20+30

(/2-10);

PDC->LineTo

(

(),

/2-15*

(

()),

/20+25+40,

(),

/2+12*

(

())

/2-10)

/20+30

(/2-10);

PDC->LineTo

(

(),

/2-15*

(

()),

/20+25+40,

(), /2+12* ( ()) /2-10) /20 (/2-10);

PDC->MoveTo ( (), /2+15* ( ()), /20-25,

(), /2+12* ( ()) /2-10) /20 (/2-10);

PDC->LineTo ( (), /2+15* ( ()), /20-25,

(),

/2+12*

(

())

/2-10)

/20+30

(/2-10);

PDC->LineTo

(

(),

/2+15*

(

()),

/20-25-40,

(),

/2+12*

(

())

/2-10)

/20+30

(/2-10);

PDC->LineTo

(

(),

/2+15*

(

()),

/20-25-40,

(), /2+12* ( ()) /2-10) /20 (/2-10);

CPen pen1 (PS_SOLID, 1, RGB (0,0,0));

PDC->SelectObject (&pen1);

Double alpha=0;

MyPoint, P1, P2, p3;

P1=m_pointColok[0], p2=m_pointColok[4], p3=m_pointColok[5];

For (int i=0; i<=60; i++)

{

Alpha=i*6*pi/180;

P1.x=m_pointColok[0].x*cos (alpha) -m_pointColok[0].y*sin

(alpha);

P1.y=m_pointColok[0].x*sin (alpha) +m_pointColok[0].y*cos

(alpha);

PDC->MoveTo (ChangePoint (P1).X, ChangePoint (P1).Y);

P2.x=m_pointColok[4].x*cos (alpha) -m_pointColok[4].y*sin

(alpha);

P2.y=m_pointColok[4].x*sin (alpha) +m_pointColok[4].y*cos

(alpha);

P3.x=m_pointColok[5].x*cos (alpha) -m_pointColok[5].y*sin

(alpha);

P3.y=m_pointColok[5].x*sin (alpha) +m_pointColok[5].y*cos

(alpha);

If (i%5==0)

PDC->LineTo (ChangePoint (P2).X, ChangePoint (P2).Y);

Else

PDC->LineTo (ChangePoint (P3).X, ChangePoint (P3).Y);

PDC->SetBkMode (TRANSPARENT);

CFont font;

Font (16,12,0,0, FW_NORMAL),

假，假，假，

ansi_charset

，

out_default_precis

，

c lip_default_precis

，

default_quality

，

default_pitch | ff_swiss

，“

Arial

”）

；

CFont * oldfont = PDC -> Se lectObject

（与字体）

；

/ /

改变字体

PDC -> SetTextColor

（

< br>RGB

（

255205100

）

）

；

PDC

->

TextOut

（矩形。

width()

/

2-0.9

*

（矩形。

height()

/

2-10

）

/ 2

，矩形。

height() / 2-5

，“

9

”）

；

PDC

->

TextOut

（矩形。

width()

/

2

+

0.9

*

（矩形。

height()

/

2-30

）

/ 2

，矩形。

height() / 2-5

，“

3

”）

；

PDC -> TextOut

（矩形。

width() / 2-10

，矩形。

height() / 2-0.9

*

（矩形。

height() / 2-10

）

/ 2

，“

12

”）

；

PDC

->

TextOut

（矩形。

width()

/

2-10

，矩形。

height()

/

2

+

0.9

*

（矩形。

height() / 2-10

）

/ 2-10

，“