if Readd(indexbuf)=1323 then begin Namebuf{string значение}:=Чото тут , например строка 1323 чтение с символа 6 до конца строки. end;