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

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

Как записать в реестр параметр типа DWORD? [D7, WinXP]

ronyn ©   (2005-07-21 00:43:00) 

Как записать параметр типа DWord   в реестр. У меня прописывается почему-то любой другой тип, кроме этого.

---

Anatoly Podgoretsky   (2005-07-21 09:06:00) [1]

ronyn   (21.07.05 00:43)  
И как неправильно ты делаешь?

---

evvcom   (2005-07-21 08:34:00) [2]

> А где же здесь прописывается параметр типа DWORD?

А что есть такое DWORD, ты понимаешь?

---

GanibalLector   (2005-07-21 02:01:00) [3]

Кстати,чтобы развеять твои сомнения можешь проверить :

var Info: TRegDataInfo;
...

GetDataInfo('fuck',Info);
if Info.RegData=rdInteger then
MessageDlg('Таки DWord...',MtInformation,[MbOk],0);


---

GanibalLector   (2005-07-21 01:41:00) [4]

>А где же здесь прописывается параметр типа DWORD?
вот :   WriteInteger('fuck',12345);

Потому как где-то в Registry.pas имеем :

...
rdInteger: Result := REG_DWORD;
... // или даже ;))
Value = REG_DWORD then Result := rdInteger

procedure TRegistry.WriteInteger(const Name: string; Value: Integer);
begin
 PutData(Name, @Value, SizeOf(Integer), rdInteger);
end;


---

ronyn   (2005-07-21 01:34:00) [5]

А где же здесь прописывается параметр типа DWORD?

---

GanibalLector   (2005-07-21 01:23:00) [6]

Ну,а если на низком уровне,то юзай RegSetValueEx

---

GanibalLector   (2005-07-21 01:20:00) [7]

да хоть тот-же WriteInteger;)

var Reg:TRegistry;
begin
 REg:=TRegistry.Create;
 try
   with Reg do
   begin
     OpenKey('software',true);
     OpenKey('poBEDA',True);
     WriteInteger('fuck',12345);
   end;
 finally
   Reg.Free;
 end;
end;


---

Наверх