![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Компонент
cibo © (2003-01-21 10:17:00)Как вычислить название выбранных файлов в компоненте ShellListView (я пользуюсь Delphi6)? Заранее благодарин.
msts (2003-01-21 10:24:00) [1]перечитал вопрос:
procedure AddFolderInfo(Folder : TShellFolder);
var
LPathName : string;
...
begin
LPathName := Folder.PathName;
:= Folder.Name; или что там
...
msts (2003-01-21 10:21:00) [2]вот
with TShellListView(Source) do
if MultiSelect and (SelCount>1) then begin
for t:=0 to Items.Count-1 do
if Items[t].Selected then
AddFolderInfo(Folders[Items[t].Index]);
end else AddFolderInfo(SelectedFolder);
AddFolderInfo - ignore