一个小程序,需要实现的是。 点击一个按钮 两个叠加的 Webbrowser 切换。
开始我用的方法是procedure TForm1.btn3Click(Sender: TObject);begin
if wb2.Left = -500
then
begin
wb1.Left := -500;
wb2.Left := 5;
end
else
begin
wb1.Left := 5;
wb2.Left := -500;
end
end;可是我现在需要在点击窗口最大化或者调整窗口大小的时候 wb1 和wb2 都可以相应的扩大缩小。
不知道该如何实现,最好能给出源代码, 谢谢了。
开始我用的方法是procedure TForm1.btn3Click(Sender: TObject);begin
if wb2.Left = -500
then
begin
wb1.Left := -500;
wb2.Left := 5;
end
else
begin
wb1.Left := 5;
wb2.Left := -500;
end
end;可是我现在需要在点击窗口最大化或者调整窗口大小的时候 wb1 和wb2 都可以相应的扩大缩小。
不知道该如何实现,最好能给出源代码, 谢谢了。
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货