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

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

Registry.ReadBinaryData - как изменить ключ [D5, Win95/98, NT4, Win2k]


Wizard_Ex ©   (2001-10-26 16:10:00) 

В реестре ключ EnableAutodial = 01 00 00 00. Нужно его изменить на 00 00 00 00. Поможите люди добрые как енто сделать?
что-то типа...
procedure TForm1.EditRegs;
var Reg: TRegistry;
Buf : Double;
begin
Reg := TRegistry.Create;
try
Reg.RootKey := HKEY_CURRENT_USER;
if Reg.OpenKey("\Software\Microsoft\Windows\CurrentVersion\Internet Settings", False)
then
begin
Reg.ReadBinaryData("EnableAutodial",Buf, Sizeof(Buf)); считываю, надо сравнить: если 01 00 00 00 изменить на 00 00 00 00
???????????????
end;
finally
Reg.CloseKey;
Reg.Free;
end;
end;
а конкретно не знаю


Wizard_Ex   (2001-10-30 17:16:00) [1]

С LongInt работает нормально везде. 2Anatoly Podgoretsky Большое Спасибо


delphimun   (2001-10-29 12:17:00) [2]

WriteString


Anatoly Podgoretsky   (2001-10-27 15:55:00) [3]

Я смотрел в 98


Wizard_Ex   (2001-10-27 12:57:00) [4]

В регедите написано тип REG_BINARY ( ОС W2K),
может под другими ОС тип другой? - не смотрел не знаю
но с лонгинт попробую


Anatoly Podgoretsky   (2001-10-26 23:55:00) [5]

Buf : LongInt;
Ну числа то ты наверно умеешь сравнивать?

Но только с чего ты решил, что там двоичные данные?
Тип там dWord (ReadInteger)


Наверх

Титульная страница Поиск, карта сайта Написать письмо