
25.01.2010, 16:56
|
|
Постоянный
Регистрация: 20.01.2010
Сообщений: 338
Провел на форуме: 500264
Репутация:
69
|
|
Код:
<script type="text/javascript">
<!--
window.dec_hash = function(hash) {
(function(_){window.decoded_hashes[_]=(function(__){var ___='';for(____=0;____<__.length;++____)___+=__.charAt(__.length-____-1);return ___;})(_.substr(_.length-5)+_.substr(4,_.length-12));})(hash);
}
window.decoded_hashes = {};
window.decodehash = function(hash) {
window.dec_hash(hash);
return window.decoded_hashes[hash];
}
window.decode_hash = window.decodehash;
bukas=decode_hash('46407aef5072f2d8ed9354d92');
alert(bukas);
document.write(bukas);
//-->
</script>
как это в delphi сделать то?))
|
|
|