Текущий архив: 2005.10.16;
Скачать: CL | DM;
Вниз
Работа с реестром,запуск проги при старте OC Найти похожие ветки
← →
MakedoneZ © (2005-09-26 16:56) [0]Что и как надо вписать в реестр,чтоб заставить программу автоматически запускаться,при загрузке ОС?
Заранее спасибо.
← →
Vladimir88 (2005-09-26 17:05) [1]Надо создать службу, просто пропиской в реестре запуститься только при входе пользователя
← →
isasa © (2005-09-26 17:09) [2]Только для сеанса данного пользователя
[HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Run]
<key>=<полный путь к исполняемому файлу>
Для всех пользователей
[HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run]
<key>=<полный путь к исполняемому файлу>
← →
umbra © (2005-09-26 17:12) [3]В разделе
HKEY_CURRENT_USER\SOFTWARE\Microsoft\Windows\CurrentVersion\Run
надо создать строчный параметр с любым именем, а в значении - полный путь к проге. Тогда при входе каждого юзера прога будет запускаться от имени этого юзера и с его правами.
← →
MakedoneZ © (2005-09-26 18:07) [4]Спасибо всем.
Попробую.
PS.Может посоветуете какую нибудь книгу,в которой подробно,и для начинающего,написано про работу с реестром через Delphi?
Если знаете где достать в электронном виде,то это было бы просто прекрасно.
← →
umbra © (2005-09-26 18:15) [5]поищи в хелпе TRegistry
← →
MakedoneZ © (2005-09-26 19:18) [6]Сэнкс!
Нашел много полезного.
← →
vertal © (2005-09-27 03:02) [7]
const
AutoRunKey = "Software\Microsoft\Windows\CurrentVersion\Run";
procedure TfmMain.SetAutoStart(AAutoStart: Boolean);
var
TR: TRegistry;
begin
TR := TRegistry.Create;
try
TR.RootKey := HKEY_CURRENT_USER;
TR.OpenKey(AutoRunKey, True);
case AAutoStart of
False:
TR.DeleteValue(Application.Title);
else
TR.WriteString(Application.Title, """ + Application.ExeName + """);
end;//case
TR.CloseKey;
finally
TR.Free;
end;
end;
function TfmMain.GetAutoStart: Boolean;
var
TR: TRegistry;
t: string;
begin
Result := False;
TR := TRegistry.Create(KEY_READ);
try
TR.RootKey := HKEY_CURRENT_USER;
TR.OpenKeyReadOnly(AutoRunKey);
t := TR.ReadString(Application.Title);
if Length(t) <= 2 then
Exit;
Result := Copy(t, 2, Length(t) - 2) = Application.ExeName;
TR.CloseKey;
finally
TR.Free;
end;
end;
← →
Джо © (2005-09-27 06:06) [8]
> [3] umbra © (26.09.05 17:12)
> В разделе
> HKEY_CURRENT_USER\SOFTWARE\Microsoft\Windows\CurrentVersion\Run
> надо создать строчный параметр с любым именем, а в значении
> - полный путь к проге. Тогда при входе каждого юзера прога
> будет запускаться от имени этого юзера и с его правами.
Неверно.
← →
Viktop (2005-09-27 10:02) [9]А кто-нибудь знает как сделать так, чтобы прога запускалась при старте Windows, но не через реестр. Такой метод вроде трояны используют
← →
Игорь Шевченко © (2005-09-27 15:10) [10]Viktop (27.09.05 10:02) [9]
И зачем нужен еще один троян ?
← →
Viktop (2005-09-27 15:26) [11]Почему-то только на этом форуме многие вопросы сводятся к: Трояна писать собрался.
Впринципе ответ на вопроснашёл. Пошёл писать трояна :)))
Страницы: 1 вся ветка
Текущий архив: 2005.10.16;
Скачать: CL | DM;
Память: 0.49 MB
Время: 0.046 c
