Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2005.02.13;
Скачать: CL | DM;

Вниз

как получить тип фаила от ShellListView   Найти похожие ветки 

 
otar   (2005-01-26 15:52) [0]

помогите пожалуйста.


 
Александр Иванов ©   (2005-01-26 16:01) [1]

А разве там не только папки отображаются?


 
Александр Иванов ©   (2005-01-26 16:02) [2]

Если нет, то:
ShowMessage(ExtractFileExt(ShellTreeView1.Selected.Text));
Но сомнения терзают мою душу :).


 
otar   (2005-01-26 16:21) [3]

ia mogu vziat imiu faila:


procedure TForm2.ShellListView1Click(Sender: TObject);
var
 ShellListView: TShellListView;
 ShellFolder: TShellFolder;
 u: integer;
begin
 if (Sender is TShellListView) then
   if Assigned((Sender as TShellListView).Selected) then
   begin
     ShellListView := Sender as TShellListView;
     ShellFolder := ShellListView.Folders[ShellListView.Selected.Index] as
TShellFolder;
     showmessage(ShellFolder.PathName);

   end;
end;

no eto mne ne pomogaet. ia konkretna xo4u poniat kakoi rasshirenii imeet.


 
TUser ©   (2005-01-26 16:32) [4]

[1]
нет


 
otar   (2005-01-26 16:52) [5]

nu ktonibut podskajet?


 
otar   (2005-01-26 17:33) [6]

NU PADSKAJITE ....



Страницы: 1 вся ветка

Текущий архив: 2005.02.13;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.026 c
4-1103797611
digger
2004-12-23 13:26
2005.02.13
Горизонтальная прокрутка мышью


10-1083047420
JibSkeart
2004-04-27 10:30
2005.02.13
Внутри СОМ не ловит события WaitForMultipleObjects почему ?


14-1106629613
Тыгыдымский конь
2005-01-25 08:06
2005.02.13
Ищу партнера


1-1106812067
s_pavell
2005-01-27 10:47
2005.02.13
Graphics32


14-1106563671
Чеширский_Кот
2005-01-24 13:47
2005.02.13
500-я ошибка: избирательное поведение сайта Мастеров