Форум: "Система";
Текущий архив: 2002.03.18;
Скачать: [xml.tar.bz2];
ВнизРабота с реестром Найти похожие ветки
← →
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;
Скачать: [xml.tar.bz2];
Память: 0.44 MB
Время: 0.004 c