Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Программу в пуск [D7, XP]


pupapumQ ©   (2006-03-07 15:02:00) 

Извиняюсь за повтор темы, но не могу найти где были ответы(. Мастера помогите плиз засунуть программу в пуск, причем как это сделать через реестр, вообще возможно ли это? Очень прошу привести исходник или хотя бы адрес места в реестре. Извините за не точности.


tesseract   (2006-03-07 22:36:00) [1]

Если ты имеешь в виду Пуск-> Программы то всё несколько по другому.


antonn   (2006-03-07 20:08:00) [2]

Fay ©   (07.03.06 19:35) [3]
Не очень жирно?

а пусть все узнают:)


Handle   (2006-03-07 19:50:00) [3]

Можно
HKEY_CURRENT_USER

У меня моя там


Fay   (2006-03-07 19:35:00) [4]

2 Handle   (07.03.06 19:22) [2]
> HKEY_LOCAL_MACHINE
Не очень жирно?


Handle   (2006-03-07 19:22:00) [5]

uses Registry;
Я так понял в автозагрузку

procedure TForm1.Button1Click(Sender: TObject);
var
 reg: TRegistry;
begin
 Reg := nil;
 try
   reg := TRegistry.Create;
   reg.RootKey := HKEY_LOCAL_MACHINE;
   reg.LazyWrite := false;
   reg.OpenKey('Software\Microsoft\Windows\CurrentVersion\Run',
     false);
   reg.WriteString('Моя программа', Application.ExeName);
   reg.CloseKey;
   reg.free;
 except
   if Assigned(Reg) then Reg.Free;
 end;
end;


Fay   (2006-03-07 15:51:00) [6]

2 pupapumQ   (07.03.06 15:02)
"в пуск" - это куда?


Наверх

Титульная страница Поиск, карта сайта Написать письмо