![]() |
|
|
|||||||
| Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
![]() |
|
|
Опции темы | Поиск в этой теме | Опции просмотра |
|
#1
|
|||
|
|||
|
здравствуйте, прошу помочь в получении crc32 суммы из HEX в String.
HEX string выглядит например как '0E0066813E03004E'. теперь нужно получить CRC32 сумму этого HEX когда. То есть не как ASCII, а уже готовый HEX в String. спасибо за внимание. |
|
#2
|
||||
|
||||
|
Пример как это можно делать (конечно можно компактнее и без использования потоков, но это для затравки...на готовеньком так сказать).
Код:
function CRCFromHEXString(HexString: string): LongWord;
var
MS: TMemoryStream;
i: Integer;
begin
MS := TMemoryStream.Create;
for i := 1 to Length(HexString) div 2 do
MS.Write(StrToInt('$' + Copy(HexString, (i - 1)* 2, 2)), SizeOf(Byte));
Result := Crc32Stream(MS);
MS.Free;
end; |
|
#3
|
|||
|
|||
|
Огромное спасибо
|