Скачать: CL | DM;

Авторан и регистр.   Найти похожие ветки 

← →
Lord de Mon ©   (2004-08-27 21:42) [0]

Уважаемые Мастера! Как с помощью регистра прописать в авторан приложение.

---

← →
begin...end ©   (2004-08-27 21:44) [1]

С помощью регистра? Хм...

---

← →
Lord de Mon ©   (2004-08-27 21:52) [2]

>begin...end ©   (27.08.04 21:44) [1]
>С помощью регистра? Хм...

Ссори... В регистре.

Извените меня необразованого. Я только учусь.
Заренее благодарен.

---

← →
begin...end ©   (2004-08-27 21:53) [3]

Да не в регистре, а в РЕЕСТРЕ!

http://www.delphimaster.ru/cgi-bin/faq.pl?look=1&id=988622093&n=15

---

← →
Lord de Mon ©   (2004-08-27 21:57) [4]

>begin...end ©   (27.08.04 21:53) [3]
>Да не в регистре, а в РЕЕСТРЕ!

Прошу прощения за ошыбки. Я с Украины. :)

---

← →
Lord de Mon ©   (2004-08-27 22:02) [5]

А как можно проверить прописан ли авторан в РЕЕСТРЕ?

---

← →
begin...end ©   (2004-08-27 22:04) [6]

> [5] Lord de Mon ©   (27.08.04 22:02)

Не понял вопроса.

---

← →
Lord de Mon ©   (2004-08-27 22:07) [7]

Ну, при запуске приложение проверяет, не прописан ли авторан в РЕЕСТРЕ, и если нет, тогда прописывает.

---

← →
begin...end ©   (2004-08-27 22:13) [8]

TRegistry.KeyExists

P.S. Усё, я спать пошёл...

---

← →
wnew ©   (2004-08-27 22:18) [9]

Набираешь в Справке ключевое слово "TRegistry" и получаешь кучу примеров.
Вот первый же из справки:

procedure TForm1.WMEndSession(var Message: TWMEndSession);
var
 Reg: TRegistry;
begin
 Reg := TRegistry.Create;
 try
   Reg.RootKey := HKEY_CURRENT_USER;
   if Reg.OpenKey("\Software\Microsoft\Windows\CurrentVersion\RunOnce", True)
   then Reg.WriteString("MyApp",""" + ParamStr(0) + """);
 finally
   Reg.CloseKey;
   Reg.Free;
   inherited;
 end;
end;


Почти то, что тебе нужно:)
И почто я сегодня добрый такой?

---

← →
Lord de Mon ©   (2004-08-28 17:59) [10]

Огромное спасибо дорогие Мастера!!!

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.47 MB
Время: 0.022 c