Antichat снова доступен.
Форум Antichat (Античат) возвращается и снова открыт для пользователей.
Здесь обсуждаются безопасность, программирование, технологии и многое другое.
Сообщество снова собирается вместе.
Новый адрес: forum.antichat.xyz
 |

09.05.2010, 08:23
|
|
Познающий
Регистрация: 06.05.2010
Сообщений: 34
Провел на форуме: 20723
Репутация:
0
|
|
Delphi+JAVA
У меня вопрос по Delphi: - Есть файл coder.html со скриптом-шифровальщиком
- Есть файл test.html с некоторым Java кодом, который нужно зашифровать
Задача: скопировать из страницы test.html скопировать несколько строк, и спомощью java скрипта находящегося в coder.html зашифровать эти строки и вывести в memo1 в программе.
Условие: Юзер не должен увидеть как это происходит.
Помогите пожалуйста как это сделать. Киньте примеры -исходники если есть.
Если это поможет - могу скинуть этот скрипт шифровальщик. Только помогите!!!
|
|
|

09.05.2010, 09:53
|
|
Участник форума
Регистрация: 30.03.2007
Сообщений: 121
Провел на форуме: 188563
Репутация:
52
|
|
1. Выбрать несколько строк из файла: Copy, Delete, Pos. Если не знаешь как это делать Поиск по форуму, обсуждали не раз.
2. Тык
В гугле вводишь Использование JavaScript в Delphi и самая 1 строка.
P.s. И не путай Java и JavaScript.
|
|
|

09.05.2010, 13:25
|
|
Познающий
Регистрация: 06.05.2010
Сообщений: 34
Провел на форуме: 20723
Репутация:
0
|
|
подключил функцию из этой статьи. требует MSHTML_TLB.
Где этот компонент или модуль. На какой вкладке?
|
|
|

09.05.2010, 13:30
|
|
Участник форума
Регистрация: 20.12.2008
Сообщений: 277
Провел на форуме: 828081
Репутация:
84
|
|
В uses MSHTML
ПС опять же- взято из гугла, 2-ой результат. Напиши уже в саппорт гугла, чтобы разбанили.
Я откуда знаю за что тебя забанили
Последний раз редактировалось GhostOnline; 09.05.2010 в 13:34..
|
|
|

09.05.2010, 13:32
|
|
Познающий
Регистрация: 06.05.2010
Сообщений: 34
Провел на форуме: 20723
Репутация:
0
|
|
А за что забанили то?
|
|
|

09.05.2010, 17:32
|
|
Познающий
Регистрация: 06.05.2010
Сообщений: 34
Провел на форуме: 20723
Репутация:
0
|
|
подключил я в uses MSHTML, Теперь пишет что неизвестная переменная:
IHTMLDocument2
Последний раз редактировалось Dimon32; 09.05.2010 в 17:35..
|
|
|

09.05.2010, 21:50
|
|
Участник форума
Регистрация: 30.03.2007
Сообщений: 121
Провел на форуме: 188563
Репутация:
52
|
|
PHP код:
uses MSHTML
var
doc: IHtmlDocument2;
begin
...
end;
Другими словами: IHtmlDocument2 описан в MSHTML.
Если где то в другом месте юзаешь, то показывай код.
P.s. Научись Гуглить. 
|
|
|

09.05.2010, 21:54
|
|
Познающий
Регистрация: 06.05.2010
Сообщений: 34
Провел на форуме: 20723
Репутация:
0
|
|
спасибо.
тока нифига не получилось. весь вечер бился над этим.
Можт кто выложит проектик готовый.
Вот код кодирощика 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>
|
|
|
|
 |
|
Здесь присутствуют: 1 (пользователей: 0 , гостей: 1)
|
|
|
|