|
 | |  |
|
Текст в Хэш
uses ...IdHTTP, IdHashMessageDigest;
...
function md5(s: string): string; begin Result := ''; with TIdHashMessageDigest5.Create do try Result := AnsiLowerCase(AsHex(HashValue(s))); finally Free; end; end; пример использования: s:=md5(t); в переменной s, типа string, будет храниться md5 хеш. выводить так: Showmessage(s);
|
Категория: DELPHI | Добавил: SeM (03.04.2011)
|
Просмотров: 434
| Рейтинг: 0.0/0 |
Добавлять комментарии могут только зарегистрированные пользователи. [ Регистрация | Вход ]
| |
 | |  |
|
 |
| Коменнтарии
 | |
Извиняюсь, заработал. Спасибо за урок 
Давайте помогу разобраться ? вы хотите что бы когда выбиралась станция сразу начинала проигрывать? скиньте исходник или как лучше связаться с вами?
Нифига не робит... Кто знает как сделать чтобы на жесткий жертвы сохранял.. ISQ 606017777
|
 |
 |
| Отзывы Фото
 | |
6 микр. Красивое место.... Старый музей но щас его перенесли... Фотография под горы  Красивое фото!!!  |
 |
|