Помощь - Поиск - Пользователи - Календарь
Полная версия: Как динамически создать Twebbrowser?
Форум «Всё о Паскале» > Delphi, Assembler и другие языки. > Delphi
Guest
Пробую так:
Код

procedure TForm1.Button8Click(Sender: TObject);
var
 N : Integer;
 WebBrowser111 : TWebBrowser;
begin
 WebBrowser111 := TWebBrowser.Create( Form1 );
 WebBrowser111.Left := 0;
 WebBrowser111.Top := 0;
 WebBrowser111.Width := 100;
 WebBrowser111.Height := 100;
 WebBrowser111.Visible := True;
end;

абсолютно ничего не происходит (не создается и ошибки нет), в чем дело??
Думал, что потому что не прописал Owner или Parent... но они только для чтения...
volvo
Вот так попробуй:
procedure TForm1.Button8Click(Sender: TObject);
var
N : Integer;
WebBrowser111 : TWebBrowser;
begin
WebBrowser111 := TWebBrowser.Create(Self);
WebBrowser111.Left := 0;
WebBrowser111.Top := 0;
WebBrowser111.Width := 100;
WebBrowser111.Height := 100;
WebBrowser111.Visible := True;

TControl(WebBrowser111).Parent := Form1;
WebBrowser111.Navigate('http://www.rambler.ru');
end;
Guest
Сработало!!! smile.gif
Спасибо!!!
Guest
volvo, кстати, а ты не можешь прокомментировать почему не получилось: WebBrowser111.Parent := Form1 ? Почему оно доступно только на чтение? По-моему я когда-то ведь так делал....
volvo
Цитата(Guest @ 11.07.05 16:15)
Почему оно доступно только на чтение? По-моему я когда-то ведь так делал...

Не знаю, по-моему, TWebBrowser.Parent всегда был только для чтения... Да и Owner тоже.
Это текстовая версия — только основной контент. Для просмотра полной версии этой страницы, пожалуйста, нажмите сюда.