Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > Delphi: Общие вопросы > Cтроки ListBox обьединить в 1 строку

Автор: pomogite 9.1.2007, 15:14

Есть ListBox как все его строки можно обьединить в 1 строку? Например чтобы все его строки отображались в Эдит?

Автор: Rodman 9.1.2007, 15:15

цыклом загони...

Автор: pomogite 9.1.2007, 15:20

Я незнаю как...

Автор: Sunvas 9.1.2007, 15:21

Цитата(Rodman @ 9.1.2007, 15:15

)

цыклом загони...

Да не надо никакого цикла. Зачем себе жизнь усложнять??

Код


Edit1.text:= StringReplace(listbox1.items.Text, #13#10, ' ', [rfReplaceAll]);

Автор: pomogite 9.1.2007, 15:26

Спасибочки!!! А что значит #13#10 ???

Автор: Sunvas 9.1.2007, 15:27

Цитата(pomogite @ 9.1.2007, 15:26

)

#13#10

Это код разрыва строки (Enter)

Автор: Rennigth 9.1.2007, 15:28

Цитата(pomogite @ 9.1.2007, 15:26

)

#13#10

комбинация ascii - кодов переноса строки.

Автор: Romikgy 9.1.2007, 16:02

Код


lst1.Items.Delimiter:=' ';
edt1.Text :=lst1.Items.DelimitedText;