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

Вниз

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

 
lord   (2003-08-28 00:10) [0]

привет всем
народ подскажите как прочитать все записи в определенной ветви реестра
например есть ветв реестра (HKEY_LOCAL_MACHINE\SYSTEM\ControlSet001\Services\lanmanserver\Shares)
в неи перечисленны расшаренные ресурсы
нужно получить список етих ресурсов (их имена )


 
Rouse_   (2003-08-28 00:51) [1]

procedure TForm1.FormCreate(Sender: TObject);
begin
with TRegistry.Create do
try
RootKey := HKEY_LOCAL_MACHINE;
if OpenKeyReadOnly("Ключ") then
GetKeyNames(ListBox1.Items);
finally
CloseKey;
Free;
end;
end;


А шары получать нужно вот так: http://www.delphimaster.ru/articles/netmon/index.html

Желаю успехов



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

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

Наверх




Память: 0.44 MB
Время: 0.008 c
6-24609
gedd
2003-06-18 08:10
2003.09.08
Перекодировка темы письма в POP3


14-24614
3APA3A
2003-08-21 16:55
2003.09.08
С целью повышения образованности...


3-24367
Salvator
2003-08-15 21:23
2003.09.08
Работа с SQL


14-24643
RIMMER
2003-08-21 01:07
2003.09.08
ShlWAPI для Delphi


14-24660
nikkie
2003-08-20 14:02
2003.09.08
не так давно тут мишек обсуждали





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский