散分了！！！！！！！！

Question

如何向一个可执行文件中加入一个按钮控件,并加入事件代码？

Answer 1

动态创建Button,并在button创建军后指定如butt1.Onclick := dd;

Answer 2

unit Unit1;interfaceuses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls;type
  TForm1 = class(TForm)
    procedure FormCreate(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;var
  Form1: TForm1;implementation{$R *.dfm}procedure TForm1.FormCreate(Sender: TObject);
var btn:TButton;
begin
btn:=TButton.Create(application);
btn.Parent:=form1;
btn.Caption :='aaa'
end;end.

Answer 3

如何向一个可执行文件中加入一个按钮控件,并加入事件代码？
>>>>
应该是另一个可执行文件吧
不会楼下的,继续

Answer 4

如果是一个程序的话 动态添加很容易
     Bt := Tbutton.Create(self);
      Bt :=self;
如果是另外的程序 只有帮你顶

Answer 5

Bv:=TButton.creat(self);
BV.parent=self;

Answer 6

unit Unit1;interfaceuses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls;type
  TForm1 = class(TForm)
    procedure FormCreate(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;var
  Form1: TForm1;implementation{$R *.dfm}procedure TForm1.FormCreate(Sender: TObject);
var btn:TButton;
begin
btn:=TButton.Create(application);
btn.Parent:=form1;
btn.Caption :='aaa'
end;end.

Answer 7

你是说加到EXE文件中?
不会,太高深了.

Answer 8

修改EXE?这要MASM才好办,Delphi不适合做这个的

Answer 9

晕..个个都答错..楼主是想修改exe文件啊....

Answer 10

var
ahandle:thandle;
btn:tbutton;
begin
//首先用取得窗口的handle:ahandle;
//然后如上楼的写的一样。创建一个按钮；
btn:=TButton.Create(application);
//再设置parent;
btn.Parent:=ahandle;应该是可以。
但是这样的情况是，只有在打开本软件的状态下才起作用。