Как последовательно считывать параметр PV с ТРМ201?

[iKarma]

Собственно сабж.

Если просто считывать вот так:

adr:=StrToInt(ebAdr.Text);
chitaen_nazvanie:=ReadFloat24(adr,0,'PV',val,-1);
Label4.Caption:=FloatToStr(val);

то всё в порядке - параметр считывается

Пытался считать вот так вот:

adr:=StrToInt(ebAdr.Text);
for i:=1 to 18 do
  begin
    chitaen_nazvanie:=ReadFloat24(adr,0,'PV',val,-1);
    sleep(300);
    Label4.Caption:=FloatToStr(val);
end;

не работает. RS мигает на приборе и показывает последнее значение. Мне нужно как-то считывать эти значения, чтобы добавлять их в таблицу и/или отображать их на графике. Не знаю как это сделать, есть у кого какие идеи?