Текущий архив: 2008.08.17;
Скачать: CL | DM;
Вниз
packed record в строку Найти похожие ветки
← →
IvanS (2008-07-10 23:29) [0]у меня есть
tpack = packed record
a, b, c, d: longword;
d, e, f, g: longword;
end;
каким образом это можно преобразовать в строку? т.е каждый байт в записи надо превратить в единую строку.
← →
Юрий Зотов © (2008-07-10 23:37) [1]> IvanS (10.07.08 23:29)
> каждый байт в записи надо превратить в единую строку.
Если Вы уверены, что вопрос задан точно, то прямо сейчас напишу код.
Но сначала просьба - подумайте. Ведь не хочется писать код, который никому не понадобится.
← →
IvanS (2008-07-10 23:52) [2]a = $01010101
b = $02020202
c = $03030303
d = $04040404
....
строка: #$01#$01#$01#$01#$02#$02#$02#$02...
вот так нужно, я действительно плохо вопрос сформировал
← →
Юрий Зотов © (2008-07-10 23:58) [3]> IvanS
var
S: string;
R: TPack;
...
SetLength(S, SizeOf(R));
CopyMemory(@S[1], @R, SizeOf(R));
← →
Anatoly Podgoretsky © (2008-07-11 00:37) [4]Все равно и уточнение пока смутное.
← →
Ega23 © (2008-07-11 00:50) [5]
> Юрий Зотов © (10.07.08 23:58) [3]
пока #00 не встретится?
← →
umbra © (2008-07-11 00:53) [6]
> пока #00 не встретится?
с чего бы это?
← →
Ega23 © (2008-07-11 01:01) [7]
a = $01010101
b = $02020202
c = $03030303
d = $04040404
А если a = $01000101?
← →
umbra © (2008-07-11 01:03) [8]
> А если a = $01000101?
и что? копирование прервется?
← →
Рамиль © (2008-07-11 08:56) [9]
> umbra © (11.07.08 01:03) [8]
Не прервется, но потом с этой строкой надо осторожно обращаться.
← →
han_malign © (2008-07-11 09:19) [10]
> SetLength(S, SizeOf(R));
> CopyMemory(@S[1], @R, SizeOf(R));
SetString(S, PChar(@R), SizeOf(R));
Страницы: 1 вся ветка
Текущий архив: 2008.08.17;
Скачать: CL | DM;
Память: 0.48 MB
Время: 0.012 c
