Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Сети";
Текущий архив: 2003.03.03;
Скачать: [xml.tar.bz2];

Вниз

Помогите плиз.   Найти похожие ветки 

 
M_a_x   (2003-01-12 00:52) [0]

У меня такая задачка: получить код одного из фреймов, открытых с помощью WebBrowse"a. Просто код страницы можно получит с помощью так: WebBrowser1.OleObject.Document.All.Item(0).innerHTML;
Я даже нашел где про это есть в И-нете.. http://www.euromind.com/iedelphi/embeddedwb.htm Там вроде есть сохранение кода фрейма, но файл, который там можно скачать не компилируется.. Ошибку я сам найти не смог...
Помогите плиз разобраться...
Заранее спасибо


 
Troll   (2003-01-12 00:56) [1]

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


 
M_a_x   (2003-01-12 01:01) [2]

не работает функция GetFrame... а без нее не работает ни одна связанная с фреймами... не находит описание ReadyState и Document..

function TEmbeddedwb.GetFrame(FrameNo: Integer): IWebbrowser2;
var
OleContainer: IOleContainer;
enum: IEnumUnknown;
unk: IUnknown;
Fetched: PLongint;
begin
while ReadyState <> READYSTATE_COMPLETE do
Forms.Application.ProcessMessages;
if Assigned(document) then
begin
Fetched := nil;
OleContainer := Document as IOleContainer;
OleContainer.EnumObjects(OLECONTF_EMBEDDINGS, Enum);
Enum.Skip(FrameNo);
Enum.Next(1, Unk, Fetched);
Result := Unk as IWebbrowser2;
end else Result := nil;
end;


 
M_a_x   (2003-01-12 01:05) [3]

Хотя это скорее всего из-за того, что у меня нету (по крайней мере Delphi не находит) библиотеки Mshtml_tlb, SHDocVw_tlb, StdCtrls..
Может кто-то знает где их можно скачать?


 
sergey2   (2003-01-12 04:16) [4]

Тоже долго интересовался этим вопросом (первое сообщение топика). На форуме ответа никто не дал. А сегодня после после перебора разных вариантов почти наугад, наткнулся на работающий:

WebBrowser1.OleObject.document.frames.item(i).document.all.item(0).innerHTML

Возвращает код i-го фрейма.


 
M_a_x   (2003-01-12 20:50) [5]

мда... спасибо... а я пробовал пробовал просто WebBrowser1.OleObject.document.frames(i).document.all.item(0).innerHTML.. ну угадал.. :)


Всем спасибо!





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

Форум: "Сети";
Текущий архив: 2003.03.03;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.56 MB
Время: 0.048 c
6-5703
ctapik-net
2003-01-11 19:42
2003.03.03
Посылка сообщений всем компьютнрам в локальной сети


6-5704
dkDimon
2003-01-10 22:06
2003.03.03
SMTP


14-5746
michael_b
2003-02-15 20:30
2003.03.03
Ограничение по времени


14-5817
V-Isa
2003-02-12 15:46
2003.03.03
Просмотр каталогов и файлов.


6-5705
Spy X
2003-01-12 11:38
2003.03.03
Связь по модему.





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский