Help - timing ve W95

[Kosta]

----- Original Message -----
From: zd.sn <zd.sn@volny.cz>
To: Multiple recipients of list <hw-news@list.gin.cz>
Sent: Wednesday, February 02, 2000 8:32 PM
Subject: Re: Help - timing ve W95


Zdravim,
V jednoduchosti je sila.
uses windows;
var
relativni_milisekunda,skutecna_milisekunda,psek:Longint;


relativni_milisekunda:=GetTickCount;

do cyklu das

 psek:=GetTickCount;
 skutecna_milisekunda:=psek-relativni_milisekunda;

A mas to presne na milisekundy. Chodi spolehlive.


Jo a co takhle k tomu spustit jden az dva thready, kde je pak ta presnost
opakovani.

Kosta

kosta@iol.cz
-------------------------------------------
             Kosta
             P.O.Box 38
             Posta 41
141 00  Praha 4 - Sporilov
-------------------------------------------
0603 / 33 87 47
-------------------------------------------