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

Вниз

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

 
saha   (2003-08-19 17:23) [0]

Привет!
Мне надо сохранить в реестре данные в формате binary (данные известны в формате binary), но что-то я не могу понять как команда TRegistry.WriteBinaryData работает, можно какой-нибудь маленький примерчик, ну например записать что бы в реестре было 00 bb aa
Спасибо


 
saha   (2003-08-19 17:29) [1]

Вернее как работает понятно, procedure WriteBinaryData(const Name: String; var Buffer; BufSize: Integer) непонятно чего должно стоять в buffer


 
Юрий Федоров ©   (2003-08-19 17:30) [2]

var R : TRGBTriple;
...
R.rgbtBlue :=$00;
R.rgbtGreen :=$BB
R.rgbtRed :=$AA;
Resistry1.WriteBinaryData("name", R, SizeOf(R));


 
saha   (2003-08-19 17:39) [3]

Ну а в моем случае как объявить переменную?


 
Юрий Федоров ©   (2003-08-19 17:43) [4]

так ты же хочешь что-то сохранить, что у тебя уже объявлено...
скажу так - если ты имеешь указатель (Pointer - неважно, типизированный или нет), пиши с крышкой.
пример :

type
PRGBTriple = ^TRGBTriple; //TRGBTriple это record если не в курсе
var R : PRGBTriple; //это указатель
...
Registry1.WriteBinaryData("name", R^, SizeOf(R^));


 
saha   (2003-08-19 17:45) [5]

У меня нету того что я хочу сохранить мне надо просто создать такую же запись в реестре, есть цифры из реестра и все


 
saha   (2003-08-19 17:47) [6]

Есть: 00,00,00,00,60,7b,e2,40,00,00,00,00,60,7b как это родить в Delphi?


 
Юрий Федоров ©   (2003-08-19 17:58) [7]

var x : array[0..10] of byte;
x[0]:=0;
x[1]:=...
...
Resistry1.WriteBinaryData("name", X[0], SizeOf(X));
(правильно только для статического массива)



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

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

Наверх




Память: 0.47 MB
Время: 0.017 c
4-1727
tipman
2003-06-28 20:42
2003.09.01
Где взять hProcess для функции WaitForInputIdle


14-1637
II
2003-08-12 15:51
2003.09.01
Ктонибуть знает пароль на этот сайт http://209.104.132.210/Retail


14-1598
k-man
2003-08-13 22:33
2003.09.01
Тема №1


7-1697
MakNik
2003-06-18 12:43
2003.09.01
имя пользователя и организация


1-1483
race1
2003-08-18 13:14
2003.09.01
tlistbox.getdata :)