Показать сообщение отдельно
  #1  
Старый 12.10.2010, 20:08
13exe 13exe вне форума
Прохожий
 
Регистрация: 11.10.2010
Сообщения: 1
Репутация: 10
По умолчанию Получение пути через реестр с помощью WinAPI

Попрошу профи помочь решить одну задачу. Может быть она и простая, но у меня, только что начавшего изучать Delphi вызвала затруднения. Итак...

Необходимо получить путь из строкового параметра в реестре и по этому пути удалить файл. С помощью Registry данная задача решилась достаточно просто:

Код:
uses Windows, Registry, SysUtils;

const
target = 'файл_для_удаления.exe';

var
Registry : TRegistry;
path      : string;

Registry             := TRegistry.Create;
Registry.RootKey := HKEY_CURRENT_USER;

if Registry.KeyExists   ('ключ\подключ1\подключ2') then
begin
Registry.OpenKey      ('ключ\подключ1\подключ2', false);
Registry.ReadString   ('строковый_параметр');
Path := Registry.ReadString  ('строковый_параметр');
if FileExists(Path+'\'+target)then
DeleteFile (path+'\'+target);
Registry.CloseKey;
Registry.Free;

Но есть необходимость решить данную задачу исключительно при помощи WinAPI. Попытался разобраться в функциях, изложенных здесь http://www.delphisources.ru/pages/fa...istry_api.html, однако знаний не хватает. Прошу помочь.
Ответить с цитированием