Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Начинающим";
Текущий архив: 2006.03.26;
Скачать: [xml.tar.bz2];

Вниз

Программу в пуск   Найти похожие ветки 

 
pupapumQ   (2006-03-07 15:02) [0]

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


 
Fay ©   (2006-03-07 15:51) [1]

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


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

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 19:35) [3]

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


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

Можно
HKEY_CURRENT_USER

У меня моя там


 
antonn ©   (2006-03-07 20:08) [5]

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

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


 
tesseract ©   (2006-03-07 22:36) [6]

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



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

Форум: "Начинающим";
Текущий архив: 2006.03.26;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.45 MB
Время: 0.04 c
15-1141643051
Kaban
2006-03-06 14:04
2006.03.26
Пиксел


4-1136631724
Igor_thief
2006-01-07 14:02
2006.03.26
Системный курсор


1-1140602547
Alexandr
2006-02-22 13:02
2006.03.26
преобразовать строку


2-1141820098
Fenix
2006-03-08 15:14
2006.03.26
Форма и ДЛЛ


4-1136275749
Arazel
2006-01-03 11:09
2006.03.26
Как присвойть лог. диску другую букву?





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский