Base64 Decode Unicode на Delphi

Сейчас на форуме: tyns777 (+4 невидимых)

Посл.ответ	Сообщение
yanus0 Ранг: 137.9 (ветеран), 45thx Активность: 0.08↘0 Статус: Участник	Создано: 26 сентября 2010 23:39 · Личное сообщение · #1 Нужна функция декодирования Base64 Decode Unicode на Delphi. Есть исходник на бейсику в атаче, но с портированием проблемы, гугл молчит. Заранее благодарен за помощь. f9c3_26.09.2010_CRACKLAB.rU.tgz - base64.rar

Isaev Ранг: 756.3 (! !), 113thx Активность: 0.61↘0.05 Статус: Участник Student	Создано: 27 сентября 2010 00:09 · Поправил: Isaev · Личное сообщение · #2 А пример можно? По моему Base64 абсолютно фиолетово на входе юникод или аски, а с обычной Base64 думаю в сети проблемм нет c894_26.09.2010_CRACKLAB.rU.tgz - Base64.pas ----- z+Dw7uLu5+jqLCDq7vLu8PvpIPHs7uMh
DenCoder Ранг: 324.3 (мудрец), 222thx Активность: 0.48↘0.37 Статус: Участник	Создано: 27 сентября 2010 00:18 · Личное сообщение · #3 Есть разные стандарты, для unicode используется стандарт rfc2152 (Измененный base64). tools.ietf.org/html/rfc2152 ru.wikipedia.org/wiki/Base64 www.webdelphi.ru/2010/05/kriptografiya-v-delphi-sredstvami-indy-i-synapse/ ----- IZ.RU
DenCoder Ранг: 324.3 (мудрец), 222thx Активность: 0.48↘0.37 Статус: Участник	Создано: 27 сентября 2010 00:43 · Поправил: Модератор · Личное сообщение · #4 Сдается мне, что по последней ссыли алгоритм не подходит для Unicode... В общем для сверки можно воспользоваться мной любимым фидлером (http://www.fiddler2.com/fiddler2/version.asp). У него в тулзах есть Text Decode/Encode. Вот так будет выглядеть строка "Хеллоу все" в BASE64 (тип MIME) - Code: 0KXQtdC70LvQvtGDINCy0YHQtQ== Вот так в измененном BASE64 (UTF-7) - Code: +/v8EJQQ1BDsEOwQ+BEM- +BDIEQQQ1- Кстати английская версия по стандартам BASE64 полнее информацией http://en.wikipedia.org/wiki/Base64 ----- IZ.RU
Isaev Ранг: 756.3 (! !), 113thx Активность: 0.61↘0.05 Статус: Участник Student	Создано: 27 сентября 2010 01:54 · Личное сообщение · #5 DenCoder пишет: Только сдается мне, что по последней ссыли алгоритм не подходит для Unicode... В случае Base64 не знаю, а md5 для unicode я именно через Utf8ToAnsi считал, получалось правильно ----- z+Dw7uLu5+jqLCDq7vLu8PvpIPHs7uMh
GoldFinch Ранг: 24.4 (новичок), 1thx Активность: 0.01↘0 Статус: Участник	Создано: 27 сентября 2010 14:58 · Личное сообщение · #6 CryptBinaryToString и CryptStringToBinary msdn.microsoft.com/en-us/library/aa379887%28VS.85%29.aspx
yanus0 Ранг: 137.9 (ветеран), 45thx Активность: 0.08↘0 Статус: Участник	Создано: 27 сентября 2010 15:57 · Поправил: yanus0 · Личное сообщение · #7 GoldFinch Isaev DenCoder спасибо, решил вопрос.

Для печати