5,386
社区成员
发帖
与我相关
我的任务
分享200分不手软！！ 如何让 TCppWebBrowser 控件在显示网页后平面化，去掉它的边框！
如何让 TCppWebBrowser 控件在显示网页后平面化，不显示边框！
谢谢观赏！
谢谢观赏！
...全文
请发表友善的回复…
发表回复
GoldShield 2004-08-03
- 打赏
- 举报
你设计的时候全弄成平面的不就行了么?
zswangII 2004-08-03
- 打赏
- 举报
//能看明白吗？投机取巧，用一个平面Panel将边框盖住～～
procedure TForm1.FormCreate(Sender: TObject);
begin
WebBrowser1.ClientWidth := Panel1.ClientWidth + 4;
WebBrowser1.ClientHeight := Panel1.ClientHeight + 4;
WebBrowser1.Left := - 2;
WebBrowser1.Top := - 2;
Panel1.BevelOuter := bvNone;
TControl(WebBrowser1).Parent := Panel1;
WebBrowser1.Navigate('http://community.csdn.net/Expert/topic/3238/3238965.xml?temp=.6419794');
end;
procedure TForm1.FormCreate(Sender: TObject);
begin
WebBrowser1.ClientWidth := Panel1.ClientWidth + 4;
WebBrowser1.ClientHeight := Panel1.ClientHeight + 4;
WebBrowser1.Left := - 2;
WebBrowser1.Top := - 2;
Panel1.BevelOuter := bvNone;
TControl(WebBrowser1).Parent := Panel1;
WebBrowser1.Navigate('http://community.csdn.net/Expert/topic/3238/3238965.xml?temp=.6419794');
end;
justoday 2004-08-03
- 打赏
- 举报
那是什么，，，不太明白你说的
或许是因为这。。没人回
或许是因为这。。没人回
thingking 2004-08-03
- 打赏
- 举报
终于有人回答了，不过不是。
justoday 2004-08-03
- 打赏
- 举报
是不是指全屏显示
