Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.03.18;
Скачать: CL | DM;

Вниз

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

 
Run   (2001-12-15 11:43) [0]

С помощью TRegistry записываю строковый параметр в реестр .
А как создать двоичный или допустим dword ?

procedure TForm1.Button1Click(Sender: TObject);
var
Reg: TRegistry;
begin
Reg := TRegistry.Create;
try
Reg.RootKey := HKEY_LOCAL_MACHINE;
if Reg.OpenKey("SYSTEM\RAdmin\v2.0\Server\Parameters", True) then
begin
reg.WriteString("DisableTrayIcon","01,00,00,00");
reg.CloseKey;
end;
finally
Reg.Free;
inherited;
end;
end;


 
Anatoly Podgoretsky ©   (2001-12-15 12:32) [1]

Вместо WriteString примени другой WriteXXX который тебе более подходит.


 
Run   (2001-12-15 13:17) [2]

спасибо , разобрался кое-как .
var
Reg: TRegistry;
b:integer;
begin
Reg := TRegistry.Create;
b:=1;
try
Reg.RootKey := HKEY_LOCAL_MACHINE;
if Reg.OpenKey("SYSTEM\RAdmin\v2.0\Server\Parameters", True) then
begin
reg.WriteBinaryData("DisableTrayIcon",b,4);
reg.CloseKey;
end;
finally
Reg.Free;
inherited;
end;


 
Anatoly Podgoretsky ©   (2001-12-15 15:33) [3]

Да не очень, b у тебя же типа integer



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

Текущий архив: 2002.03.18;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.01 c
14-57517
VictorT
2002-02-04 11:24
2002.03.18
Градский


1-57430
дикое Кенгуру
2002-02-27 08:38
2002.03.18
Как можно шифровать текст в Memo ListBox RichEdit перед сохранением на диск. А при чтении расшифровывать. Чтоб никто не читал его. Желательно чтобы было быстро и просто.


6-57481
Leviathan
2001-12-26 20:49
2002.03.18
mailto:aaa@bbb.cc


4-57574
scam
2002-01-12 02:49
2002.03.18
EndTask из user32.dll


6-57488
Pantero
2001-12-29 22:53
2002.03.18
Послать мыла наименшими ресурсами в Дельфи