Procedure Delay (DTime: Word) ;
Delay waits a specified number of milliseconds. The number of specified seconds is an approximation, and may be off a lot, if system load is high.
None
Program Example15;
uses Crt;
{ Program to demonstrate the Delay function. }
var
i : longint;
begin
WriteLn('Counting Down');
for i:=10 downto 1 do
begin
WriteLn(i);
Delay(1000); {Wait one second}
end;
WriteLn('BOOM!!!');
end.