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

Вниз

array of Byte   Найти похожие ветки 

 
mry   (2007-06-25 20:00) [0]

Есть допустим такая структура

type
 TMyItem = record
   Data1: LongWord;
   Data2: LongWord;
   Data3: array of Byte;
 end;


Дальше она где-то заполняется и вот вопрос, у меня Data3 заполнен, но потом мне необходимо получить из Data3 "число", или даже хуже нужно сделать xor с "числом" внутри Data3. Каким образом это сделать?

Т.е. про что я говорю, например. Length(data3) = 4.

$00
$00
$00
$FF

т.е. у нас если считать это числом будет 255.

А нужно ещё например сделать $000000FF xor $.... (data3 xor ....)


 
KilkennyCat ©   (2007-06-25 20:02) [1]

var
 myItem : TMyItem
begin
 ... := myItem.Data3[0] xor ...
end;


 
Loginov Dmitry ©   (2007-06-25 20:42) [2]

PInteger(@data3[0])^ := PInteger(@data3[0])^ xor ....


 
mry   (2007-06-25 20:49) [3]

Спасибо. А если у меня Data3 будет Pointer, что в таком случае делать?


 
Loginov Dmitry ©   (2007-06-25 20:51) [4]

В таком случае: PInteger(data3)^


 
Kolan ©   (2007-06-25 20:57) [5]

> PInteger(@data3[0])^ := PInteger(@data3[0])^ xor &#133

Пипец :(


 
Loginov Dmitry ©   (2007-06-25 21:36) [6]

Пипецнейший пипец ))


 
palva ©   (2007-06-25 22:51) [7]


$00
$00
$00
$FF

т.е. у нас если считать это числом будет 255.


Это у кого "у нас"? На процессоре x86 это будет число $FF000000, так что если вы хотите интерпретировать эту последовательность байтов как четырехбайтное целое 255, вам надо перевернуть порядок байтов.


 
Kolan ©   (2007-06-25 23:00) [8]

Каким образом это сделать?
&#133

Есть допустим такая структура


Сделай класс

Дальше она где-то заполняется и вот вопрос
Добавь метод Assign

но потом мне необходимо получить из Data3
Сделай свойство обрашения по индексу Items[Index: Integer]

даже хуже нужно сделать xor с «числом» внутри Data3

Сделай метод XorData(Index: Integer)

Моё имхо.



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

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

Наверх




Память: 0.48 MB
Время: 0.024 c
15-1182340952
Ламот
2007-06-20 16:02
2007.07.22
1С 7.7 + MS SQL 2000 + Ошибка 126


2-1182675229
Ral'f
2007-06-24 12:53
2007.07.22
Quick Report (DataField)


15-1182120075
midi
2007-06-18 02:41
2007.07.22
Кто знает смысл этой функции?


2-1182917165
APXiMEd
2007-06-27 08:06
2007.07.22
Несколько простых (для кого-то) вопросов.


15-1182234630
StriderMan
2007-06-19 10:30
2007.07.22
Игра шарики. помогите найти!