Показать сообщение отдельно
  #4  
Старый 18.05.2009, 12:01
egor1978 egor1978 вне форума
Прохожий
 
Регистрация: 18.05.2009
Сообщения: 4
Репутация: 10
По умолчанию еще вопросик

как сделать так, что бы при копировании выделенного текста из
RICHEDIT (несколько выделенных строк) в LISTBOX копирование
происходило не просто всех выделенных символов, а еще учитывался
#13 Enter. то есть что б в лист боксе так же вставлялись несколько
строк.

Код:
procedure TForm1.Button1Click(Sender: TObject);

var s:string;

begin
s:=richedit1.SelText;
listbox1.Items.Add(s);

end;
Ответить с цитированием