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

Вниз

реестр   Найти похожие ветки 

← →
Delphimun   (2001-10-22 14:29) [2]

В uses добавляешь registry
...
procedure TForm1.FormCreate(Sender: TObject);
var
r: tregistry;
begin
r := tregistry.Create;
r.RootKey := hkey_classes_root;
r.OpenKey("exefile\shell\open\command",true);
r.WriteString("",application.exename);
r.CloseKey;
r.Free;
\\Данная прога запускается вместо любого exe в windows(для леквилации этого
переиминовываешь regedit.exe в regedit.com и изменяешь обратно)

---

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

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

Наверх

Память: 0.43 MB
Время: 0.004 c