ANTICHAT.XYZ    VIDEO.ANTICHAT.XYZ    НОВЫЕ СООБЩЕНИЯ    ФОРУМ  
Баннер 1   Баннер 2

ANTICHAT — форум по информационной безопасности, OSINT и технологиям

ANTICHAT — русскоязычное сообщество по безопасности, OSINT и программированию. Форум ранее работал на доменах antichat.ru, antichat.com и antichat.club, и теперь снова доступен на новом адресе — forum.antichat.xyz.
Форум восстановлен и продолжает развитие: доступны архивные темы, добавляются новые обсуждения и материалы.
⚠️ Старые аккаунты восстановить невозможно — необходимо зарегистрироваться заново.
Вернуться   Форум АНТИЧАТ > Программирование > С/С++, C#, Delphi, .NET, Asm
   
Ответ
 
Опции темы Поиск в этой теме Опции просмотра

Помогите организовать javascript в delphi
  #1  
Старый 11.02.2010, 14:31
seet09
Banned
Регистрация: 25.09.2009
Сообщений: 24
Провел на форуме:
448377

Репутация: 9
По умолчанию Помогите организовать javascript в delphi

Собственно сабж. есть javascript результат которого записывается в переменную. мне надо чтобы программа коннектилась к серверу и выводила результат переменой в мемо. Помогите пожалуйста! как это организовать ??

Последний раз редактировалось seet09; 11.02.2010 в 14:39..
 
Ответить с цитированием

  #2  
Старый 11.02.2010, 14:53
nMonkn
Новичок
Регистрация: 04.01.2010
Сообщений: 25
Провел на форуме:
289818

Репутация: 14
По умолчанию

Перепиши JS на делфи, в чем проблема?
 
Ответить с цитированием

  #3  
Старый 11.02.2010, 15:43
alexey-m
Познающий
Регистрация: 15.07.2009
Сообщений: 71
Провел на форуме:
520157

Репутация: 35
Отправить сообщение для alexey-m с помощью ICQ
По умолчанию

Выкладывай код
 
Ответить с цитированием

  #4  
Старый 11.02.2010, 15:56
Jingo Bo
Познающий
Регистрация: 25.10.2009
Сообщений: 97
Провел на форуме:
604635

Репутация: 15
По умолчанию

Парсишь и к примеру в TWebBrowser или берешь допусим какой нить движок(SpiderMonkey например)
 
Ответить с цитированием

  #5  
Старый 11.02.2010, 16:03
Jingo Bo
Познающий
Регистрация: 25.10.2009
Сообщений: 97
Провел на форуме:
604635

Репутация: 15
По умолчанию

Вот архив, в нём портированные модули для SpiderMonkey на делфи. Вещь очень интересная, реализация супер, но там с отладчиком траблы и что бы к своему приложению прикрепить, нужно добавить ещё достаточно большой функционал(реализовать полноценные классы document, window и т.д.)

http://slil.ru/28631277
 
Ответить с цитированием

  #6  
Старый 11.02.2010, 16:03
seet09
Banned
Регистрация: 25.09.2009
Сообщений: 24
Провел на форуме:
448377

Репутация: 9
По умолчанию

вот значит сам скрипт:
<script type="text/javascript">
window.init_dec_hash = function() {
window.decoded_hashes = {};
var dec_hash = function(hash) {
(function(_){window.decoded_hashes[_]=(function(__){var ___=ge?'':'___';for(____=0;____<__.length;++____)_ __+=__.charAt(__.length-____-1);return geByClass?___:'___';})(_.substr(_.length-5)+_.substr(4,_.length-12));})(hash);
}
window.decodehash = function(hash) {
dec_hash(hash);
return window.decoded_hashes[hash];
}
}
</script>


я так понял что основная фича в этих строках
(function(_){window.decoded_hashes[_]=(function(__){var ___=ge?'':'___';for(____=0;____<__.length;++____)_ __+=__.charAt(__.length-____-1);return geByClass?___:'___';})(_.substr(_.length-5)+_.substr(4,_.length-12));})(hash);

их и надо на дельфи переложить!

Последний раз редактировалось seet09; 11.02.2010 в 16:12..
 
Ответить с цитированием

  #7  
Старый 11.02.2010, 16:05
seet09
Banned
Регистрация: 25.09.2009
Сообщений: 24
Провел на форуме:
448377

Репутация: 9
По умолчанию

Jingo Bo спасиибо за ответ! буду пытаться!! но там заморочек много очень в этом движке... Проще переписать javascript на дельфи
 
Ответить с цитированием

  #8  
Старый 11.02.2010, 16:51
Jingo Bo
Познающий
Регистрация: 25.10.2009
Сообщений: 97
Провел на форуме:
604635

Репутация: 15
По умолчанию

Перевел, переводится как оказалось на раз-два
Цитата:
function dec_hash(hash : String) : String;
Var i : Integer;
Begin
result := hash;
Delete(result, 1, Length(result)-5);
hash := result + Copy(hash, 5, Length(hash)-12);
result := '';
for i := 0 to Length(hash)-1 do
result := result + hash[Length(hash)-i];
end;
 
Ответить с цитированием

  #9  
Старый 11.02.2010, 17:19
W!z@rD
Reservists Of Antichat - Level 6
Регистрация: 12.02.2006
Сообщений: 891
Провел на форуме:
1892597

Репутация: 836


Отправить сообщение для W!z@rD с помощью ICQ
По умолчанию

Цитата:
Сообщение от seet09  
вот значит сам скрипт:
<script type="text/javascript">
window.init_dec_hash = function() {
window.decoded_hashes = {};
var dec_hash = function(hash) {
(function(_){window.decoded_hashes[_]=(function(__){var ___=ge?'':'___';for(____=0;____<__.length;++____)_ __+=__.charAt(__.length-____-1);return geByClass?___:'___';})(_.substr(_.length-5)+_.substr(4,_.length-12));})(hash);
}
window.decodehash = function(hash) {
dec_hash(hash);
return window.decoded_hashes[hash];
}
}
</script>


я так понял что основная фича в этих строках
(function(_){window.decoded_hashes[_]=(function(__){var ___=ge?'':'___';for(____=0;____<__.length;++____)_ __+=__.charAt(__.length-____-1);return geByClass?___:'___';})(_.substr(_.length-5)+_.substr(4,_.length-12));})(hash);

их и надо на дельфи переложить!
vkontakte.ru
функция получения хеша используемого при добавлениях в друзья
__________________
*********************************
*Я не волшебник ٩(๏̯͡๏)۶, только учусь...*
*********************************
Программы на заказ
Times to fly...
 
Ответить с цитированием

  #10  
Старый 11.02.2010, 18:02
seet09
Banned
Регистрация: 25.09.2009
Сообщений: 24
Провел на форуме:
448377

Репутация: 9
По умолчанию

да именно он. Мне его расшифровать надобно
 
Ответить с цитированием
Ответ



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Литература Delphi Sams С/С++, C#, Delphi, .NET, Asm 2 19.03.2010 19:46
Books PSalm69 Избранное 248 27.10.2009 04:52
ЛЮДИ ПОМОГИТЕ В Delphi Bill С/С++, C#, Delphi, .NET, Asm 16 21.03.2006 04:39
Помогите написать скрипт на javascript Micr0b PHP, PERL, MySQL, JavaScript 19 17.01.2006 17:02
Bypassing JavaScript Filters the Flash! Attack k00p3r Чужие Статьи 0 12.07.2005 16:11



Здесь присутствуют: 1 (пользователей: 0 , гостей: 1)
 


Быстрый переход




ANTICHAT.XYZ