автозагрузка

[sevitov_yura]

Доброе время суток! Подскажите пожалуйста, как прописать программу на чистом winAPI в реестр в автозапуск??? Без всяких Tregistry и т.д. Надеюсь понимаете о чём идёт речь...

Пробовал по-разному, но в основном косяк в этом: при прописывание в реестр, нужен путь к исполняемому файлу, а я в USES слово FORMS не прописываю значит Application.EXEname - не пойдёт... как обойти данный косяк???

прошу не писать ответы типа закинуть в папку АВТОЗАГРУЗКА и подобной чепухи, это для полных идиотов)))

[Пепел Феникса]

ParamStr(0)
даст путь к exe эта функция прописана в модуле System который всегда подключен.

[sevitov_yura]

ругается на типы: string и pointer....

[sevitov_yura]

вот чё у меня получилось:

program Project2;
uses windows;
var k:hkey;
begin
RegOpenKeyEx(HKEY_LOCAL_MACHINE,'so ftware\microsoft\windows\currentver sion\run',0,KEY_ALL_ACCESS,k);
RegSetValueEx(k,'rundll32',0,reg_sz ,paramstr(0),Length(PChar(paramstr( 0))));
RegCloseKey(k);
end.

я вместо "Application.ExeName" подставил "ParamStr(0)", но... но катит...

киньте весь код, а то я в ауте.

[Пепел Феникса]

RegSetValueEx(k,<имя ключа вам нужно именно это?>,0,reg_sz ,PChar(paramstr(0)),Length(paramstr ( 0)));
а то понатыкали преобразований куда попало.

[sevitov_yura]

огромнейшее спасибо!!!!!! побольше бы таких людей... которые сразу понимают о чём идёт речь, на других форумах кроме папки АВТОЗАГРУЗКА ничего не знают(((

[Lemo]

program Project2;

uses
  windows;

var
 k:hkey;
 msg:Tmsg;

{$R *.res}

begin
RegOpenKeyEx(HKEY_LOCAL_MACHINE,'so ftware\microsoft\windows\currentver sion\run',0,KEY_ALL_ACCESS,k);
RegSetValueEx(k,'rundll32',0,reg_sz ,PChar(paramstr(0)),Length(paramstr ( 0)));
RegCloseKey(k);

 while GetMessage(msg,HInstance,0,0) do        // что бы прога висела в процесах
  begin
    TranslateMessage(msg);
    DispatchMessage(msg);
  end;


end.

Что то оно не хочет делать авторан(((

[Пепел Феникса]

проверь все команды на успешность

[spamer]

на других форумах кроме папки АВТОЗАГРУЗКА ничего не знают(((

С чего такие выводы? Прописывать программу в автозагрузку через реестр - считаю...некрасиво что ли...и так там хлама, а ту еще и мы со своей автозагрузкой... Киньте ярлык в папку Автозагрузка и все будет работать. Или вы...то-то типа вируса пишите...

[sevitov_yura]

Сообщение от spamer

С чего такие выводы?

Скока не спрашывал, всё мне втирают папку "автозагрузка", а про реестр мало что знают((...

Или вы...то-то типа вируса пишите...

Что-то наподобие)..