Форум: "Начинающим";
Текущий архив: 2018.02.25;
Скачать: [xml.tar.bz2];
ВнизTWebBrowser - Control has no parent window Найти похожие ветки
← →
ford © (2016-02-26 14:37) [0]Доброго время суток!
Создаю динамически объект TWebBrowser
procedure TForm2.Button1Click(Sender: TObject);
var Web:TWEbBrowser;
begin
Web:=TWEbBrowser.Create(Panel1);
Web.ParentWindow:=Panel1.Handle;
Web.Align:=alClient;
web.Navigate(ExtractFileDir(ParamStr(0))+"\prim.htm");
end;
Все работает, ну кроме выравнивания AlClient (но это ладно)
Попробовал создать компонент - наследник от TPanel. В его конструкторе пишу:
constructor TWebEditor.Create(AOwner: TComponent);
begin
inherited Create(AOwner);
fBrowser:=TWebBrowser.Create(Self);
fBrowser.OnDocumentComplete:=DocumentComplete;
fBrowser.ParentWindow:=Self.Handle;
fBrowser.Align:=alClient;
BevelOuter:=bvNone;
Caption:="";
end;
При установке компонента на форму Выдается сообщение что Control "" has no parent window
Плииз, подскажите, что не так? В рантайме, все создается, а в компоненте нет. Получается что при размещении панели на форме, она не имеет handle? И как быть?
← →
ford © (2016-02-26 14:58) [1]Нашел, где собака зарыта
http://delphimaster.net/view/1-1131126666
Спасибо Юрию Зотову :)
> Юрий Зотов © (2005-11-07 14:55) [14]
>
> Просто перенести создание закладок в CreateWnd, вот и все.
>
Страницы: 1 вся ветка
Форум: "Начинающим";
Текущий архив: 2018.02.25;
Скачать: [xml.tar.bz2];
Память: 0.44 MB
Время: 0.001 c