Как убрать знаки Entera при конвертации данных?

← →
Denmin © (2004-12-09 13:55) [0]

Здравствуйте.
Перебрасываю данные из одной таблицы в другую. Из первой таблицы с помощью Query, выбираю записи, далее из поля Memo беру текст и пихаю его во вторую таблицу с текстовым полем, т.е. Table2["Text"]:=Query1["Memo"]. Так вот в мемо есть символы Enter"a, а мне они не нужны. Хотелось бы их убрать. Может кто сталкивался с таким. Помогите пожалуйста.
Заранее благодарен.

← →
Александр Иванов © (2004-12-09 14:01) [1]

Str:=Query1["Memo"];
while pos(#13#10,Str)>0 do
Delete(Str,Pos(#13#10,Str),2);
Table2["Text"]:=Str;

← →
Denmin © (2004-12-09 16:30) [2]

to Александр Иванов
спасибо. но прошу прощения, не так выразился, не убрать, а заменить пробелом

← →
Fran (2004-12-09 18:01) [3]

В QStrings.pas есть функция кот. это делает

Unit StrUtils

AnsiReplaceStr()
AnsiReplaceText()

Как убрать знаки Entera при конвертации данных? Найти похожие ветки