| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

ShellList

IL-2 ©   (2002-08-29 15:08:00) 

На форми у меня ShellListView и в OnClick следущие

var
s:=string;
...
s:=ShellListView.SelectedFolder.PathName;
showmessage(s);
...

Если я не выберу файла а просто кликну по ShellListView тогда выходит ошибка. Как ее исправить?

---

IL-2   (2002-08-29 15:25:00) [1]

Всем спасиба

---

Skier   (2002-08-29 15:20:00) [2]

или :)


with ShellListView do begin
if Assigned(SelectedFolder) then begin
S := SelectedFolder.PathName;
end; //if
end; //with


---

McSimm   (2002-08-29 15:18:00) [3]

Можно по другому. Несколько способов точно можно придумать.
Только непонятно какой нужен.
Чем не устраивает?
if Assigned(ShellListView.SelectedFolder) then
s:=ShellListView.SelectedFolder.PathName
else ...

---

IL-2   (2002-08-29 15:11:00) [4]

2song
а по другому можна?

---

Song   (2002-08-29 15:09:00) [5]

Проверяйте на nil:
IF Assined(...

---

Наверх