请各位大佬帮帮忙吧!!
用这下面的方法,怎样才能实现画一条直线能跟着当时秒数跳动呢?不知该怎样写,请帮忙吧~~~~~~~~~~~
void __fastcall TForm1::Timer1Timer(TObject *Sender)
{ Word Hour,Min,Sec,MSec;
TDateTime dtPresent = Now();
DecodeTime(dtPresent,Hour,Min,Sec,MSec);
double D,S,H,X,Y;
int C=5;
D=360/60;
H=180/3.14*D;
X=cos(H)*C;
Y=sin(H)*C;
Canvas->FillRect(ClientRect);
Canvas->MoveTo(125, 90);
Canvas->LineTo(X, Y);