Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

ХЕШ код строки [D7, WinXP]


redlord ©   (2005-10-23 23:43:00) 

всем привет
народ подскажите что такое хеш код строки
зачем он нужен и
и как с ним работать


Eraser   (2005-10-24 14:34:00) [1]


> nord777   (24.10.05 10:02) [2]

На torry.net посмотри компоненты для шифрования LockBox, лучше конечно CryptoAPI использовать [1].


Anatoly Podgoretsky   (2005-10-24 13:25:00) [2]

TUser ©   (24.10.05 10:47) [3]
Подскажи каким методом получить хеш, как просит автор.


хш   (2005-10-24 10:55:00) [3]


> nord777   (24.10.05 10:02) [2]


function TDPJWHashEx(const aKey : string) : Cardinal;
var
 G : Cardinal;
 i : integer;
 Hash : Cardinal;
begin
 Hash := 0;
 for i := 1 to length(aKey) do begin
   Hash := (Hash shl 4) + ord(aKey[i]);
   G := Hash and $F0000000;
   if (G <> 0) then
     Hash := (Hash xor (G shr 24)) xor G;
 end;
 Result := Hash;
end;


© Джулиан Бакнелл, Фундаментальные стпуктуры и алгоритмы данных в DELPHI.


TUser   (2005-10-24 10:47:00) [4]

> а есть какая нибудь встроенная функция получения хэш-кода?
>
> или компонент?

Есть. См. THashedStringList из модуля Classes.


nord777   (2005-10-24 10:02:00) [5]

а есть какая нибудь встроенная функция получения хэш-кода?
или компонент?


Eraser   (2005-10-24 00:01:00) [6]


> redlord   (23.10.05 23:43)

Почитай вот эту статью
http://rsdn.ru/article/crypto/usingcryptoapi.xml
не совсем в тему, но зато пряснишь ряд вопросов, которые возникнут в будущем.


Наверх

Титульная страница Поиск, карта сайта Написать письмо