FreePascal.ru

Доброго времени, при считывании строки

z:=(Edit1.Text); // здесь вводим какое либо слово
d:=Length(z); // узнаем длину строки/слова

For i:=1 to d do
begin
//.................... выполнение операций ...

точно Application.ProcessMessages помогло, я просто не хотел нагружать вас лишним кодом поэтому просто в цикле прописал edit, без Application.ProcessMessages в memo так же цикл не писал записей, а сейчас все гуд, спасибо вам форумчане =)

Да Dbf1/First стоит, точно если подождать то он выведет последнее значение в edit, но как сделать, что бы он визуализировал свои действия ?? т.е. что бы выполнял данное действие, а затем делал dbf1.next, что бы оно отображалось в BDgrid ?

Доброго времени суток, возникла проблема при выполнении кода
while not Dbf1.EOF do
begin
Edit1.text:=Dbf1.FieldByName('GL_ID').AsString;
Dbf1.Next;
end;

цикл не выполняется, пробовал for таже проблема в Edit не попадают значения из таблицы gl_id, если же использовать без цикла то все корректно ...