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

Вниз

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

← →
waw ©   (2003-01-16 16:27) [0]

Как воспользоватся для подсчета контрольной суммы?
Пробую так:
IdCoderMD51.Reset;
IdCoderMD51.CodeString(Memo1.Text);
Memo2.Text := IdCoderMD51.CompletedInput;

Получаю строку 18 байт, а должна быть 16 (128 бит).

Подскажите как им правильно воспользоватся.

---

← →
mrcat ©   (2003-01-16 18:17) [1]

Memo2.Text := IdCoderMD51.CompletedInput;

Попробуйте так:

var
MD5Str: string;

...
IdCoderMD51.Reset;
IdCoderMD51.CodeString(Memo1.Text);
MD5Str := IdCoderMD51.CompletedInput;
...

---

← →
Dimka Maslov ©   (2003-01-16 18:47) [2]

http://delphibase.endimus.com/?action=viewfunc&topic=mathcode&id=10243

---

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

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

Наверх

Память: 0.46 MB
Время: 0.013 c