原来在form1里用一个btn,新建一个form,用Form2.show();打开一个新的form,我现在把form1做成了ActiveFormX,在
ActiveFormX里加一个btn,打开一个窗口,该用什么方法。ActiveFormX是用网页的形式打开的,新打开的窗口,是不是也要以的网页形式打开。我原来打开的窗口中还嵌入一个画图软件。代码如下:
procedure TForm1.HTButtonClick(Sender: TObject); //打开form2
begin
Winexec('GSP\GSP.EXE',SW_NORMAL); //先运行GSP.EXE画图程序。
Form2.show();
end;然后再form2里 procedure TForm2.Button1Click(Sender: TObject);//把画图程序嵌入到form2中的Panel1中
var h:HWND;begin
h := FindWindow(nil, '几何画板 - 未命名 1');
Windows.SetParent(h, Panel1.Handle);
MoveWindow(h, 0,0, 700, 500, True);
end;在activeform 中该怎么实现这个功能?
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货