type TStopWatch = class()
Constructor Create; |
|
function CurrentTime: comp; |
|
procedure Go; |
|
procedure Stop; |
|
function Timer: comp; |
Constructor Create; |
function CurrentTime: comp; |
procedure Go; |
procedure Stop; |
function Timer: comp; |
property Timing: boolean; |
property Timing: boolean; |