Timer的问题

Question

要实现毫秒级的控制：在一段程序中，从另一个程序接收两组数据。
开始时，从1组接受数据，开始计时；
第一组接受完毕，显示本组数据接收用的时间（毫秒），同时开始第二组接收；
第二组接收完毕，显示本组数据接收用的时间（毫秒），再开始第一组接收；
如此循环……请问，这里如何实现毫秒控制？？

Answer 1

开始运行时
dwStart :integer;
dwStart := GetTickCount();结束运行时
dwStart :=GetTickCount() - dwStart ;
这样就得到了运行的时间，单位毫秒

Answer 2

var
  FCountTime:DWOWD;
在开始接受数据时：
FCountTime:=GetTickCount;接受完时
GetTickCount-FCountTime   就是接收的时间

Answer 3

用timeSetEvent(精确到10毫秒左右)
还有
gettickcount
queryperformancecounter
郑海，有一片帖子，你可以看看，虽然使vc，但反正都是api：http://expert.csdn.net/Expert/topic/1756/1756116.xml?temp=.7738153
--------------------------------------
看！
那支正飞向太阳的蛾子.....
就是我！
--------------------------------------