Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2005.01.09;
Скачать: [xml.tar.bz2];

Вниз

TShellListView   Найти похожие ветки 

 
Progh   (2004-12-20 16:00) [0]

Как в компоненте TShellListView запретить запускать файлы, а также запретить вызов контексного меню проводника(а лучше заменить своим )?


 
olookin ©   (2004-12-20 18:21) [1]

AutoContextMenus:=false решает все проблемы...


 
DelphiN! ©   (2004-12-21 14:06) [2]


> [1] olookin ©   (20.12.04 18:21)


EXE файлы всеравно запускаются ...


 
Progh   (2004-12-22 08:49) [3]

Так как сделать чтобы ничего не запускалось из TShellListView-a


 
Progh   (2004-12-24 06:30) [4]

Народ, ну помогите, очень надо !


 
olookin ©   (2004-12-24 08:31) [5]

[4] Progh   (24.12.04 06:30)

По моему, надо как то изменить жирные куски в исходном коде TShellListView

procedure TCustomShellListView.DblClick;
begin
 if FAutoNavigate and (Selected <> nil) then
   with Folders[Selected.Index] do
     if IsFolder then
       SetPathFromID(AbsoluteID)
     else
       ShellExecute(Handle, nil, PChar(PathName), nil,
         PChar(ExtractFilePath(PathName)), 0);  
 inherited DblClick;
end;



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

Форум: "Основная";
Текущий архив: 2005.01.09;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.45 MB
Время: 0.061 c
1-1103734070
Japp
2004-12-22 19:47
2005.01.09
Можно ли в Делфи определить номер строки PAS-файла?


8-1096609183
Ozone
2004-10-01 09:39
2005.01.09
Video + Audio


1-1103556332
malij
2004-12-20 18:25
2005.01.09
messages


6-1098342701
AngelFire
2004-10-21 11:11
2005.01.09
Получение локального IP-адреса


3-1102513151
Виктор23
2004-12-08 16:39
2005.01.09
Медленное выполнение ADODataSet1.Next





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский