I ildg Unregistered / Unconfirmed GUEST, unregistred user! 2002-08-04 #2 ft, 在panel中不知道行不行, 前几天看到一个套在窗口中的, 用了几个api,但具体的也记不清了,ft
Y yzhshi Unregistered / Unconfirmed GUEST, unregistred user! 2002-08-04 #4 已经可以了。还有待完善——刚刚实验的成果吆! procedure TForm1.Button1Click(Sender: TObject); var a: THandle; begin a := FindWindow(nil, '无标题 - 记事本'); Caption := IntToStr(a); Windows.SetParent(a, Panel1.handle); end;
已经可以了。还有待完善——刚刚实验的成果吆! procedure TForm1.Button1Click(Sender: TObject); var a: THandle; begin a := FindWindow(nil, '无标题 - 记事本'); Caption := IntToStr(a); Windows.SetParent(a, Panel1.handle); end;
Y yzhshi Unregistered / Unconfirmed GUEST, unregistred user! 2002-08-04 #5 就是一句API Windows.SetParent(a, Panel1.handle); 但是移动等还需要完善。必须父窗体的Top=0才能很好的移动子
L laohe Unregistered / Unconfirmed GUEST, unregistred user! 2002-08-04 #6 yzhshi: 真的可以?我试了一点都没有反应,只是窗体的标题变为0 其它的不变
Y yzhshi Unregistered / Unconfirmed GUEST, unregistred user! 2002-08-04 #7 你手工打开记事本,然后运行。 我的是测试代码,使用Caption标志获得的句柄,当然以后真正使用绝对不会使用类似的代码获得句柄的。 只是测试,主要使用的是SetParent。
Y yzhshi Unregistered / Unconfirmed GUEST, unregistred user! 2002-08-04 #9 那个就需要使用其他的API了,也许SystemParametersInfo可以。
Y yzhshi Unregistered / Unconfirmed GUEST, unregistred user! 2002-08-04 #11 uses shlapi; Shellexecute
Y yzhshi Unregistered / Unconfirmed GUEST, unregistred user! 2002-08-04 #12 Shellexecute(handle,'Open','C:/aa.exe',nil,'C:/',SW_Normal); 如果是你自己创建的,那么最好直接使用CreateProcess将它直接创建在你的窗体上,应该可以的。
Shellexecute(handle,'Open','C:/aa.exe',nil,'C:/',SW_Normal); 如果是你自己创建的,那么最好直接使用CreateProcess将它直接创建在你的窗体上,应该可以的。
L laohe Unregistered / Unconfirmed GUEST, unregistred user! 2002-08-04 #13 谢谢大侠指点,请到问题列表,请你再拿100分,谢谢 标题栏还是去不掉,气死了
Y yzhshi Unregistered / Unconfirmed GUEST, unregistred user! 2002-08-04 #14 无所谓了,我在这里就够了,那一百分你暂时留着继续问这个问题吧。 也许会有更好的办法出现。