
05.04.2013, 19:23
|
 |
LMD-DML
|
|
Регистрация: 12.07.2009
Адрес: Богородское
Сообщения: 3,025
Версия Delphi: D7E
Репутация: 1834
|
|
Цитата:
Сообщение от Corwin13
...при следующем запуске программы и загрузке списка файлов из файла - всё подгружается, но двойной клик не работает...
|
Код:
procedure TForm1.ListView1DblClick(Sender: TObject);
begin
ShellExecute(Application.MainForm.Handle,'Open',PChar(ListView1.Selected.SubItems[0]),Nil,Nil,SW_SHOW);
end;
|