Вниз
Скачать: CL | DM;

webbrowser.....как скопировать из него html-код ???   Найти похожие ветки 

← →
BlackIce   (2003-05-16 16:23) [0]

При загрузке, сначала же грузится страница, а потом всё что на ней находится...моя задача, получить текст страницы, как текст, поменять там адреса картинок ( на локальные адреса..)..и вставить этот код обратно...(либо в тотже webbrowser, либо в другой..не суть важно...)

каким образом можно получить из webbrowser весь исходный код HTMLной страницы? и как его запихнуть обратно..?..
и если можно то объясняйте, как для ребёнка :))...слишком мало я програмирую пока ещё....практики нет....


← →
Ihor Osov'yak ©   (2003-05-16 18:59) [1]

> каким образом можно получить из webbrowser весь исходный код HTMLной страницы?

Один из вариантов:


function WebBrowserSourceToString(const WebBrowser: IWebBrowser2):
string;
var
S: TStringStream;
begin
S := TStringStream.Create("");
try
(WebBrowser.Document as
IPersistStreamInit).Save(TStreamAdapter.Create(S), True);
Result := S.DataString;
finally
S.Free;
end;
end;



> и как его запихнуть обратно..?..
В контексте твоей задачи - это не самый оптимальный вариант ...
Лучше уже IHtmlElement2 с его методами модернизации тегов..
Но насколько я в курсе - могут быть проблемы с отражением картинок, если на них урлики поменять..
Имхо - более оптимально или свой прокси, или app - об этом речь в ветке рядом ..


← →
Den_IS01   (2003-05-19 09:22) [2]

Undeclared identifier: "IPersistStreamInit"
А с этим как бороться?


← →
Ihor Osov'yak ©   (2003-05-19 10:57) [3]

2 Den_IS01 (19.05.03 09:22)

Ну сделай поиск по исходникам vcl.. AltF7 в фаре помогает..
Лень смотреть, но навскидку - axtiveX...


← →
Den_IS01   (2003-05-19 13:39) [4]

Не понял - компонент чтоли для этого нужен...
Хорошо...
А если надо сохранить файл...
Я могу сохранить через диалог - проверено , работает...
А вот как сделать чтобы сохранялось без запроса имени файла (имя прописать сразу)?


← →
nikkie ©   (2003-05-19 15:04) [5]

>Den_IS01
>Не понял - компонент чтоли для этого нужен...
Для этого надо уметь пользоваться поиском файла. У тебя на диске должны быть исходники vcl - ищи, где объявлено то, чего не хватает.

>А если надо сохранить файл...
значит вместо TStringList нужно каким-то другим потоком воспользоваться...


← →
Ihor Osov'yak ©   (2003-05-19 17:43) [6]

axtiveX -> activeX.. Но поиском все-же нужно уметь пользоваться.. И освоить это умение желательно перед тем, как begin end на клаве топтать..


← →
demonyator ©   (2003-05-21 02:01) [7]

вопрос вдогонку.... как сохранить всю страничу, вместе с картинками на диск? Желательно даже не спрашивая у пользователя диресторию для сохранения.



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.008 c
1-91758
yaJohn
2003-07-15 15:12
2003.07.28
Трабла с ObjectPascal. const mbNew = Succ ( High (TMsgDlgBtn) );


14-91841
Night_Devil
2003-07-09 05:47
2003.07.28
Как можно передать скрипту на сайте POST значения....


3-91679
Soft
2003-06-20 17:11
2003.07.28
Локальная однопользовательская база данных с подержкой SQL


3-91618
Vitek
2003-07-03 19:42
2003.07.28
Как работать с курсорами через Tquery используя север firebird1.2


6-91801
Шишкин Илья
2003-05-14 20:55
2003.07.28
Как получить список соединений?




   Наверх