VPF::Альтернативная замена TWebbrowser и EmbeddedWB

Ergoz

Дата 4.2.2010, 18:45 (ссылка)

(нет голосов)

Загрузка ...

Шустрый

Профиль
Группа: Участник
Сообщений: 53
Регистрация: 3.6.2009
Где: Россия

Репутация: нет
Всего: нет

Меня интересует сабж, мне категорически важно чтобы прокся на браузер присваивалась только в моей программе (к примеру как idhttp, а не как с TWebBrowser, когда приходится писать в реестр и действует на всю винду). Пробовал воспользовться EmbeddedWB, но он не захотел через прокси работать, использовал такой код в потоке:

Код


procedure getting.Execute;
  var
f: TextFile;
ln: string;
begin
AssignFile(f, Form1.LabeledEdit2.Text); // Файл с прокси
Reset(f);
While not EOF(f) do // Пока файл не закончился
begin
ReadLn(f, ln);
Form1.EmbeddedWB1.RefreshProxy;
Form1.EmbeddedWB1.ProxySettings.AutoLoadProxy:=true;
Form1.EmbeddedWB1.ProxySettings.Address:=Copy(ln, 1, Pos(':', ln)-1);
Form1.EmbeddedWB1.ProxySettings.Port:=StrToInt(Copy(ln, Pos(':', ln)+1, Length(ln)));
Form1.RichEdit2.Lines.Add('Proxy using: '+Form1.EmbeddedWB1.ProxySettings.Address+':'+inttostr(Form1.EmbeddedWB1.ProxySettings.Port));
Form1.EmbeddedWB1.Go(Form1.LabeledEdit1.Text,2500);
Form1.EmbeddedWB1.WaitWhileBusy();
Form1.RichEdit2.Lines.Add('Proxy used: '+Form1.EmbeddedWB1.ProxySettings.Address+':'+inttostr(Form1.EmbeddedWB1.ProxySettings.Port));
sleep(2000);
end;
 CloseFile(f);
 Form1.RichEdit2.Lines.Add('Finished');
end;

Код может показаться ужасным, но я ещё только ученик-самоучка, и давно ничего не писал... Посоветуйте плиз компонент или как справиться с EmbeddedWB, я уже 2 суток парюсь без сна

Romasol

Дата 7.2.2010, 12:42 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 1
Регистрация: 13.12.2009

Репутация: нет
Всего: нет

http://www.delphikingdom.com/asp/viewitem.asp?catalogid=503

работае и на EmbeddedWB

Это сообщение отредактировал(а) Romasol - 7.2.2010, 13:02

Ergoz

Дата 12.2.2010, 04:27 (ссылка)

(нет голосов)

Загрузка ...

Шустрый

Профиль
Группа: Участник
Сообщений: 53
Регистрация: 3.6.2009
Где: Россия

Репутация: нет
Всего: нет

это я видел и пытался использовать, но не прокатило :( у меня просто страницы не грузились

+ это только с 1 браузером прокатит, а если мне нужно чтоб два twebbrowser через разные прокси коннектились? то уже этот код не поможет, поэтому я и спрашивал нормальный компонент с такой же реализацией прокси как в idhttp

Это сообщение отредактировал(а) Ergoz - 12.2.2010, 04:28

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Delphi: ActiveX/СОМ/CORBA \| Следующая тема »