Показать сообщение отдельно
  #3  
Старый 07.05.2011, 15:46
Mayonez Mayonez вне форума
Прохожий
 
Регистрация: 02.05.2011
Сообщения: 5
Репутация: 10
По умолчанию

Цитата:
Сообщение от march
Так до выполнения этой строки listbox1 должен быть заполнен записями - один,
в listbox1 должен быть УЖЕ выделен какой-либо путь (или инициализирован listbox1.ItemIndex) - два.

Один - заполнил
Код:
begin
  if FindFirst('*.txt', faAnyFile, searchResult) = 0 then
  begin
    repeat
      Form7.ListBox1.Items.Add(searchResult.Name);
    until FindNext(searchResult) <> 0;
    FindClose(searchResult);
  end;
end;
Два - непонятно... я просто в евенте на он клик создал вышеизложеную строчку
Код:
  Memo1.Lines.LoadFromFile(listbox1.Items[listbox1.ItemIndex]);
Ответить с цитированием