Работа с реестром на чистом WINAPI

← →
GRAVIX (2006-03-15 04:02) [0]

Пожалуйста подскажите мне, как средствами WINAPI поставить мою прогу на автозагрузку. Очень вважен размер программы, потому и не хочу использивать Tregistry.

← →
balepa © (2006-03-15 08:44) [1]

http://www.vb.kiev.ua/ref/w32api/showdoc.php?f=regcreatekey
Примеры НА VB но переделать не трудно

← →
VirEx © (2006-03-15 19:17) [2]

function read(path,Section:string):variant;
var
key:hKey;
dwType, dwKeySize: DWORD;
begin
try
RegOpenKeyEx(HKEY_CURRENT_USER,PChar(path),0,KEY_READ,key);
if key=0 then exit;
dwType:=REG_SZ;
dwKeySize:=10;
//=======
RegQueryValueEx(key,PChar(Section),nil,@dwType,PByte(buff),@dwKeySize);
result:=Variant(string(buff));
finally
RegCloseKey(key)
end;
end;

function write(path,Section,Value:string):variant;
var
key:hKey;
dwKeySize: DWORD;
begin
try
RegCreateKeyEx(HKEY_CURRENT_USER,PChar(path), 0, nil,REG_CREATED_NEW_KEY, KEY_ALL_ACCESS, nil, Key, @dwKeySize);
if key=0 then exit;
dwKeySize:=10;
//=======
buff:=PChar(IntToStr(SelectedNum));
RegSetValueEx(key,PChar(Section),0,REG_SZ,PChar(Value),10);
finally
RegCloseKey(key)
end;
end;

← →
GRAVIX (2006-03-15 23:57) [3]

Всем ппасиба! Вы очень мне помогли.

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