为什么不对

Question

Form1:=TForm1.create(application);
 Form1.show;
 Form1.update;
 mydate:=getTickCount;
while((GetTickcount-mydate)/1000<2) do;
Application.Initialize;
Application.Title:='社区卫生';
Application.CreateForm(TForm2, TForm2);
Form1.Close;
Form1.free;
Application.Run;gettickcount函数不对为什么，该怎么改

Answer 1

你要在Uses部分写上它所在的单元,把它所在的单元Uses进来