2013-04-22 65 views
0

我使用這,而不是TWebbrowser在我的項目delphichromiumembedded插件新鉻選項卡,有是,當我點擊我不能創建一個新的標籤問題使用TChrometabs或tpagecontrol.thanks的pagesheetwindow。 這樣的代碼:我使用Delphi中的鉻,但我覺得我不能創建

procedure TMainForm.ChromeTabs1ButtonAddClick(Sender: TObject; 
    var Handled: Boolean); 
var 
    chrm: TChromium; 
    CurrentTab1:TChromeTabs; 
begin 
    CurrentTab1:=TChromeTabs.Create(Self); 
    chrm:=TChromium.Create(CurrentTab1); 
    chrm.Align := alClient; 
    chrm.Parent := TWinControl(CurrentTab1); 
    chrm.DefaultUrl := 'about:blank'; 
    chrm.Load('http://www.google.com/'); 
end; 
+0

我不明白這個問題。 Norgepaul的TChromeTabs組件帶有一個複雜的演示程序,可顯示您所需的所有內容。你的問題是什麼 ?你有什麼麻煩?你不知道如何製作一個新標籤或如何製作TChromium瀏覽器的實例? – TLama 2013-04-22 07:22:21

+0

請稍等一些細節。編譯時間錯誤?運行時錯誤?意外的行爲?任何代碼? – 2013-04-22 07:22:54

+0

對不起,我是一個新鮮感。感謝TLama和David Hefferman,我的問題是我不知道如何將這兩個插件(TChromeTabs和TChromium)成功地結合起來,例如,我期望的是,當我點擊TChromeTabs,我可以創建一個新的標籤頁,這是TChromium瀏覽器的一個新實例。但是現在,即使我點擊TChromeTabs,也會創建一個新標籤,但TChromium沒有任何變化。 – 2013-04-22 07:45:12

回答

1

當用戶點擊「添加」按鈕,你不應該創建一個全新的TChromeTabs組件。你已經有一個。您甚至不需要需要來創建一個新選項卡,因爲默認情況下組件會爲您執行此操作。如果您想手動創建新選項卡,請設置Handled := True以禁用默認行爲,然後致電Sender.Tabs.Add。它返回對新選項卡對象的引用。這在組件包含的示例應用程序中得到了證明;請查看ChromeTabs1ButtonAddClick方法。一旦你有了這個標籤對象引用,你可以根據需要操作它,比如通過放置一個瀏覽器控件。

相關問題