Вниз
Скачать: CL | DM;

Очень срочный вопрос!!   Найти похожие ветки 

 
cypher ©   (2002-04-26 23:17) [0]

Народ, подскажите, как вызвать стандартный Виндовый диалог, открытия общего доступа к папке?


 
Vovchik ©   (2002-04-26 23:51) [1]

В принципе, можно так:

var
ei:SHELLEXECUTEINFOA;
begin
ZeroMemory(@ei,sizeof(ei));
ei.cbSize:=sizeof(ei);
ei.fMask:=$C;
ei.lpVerb:="properties";
ei.nShow:=SW_SHOW;
ei.lpFile:="d:\";
ShellExecuteEx(@ei);
end;

Если надо только одну вкладку с доступом, то это делается с помощью СОМ-интерфейсов на соответствующие объекты. Как это делается точно, я не знаю. Поищи статьи на эту тему или посмотри хелп на IContextMenu.


 
arhelon ©   (2002-04-27 07:40) [2]

Смотри новости всл на ентом сайте там был компонентик который вызывает разного рода диологи виндовые не помню точно есть там он но много там всего


 
cypher ©   (2002-04-27 16:46) [3]

arhelon, нашел psvDialogs library, там нет того что мне нужно =(

vovchik, искал, смотрел... нифига нету =\


 
Ally ©   (2002-04-27 17:18) [4]

Может быть WNetConnectionDialog() поможет?


 
Vovchik ©   (2002-04-27 17:41) [5]

> cypher © (27.04.02 16:46)

Чего нету? Приведённый мной пример выводит стандартное окно свойств каталога или файла. Там есть вкладка "Доступ". Чего не так?


 
cypher ©   (2002-04-27 17:47) [6]

Ally - нет, этот диалог, подключения сетевых ресурсов, а мне нада расшарить папку, используя стандартный виндовый диалог...

кстати, вот что я нашел
в NT есть ntshrui.dll, он експортирует функции SharingDialog, SharingDialogA, SharingDialogW и еще кучу полезных функций (например IsPathShared, CanShareFolder и пр.)

в 9x есть аналогичная msshrui.dll

Стандартная прога NetWatch из Win98 использует именно эту длл...

Мож терь кто подскажет как этими функциями пользоваться... а то у меня нету SoftIce по XP, и я не могу проследить какие параметры передаются функциям SharingDialog.

А google на строчку SharingDialog показывает пугающую пустоту =(


 
cypher ©   (2002-04-27 17:59) [7]

Vovichik, не спорю, я про ContextMenu. Это конечно выход, но не самый удачный =(... посмотри как делает NetWatch виндовый (если есть 9x), вот мне нада так же...



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

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.01 c
14-39826
Alx2
2002-04-03 12:33
2002.05.13
Вопрос, скорее,


1-39720
aabark
2002-04-26 09:24
2002.05.13
Service pack for Delphi6 > 1


4-39896
Марина
2002-03-11 10:23
2002.05.13
Поиск строки в StringGrid


3-39673
sergling
2002-04-16 23:03
2002.05.13
Доступ к MSSQL


1-39724
Ирина
2002-04-27 13:18
2002.05.13
Научите меня, очень жду помощи!




   Наверх