List Box

[Ekzamenator]

Как объединить несколько строк лист бокса в 1?
Текст слишком большой и не влезает в 1 строку
Зы:и еще интересует, как можно привязать к кнопки, запуск презентации?

[NetSpace]

выбираете строчку, а он объединяет её с последующей

procedure TForm1.ListBox1Click(Sender:TObject);
begin
   ListBox1.Items[ListBox1.ItemIndex]:=ListBox1.Items[ListBox1.ItemIndex]+ListBox1.Items[ListBox1.ItemIndex+1];
end;

а по поводу презентации поищите в разделах OFFICE

[Ekzamenator]

а как выбрать эту строчку,куда вставить номер строчки?допустим мне нужно объединить 1 строчку со 2 и 3

[NetSpace]

ListBox1.Items[ListBox1.ItemIndex] - это и есть Ваша выбранная в списке строка. и номер её определяется программой при выборе - это ListBox1.ItemIndex.
а теперь вам надо сплюсовать ещё две следющие строки:

ListBox1.Items[ListBox1.ItemIndex]:=ListBox1.Items[ListBox1.ItemIndex]+ListBox1.Items[ListBox1.ItemIndex+1]+ListBox1.Items[ListBox1.ItemIndex+2];