Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Общие вопросы Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 07.12.2007, 17:28   #11
Terran
Участник клуба
 
Аватар для Terran
 
Регистрация: 28.11.2007
Сообщений: 1,521
По умолчанию

Вот очень маленький и удобный вариант прописи в реестр в автозагрузку.
После запуска программы, путь к программе в реестре прописывается автоматически.

Uses Registry,

Var
RegIni:TregIniFile;
Begin
RegIni:=TregIniFile.Create('Softwar e');
RegIni.RootKey:=HKEY_LOCAL_MACHINE;
RegIni.OpenKey(SOFTWARE\Microsoft\W indows\CurrentVersion', True);
RegIni.WriteString('Run' , 'Win32.exe',
Application.ExeName);
RegIni.Free;
End;

А чтобы удалить параметр в реестре используй команду:
RegIni.DeleteValue('Win32');

Вот пример:

Var
RegIni:TregIniFile;
Begin
RegIni:=TregIniFile.Create('Softwar e');
RegIni.RootKey:=HKEY_LOCAL_MACHINE;
RegIni.OpenKey('SOFTWARE\Microsoft\ Windows\CurrentVersion\Run', True);
RegIni.DeleteValue('Win32');
RegIni.Free;
End;
Всегда рад помочь!
Terran вне форума Ответить с цитированием
Старый 07.12.2007, 18:02   #12
Terran
Участник клуба
 
Аватар для Terran
 
Регистрация: 28.11.2007
Сообщений: 1,521
По умолчанию

Что бы скопировать фаил то используй команду:
CopyFile('Откуда копировать','Куда копировать', True);
Есле фаил уже есть и ты хочеш его заменить, то ставь True, а есле не хочеш заменять , то False.
Всегда рад помочь!
Terran вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Методы автозагрузки Лубышев Операционные системы общие вопросы 12 01.07.2008 20:53
Получить список автозагрузки, из меню ПУСК Alter Общие вопросы Delphi 5 03.05.2008 17:45
Создание удаление каталогов, копирование файлов. Alar Общие вопросы Delphi 1 18.12.2007 18:30
ветви в реестре для автозагрузки для win'95, win'98, win' me, win 2000 Prisian Windows 1 09.09.2007 23:15