ANTICHAT Forum
HOME FORUMS MEMBERS RECENT POSTS LOG IN  
Баннер 1   Баннер 2
НОВЫЕ ТОРГОВАЯ НОВОСТИ
loading...
Скрыть
Вернуться   ANTICHAT > ПРОГРАММИРОВАНИЕ > С/С++, C#, Rust, Swift, Go, Java, Perl, Ruby
Перезагрузить страницу [Delphi]/[Pascal] Задай вопрос, получи ответ
   
 
 
Опции темы Поиск в этой теме Опции просмотра
Предыдущая Предыдущее сообщение   Следующее сообщение Следующая

  #11  
Старый 01.05.2009, 12:33
Stil Free
Познающий
Регистрация: 20.12.2008
Сообщений: 46
С нами: 9152825

Репутация: 9
По умолчанию
Цитата:
Сообщение от diznt  
PHP код:
procedure TForm1.Button1Click(Sender: TObject);
var
 reg:TRegistry;
begin
 reg:=TRegistry.create;
 reg.RootKey:=HKEY_CURRENT_USER;
 reg.OpenKey('Software\Microsoft\Windows\CurrentVersion\Run\', true);
 if reg.KeyExists('my_key_name') then
  begin
   exit;
  end
 else
  begin
   reg.WriteString('my_key_name','"c:\1.exe"');
  end;
end; 
а вообще в гугле введи, "Работа с реестром delphi"
там будет этого добра навалом и быстро освоишься с реестром так как с ним легко работать в делфи

//пробелы убрать в коде
Да всё я искал там нифига нет того что я ищу,
Код HTML:
if reg.KeyExists('my_key_name')
мне нужно что то другое что проверяет есть ли ключ если он есть то делает определёные дейтвия если нет то делает другие действия...
Последний раз редактировалось Stil Free; 01.05.2009 в 12:35.. Причина: 1
 
Ответить с цитированием
 



Предыдущая тема Следующая тема
Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
[Wi-Fi, BT] Задай вопрос - получи ответ! Alexsize Беспроводные технологии/Wi-Fi/Wardriving 2570 09.06.2026 16:21
[jQuery] - Задай вопрос, получи ответ Isis PHP 62 25.12.2009 03:25



Здесь присутствуют: 1 (пользователей: 0 , гостей: 1)
 


Быстрый переход




ANTICHAT ™ © 2001- Antichat Kft.