Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

открыть страницу в указанном фрейме? [D7, XP]

vadiev © (2013-04-30 13:52:00)
Доброго дня!

Подскажите, в WebBrowser открыта страница с тремя фреймами (например: first, second, third). На Button назначенно действие:
Webbrowser1.Navigate('url');

при переходе по кнопке страница открывается перекрывая все фреймы, а нужно чтоб она грузилась например во фрейм "second", тогда как фреймы first и third оставались не тронутыми.

Подскажите пожалуйста на примере кода, как реализовать открытие в указанном фрейме.

clickmaker (2013-04-30 23:23:00) [1]
неверный путь, значит

vadiev (2013-04-30 23:01:00) [2]
стартует без ошибок, но...
.url:='file:///'+ExtractFilePath(paramstr(0))+'start.html';
все равно, пустая страница((

clickmaker (2013-04-30 22:42:00) [3]
'file:///'+ExtractFilePath(paramstr(0))+'start.html'

vadiev (2013-04-30 22:10:00) [4]
clickmaker,
Еще 1 вопрос, если url - это локальный html файл находящийся в директории программы, как в данном случае указать к нему путь? Пробовал:
url :=ExtractFilePath(paramstr(0))+'start.html'
открывает пустой about:blank

vadiev (2013-04-30 21:49:00) [5]
Спасибо большое!!! Всё ок...

clickmaker (2013-04-30 18:28:00) [6]
что именно не понятно?

procedure TForm1.Button1Click(Sender: TObject);
var
frame: IDispatch;
idx: OleVariant;
begin
idx := 1; // фрейм "second"
frame := (WebBrowser1.Document as IHTMLDocument2).Get_frames().item(idx);
((frame as IHTMLWindow2).document as IHTMLDocument2).url := ' http://www.hh.ru';
end;

vadiev (2013-04-30 17:05:00) [7]
2clickmaker

Если не сложно, можно пошагово (что, где указывать)? Я практически полный ноль пока)
Пытаюсь понять, разбирая по кускам другие исходники. Заранее спасибо.

clickmaker (2013-04-30 13:58:00) [8]
что-то типа
frame := (WebBrowser1.Document as IHTMLDocument2).Get_frames().item(1);
((frame as IHTMLWindow2).document as IHTMLDocument2).url :=

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »