ANTICHAT.XYZ    VIDEO.ANTICHAT.XYZ    НОВЫЕ СООБЩЕНИЯ    ФОРУМ  
Баннер 1   Баннер 2
Antichat снова доступен.
Форум Antichat (Античат) возвращается и снова открыт для пользователей. Здесь обсуждаются безопасность, программирование, технологии и многое другое. Сообщество снова собирается вместе.
Новый адрес: forum.antichat.xyz
Вернуться   Форум АНТИЧАТ > Программирование > С/С++, C#, Delphi, .NET, Asm
   
Ответ
 
Опции темы Поиск в этой теме Опции просмотра

Delphi+JAVA
  #1  
Старый 09.05.2010, 08:23
Dimon32
Познающий
Регистрация: 06.05.2010
Сообщений: 34
Провел на форуме:
20723

Репутация: 0
Question Delphi+JAVA

У меня вопрос по Delphi:
  • Есть файл coder.html со скриптом-шифровальщиком
  • Есть файл test.html с некоторым Java кодом, который нужно зашифровать
Задача: скопировать из страницы test.html скопировать несколько строк, и спомощью java скрипта находящегося в coder.html зашифровать эти строки и вывести в memo1 в программе.
Условие: Юзер не должен увидеть как это происходит.

Помогите пожалуйста как это сделать. Киньте примеры -исходники если есть.

Если это поможет - могу скинуть этот скрипт шифровальщик. Только помогите!!!
 
Ответить с цитированием

  #2  
Старый 09.05.2010, 09:53
JnK
Участник форума
Регистрация: 30.03.2007
Сообщений: 121
Провел на форуме:
188563

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

1. Выбрать несколько строк из файла: Copy, Delete, Pos. Если не знаешь как это делать Поиск по форуму, обсуждали не раз.


2. Тык
В гугле вводишь Использование JavaScript в Delphi и самая 1 строка.

P.s. И не путай Java и JavaScript.
 
Ответить с цитированием

  #3  
Старый 09.05.2010, 13:25
Dimon32
Познающий
Регистрация: 06.05.2010
Сообщений: 34
Провел на форуме:
20723

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

подключил функцию из этой статьи. требует MSHTML_TLB.
Где этот компонент или модуль. На какой вкладке?
 
Ответить с цитированием

  #4  
Старый 09.05.2010, 13:30
GhostOnline
Участник форума
Регистрация: 20.12.2008
Сообщений: 277
Провел на форуме:
828081

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

В uses MSHTML
ПС опять же- взято из гугла, 2-ой результат. Напиши уже в саппорт гугла, чтобы разбанили.

Цитата:
А за что забанили то?
Я откуда знаю за что тебя забанили

Последний раз редактировалось GhostOnline; 09.05.2010 в 13:34..
 
Ответить с цитированием

  #5  
Старый 09.05.2010, 13:32
Dimon32
Познающий
Регистрация: 06.05.2010
Сообщений: 34
Провел на форуме:
20723

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

А за что забанили то?
 
Ответить с цитированием

  #6  
Старый 09.05.2010, 17:32
Dimon32
Познающий
Регистрация: 06.05.2010
Сообщений: 34
Провел на форуме:
20723

Репутация: 0
Question

подключил я в uses MSHTML, Теперь пишет что неизвестная переменная:
IHTMLDocument2

Последний раз редактировалось Dimon32; 09.05.2010 в 17:35..
 
Ответить с цитированием

  #7  
Старый 09.05.2010, 21:50
JnK
Участник форума
Регистрация: 30.03.2007
Сообщений: 121
Провел на форуме:
188563

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

PHP код:
uses MSHTML


var
  
docIHtmlDocument2;
begin
...
end
Другими словами: IHtmlDocument2 описан в MSHTML.
Если где то в другом месте юзаешь, то показывай код.


P.s. Научись Гуглить.
 
Ответить с цитированием

  #8  
Старый 09.05.2010, 21:54
Dimon32
Познающий
Регистрация: 06.05.2010
Сообщений: 34
Провел на форуме:
20723

Репутация: 0
Question

спасибо.
тока нифига не получилось. весь вечер бился над этим.
Можт кто выложит проектик готовый.
Вот код кодирощика java script.
Хочу закодировать строку: "Античат рулит"
И вывести ее в memo1
Код HTML:
<body> <TABLE cellSpacing=0 cellPadding=0 width="98%" border=0> <TBODY> <TR> <TD vAlign=top align=left> <SCRIPT language=JavaScript> <!-- function generate() /* Generation of "Compilation" */ { code = document.pad.text.value; if (code) {setTimeout("compile()",1000);} } function compile() /* The "Compilation" */ { document.pad.text.value=''; compilation=escape(code); document.pad.text.value= "<script>\n<!--\ndocument. write(unescape(\""+compilation+"\")); \n//-->\n<\/script>"; } // --> </SCRIPT> <TABLE cellSpacing=0 cellPadding=0 width="100%" border=0> <TBODY> <TR> <TD width="100%"> <FORM name=pad method=post align="center"> <TEXTAREA style="WIDTH: 95%; BACKGROUND-COLOR: #ebebeb" name=text rows=11 cols=58></TEXTAREA> <BR> <INPUT onclick=generate() type=button value=Encrypt name=compileIt> </FORM> </TD> </TR> </TBODY> </TABLE> </TD></TR></TBODY></TABLE> </body>
 
Ответить с цитированием
Ответ



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Литература Delphi Sams С/С++, C#, Delphi, .NET, Asm 2 19.03.2010 19:46
Финальная версия Java EE 6 и GlassFish 3 ixtor1 Мировые новости 0 13.12.2009 21:03
Delphi Java Вконтакте Sin3v С/С++, C#, Delphi, .NET, Asm 2 23.11.2009 08:50
Все о Samsung novichok Сотовый фрикинг 1 15.02.2006 14:47
Словарь Java-терминов foreva Чужие Статьи 0 08.02.2005 16:28



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


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




ANTICHAT.XYZ