FreePascal.ru

Спасибо!

Как значение из переменной типа string[8] "загнать" в переменную типа pchar?

Мне нужно приостанавливать выполнение программы каждые 10 секунд. Написал такой таймер:

oldTime:=Time;
repeat
begin
newTime:=Time;
x:=newTime-oldTime;
if x<0 then x&#58;=10;
end;
until x>=10;

Time - это функция, возвращающая системное время.

После компиляции в Freepascal ...