Текущий архив: 2005.12.11;
Скачать: CL | DM;
ВнизTRichEdit Найти похожие ветки
← →
Express (2005-11-20 18:03) [0]Люди помогите, такая проблема… Вводиться текст в TRichEdit, я хочу его изменить (удалить пробелы) и после этого уже отредактированный текст вывести в совершенно другой TRichEdit.
А получается, так что при выводе текста в новый TRichEdit у меня изменяется также текст в текущем TRichEdit.
Я так понимаю, что происходит не переприсваивание значения, а ссылка на него...
Правильно ли я думаю? Как мне сделать, то что я задумал? Заранее благодарен…
Var
CurText: TStrings;
begin
….
CurText :=TStrings.Create;
CurText :=RETextCur.Lines;
Metode.SpaceDelete(CurText); //Удаляет пробелы, это не так //////важно…
RETextNew.Lines :=CurText;
…..
End;
← →
Gydvin © (2005-11-20 22:39) [1]Я бы сделал так
var
list:tstringlist;
begin
list:=tstringlist.create;
list.text:=richedit1.text;
delprobel(list);
richedit2.text:=list.text;
list.free;
end;
илиvar
s:string;
begin
s:=richedit1.text;
delprobel(s);
richedit2.text:=s;
end;
← →
Victor! © (2005-11-21 02:12) [2]или так RETextNew.Lines.Assign(CurText);
← →
Express (2005-11-21 12:17) [3]Victor! © и Gydvin © вам большое спасибо... Все работает!!!
var
CurTextList: TStringList;
begin
...
CurTextList :=TStringList.Create;
CurTextList.Assign(RETExtCur.Lines);
Metode.SpaceDelete (CurTextList)//удаление пробелов
RETextNew.Lines.Assign(CurTextList);
...
end;
Страницы: 1 вся ветка
Текущий архив: 2005.12.11;
Скачать: CL | DM;
Память: 0.44 MB
Время: 0.037 c