delphi – 在其他应用程序窗口上创建Button

发布时间：2020-12-15 09:16:39 所属栏目：大数据来源：网络整理

导读：我写了下面的代码来在Calculator上创建一个额外的按钮,但是按钮没有显示： var Object1 : TButton ; Hand: THandle;begin Hand:= FindWindow('CalcFrame','Calculator'); Object1 := TButton.CreateParented(Hand); Object1.Show ;end; 在使用EnumChildWindo

我写了下面的代码来在Calculator上创建一个额外的按钮,但是按钮没有显示：

var
  Object1 : TButton ;
  Hand: THandle;
begin
   Hand:= FindWindow('CalcFrame','Calculator');
   Object1 := TButton.CreateParented(Hand);
   Object1.Show ;
end;

在使用EnumChildWindow API函数运行上面的代码后,我得到了计算器上的控件,并看到EnumChildWindow返回的控制列表中创建的按钮,但为什么创建的按钮没有显示？

我记得我在Windows XP上使用这个代码,它没有问题,但现在在Windows 7中没有出现创建的按钮.

解决方法

Win7中的计算器和Paint是
使用.NET和WPF重建,以及
没有办法“联系”
.NET代码通过本机代码
特别是使用不同的WPF
绘制控件的方法.

编辑：
使您的代码适用于本机
您可以使用以下代码的应用程序：

hand := FindWindow('TForm1','Form1');
object1 := TButton.Create(self);
object1.ParentWindow := hand;

（编辑：李大同）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!