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

Вниз

Работа с фреймами в веббраузере   Найти похожие ветки 

 
Alek ©   (2004-06-21 17:25) [0]

Всем добрый день!

Вот этим кодом я могу в WebBrowser1 загрузить данные прямо со стринговой переменной!

var
 v: Variant;
 HTMLDocument: IHTMLDocument2;
begin
 HTMLDocument := WebBrowser1.Document as IHTMLDocument2;
 v := VarArrayCreate([0, 0], varVariant);
 v[0] := HTMLString; // this is your html string
 HTMLDocument.Write(PSafeArray(TVarData(v).VArray));
 HTMLDocument.Close;
 ...
end;


вот так я могу получить доступ к фрейму и загрузить в него даные из файла:

WebBrowser1.OleObject.Document.frames.item(i).navigate("http://yandex.ru");

Вопрос заключается в следующем!
Как загрузить данные во фрейм из стринговой переменной???


 
GuAV ©   (2004-06-22 01:03) [1]

WebBrowser1.OleObject.Document.frames.item(i).navigate("about://"+HTMLString);// this is your html string


 
Alek ©   (2004-06-22 14:45) [2]

s:="about://"+s;
Form2.WebBrowser1.Navigate(s)

в s хтмл страница. Так не загружается, а вот когда я пишу сразу
Form2.WebBrowser1.Navigate("about://<html><body><h1>sagf</h1></body></html>");

все работает.

Почему так??


 
GuAV ©   (2004-06-22 15:09) [3]

Ну... незнаю.. наверное в s таки что-то не так... выдеди s в memo и посмотри...


 
GuAV ©   (2004-06-22 15:14) [4]

Нашел где я это взял вот оригинал: http://www.delphimaster.ru/articles/twebbrowser.html
procedure ShowHTML(const HTML: string; AWebBrowser: TWebBrowser);
var HtmlText: OLEVariant;
begin
 HtmlText := "about:"+HTML;
 AWebBrowser.Navigate2(HtmlText);
end;


 
Alek ©   (2004-06-22 15:21) [5]

в s загружается обычная страница.

str:=TStringList.Create;
str.LoadFromFile(ExtractFilePath(Application.ExeName)+"html/shab.html");

s:="about:";
for i:=0 to str.count-1 do
s:=s+Trim(str.strings[i]);

затем
Form2.WebBrowser1.Navigate(s); и ничего не отображается.
а вот так вот работает
Form2.WebBrowser1.Navigate(ExtractFilePath(Application.ExeName)+"html/shab.html");


 
GuAV ©   (2004-06-22 15:25) [6]

[4] - тоже не работает?


 
Alek ©   (2004-06-22 15:28) [7]

щас попробую :)


 
Alek ©   (2004-06-22 15:39) [8]

тож не выходит.
Мож нужно какиенибудь простые и маленькие странички так пихать?


 
GuAV ©   (2004-06-22 16:20) [9]

WebBrowser1.OleObject.Document.frames.item(i).navigate("http://yandex.ru");
У меня это не работает.

мож IHTMLFramesCollection2? тока он не чего-то не объявлен...


 
Alek ©   (2004-06-22 17:00) [10]

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


 
GuAV ©   (2004-06-22 23:26) [11]


> я пробовал чреез IHTMLFramesCollection2 но тама у меня получается
> только получить количество фреймов, а вот загружать в них
> данные не полычается

Как пытаешься?


 
nikkie ©   (2004-06-23 11:06) [12]

по поводу about: в прошлых обсудениях несколько человек говорили о том, что у них не работает. версии IE при этом все разные, у других с такими же версиями все работает. так что от чего это зависит - непонятно. общая мораль - лучше с ним не связываться.



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

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

Наверх




Память: 0.47 MB
Время: 0.034 c
4-1086184785
FRick
2004-06-02 17:59
2004.07.11
Язык клавы при запуске программы


14-1087993576
vecna
2004-06-23 16:26
2004.07.11
Не пятница, но тем не менее...


1-1088054215
nick
2004-06-24 09:16
2004.07.11
Как освободить память


4-1085737780
Cronos
2004-05-28 13:49
2004.07.11
Как заблокировать клавишу Windows? Подскажите, пожалуйста.


4-1086185977
K.o.Z
2004-06-02 18:19
2004.07.11
TOpenDialog





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский