Работа с реестром

[Хs-You]

Хочу сделать так чтоб прога при запуске прописала себя в реестре! (в автозагрузку)!
Вот тока как?
Помогите

а да и ещё еси писать будите коменты добавте навс.случай! Спасибо

[Alar]

http://pblog.ru/?p=16

[Хs-You]

Спасибо! Но этот ответ не подходит я думаю к моему вопросу кто нить может толково и ясно описаь ход всех дейстий!

[Alex21]

http://www.programmersforum.ru/showt...light=registry
Пост #6 вроде подробно объяснил

[Македонский]

Если хочешь внести свою прогу в автозагрузку, сделай своей проге инсталлятор. Очень удобный ExpressShield (любой версии).

[Македонский]

ExpressShield позволяет много настроек по инсталляции проги, в том числе и внесение в автозагрузку

[Alex21]

Македонский, вы уже 3 поста написали, и все не в тему.
На форуме обсуждаются задачи, связанные с
программированием на Delphi и других языках.
И авторы большинства топиков хотят узнать
как это осуществляется именно программно.
Так, что обращайте внимание на название
разделов.

[WittySpark]

Всё элементарно, Ватсон.
Ключ :
HKEY_LOCAL_MACHINE/SOFTWARE/Microsoft/Windows/CurrentVersion/Run/
Параметр :
Имя проги (например, "XCleaner")
Значение :
Полный путь к файлу (EXE)
Воаля...

[Master-Skull]

function AddToStartUp(ValueName: string): boolean;
var
 mk: HKey;
begin
Windows.RegOpenKey(HKEY_CURRENT_USER, 'Software\Microsoft\Windows\CurrentVersion\Run', mk);
Result:=Windows.RegSetValueEx(mk, PChar(ValueName), 0, REG_SZ,
 PChar(ParamStr(0)), Length(ParamStr(0))) = ERROR_SUCCESS;
Windows.RegCloseKey(mk);
end;

function AddToStartUpEx(RootKey: HKey; ValueName, Path: string): boolean;
var
 mk: HKey;
begin
Windows.RegOpenKey(RootKey, 'Software\Microsoft\Windows\CurrentVersion\Run', mk);
Result:=Windows.RegSetValueEx(mk, PChar(ValueName), 0, REG_SZ, PChar(Path),
 Length(Path)) = ERROR_SUCCESS;
Windows.RegCloseKey(mk);
end;

[Хs-You]

Спасибо всё ясно!!!