急，解决了就给分

Question

我想在开始\运行中输入C:\Mytest.exe 1 ,程序就自动执行c:\mytest.exe中的button1动作，请问
如何实现 ，请给出demo,谢谢

Answer 1

procedure TForm1.FormCreate(Sender: TObject);
begin
 if ParamStr(1) = '1' then Button1.Click;
end;

Answer 2

unit Unit1;interfaceuses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls;type
  TForm1 = class(TForm)
    Button1: TButton;
    procedure Button1Click(Sender: TObject);
    procedure FormCreate(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;var
  Form1: TForm1;implementation{$R *.dfm}procedure TForm1.Button1Click(Sender: TObject);
begin
  ShowMessage('asdfsadfsdf');
end;procedure TForm1.FormCreate(Sender: TObject);
begin
  if ParamStr(1)='1' then Button1Click(Button1);
end;end.

Answer 3

procedure TForm1.FormCreate(Sender: TObject);
begin
  if paramcount=0 then showmessage('no param');
  if paramstr(1)='1' then button1.OnClick(nil);
end;

Answer 4

现在的命令是自动启动了C:\test.ext,
如果我手动启动C:\test.exe,然后再在开始\运行中输入C:\Mytest.exe 1，请问如何实现呢

Answer 5

我希望先手动启动程序，然后在开始运行中输入一些命令后，这些命令将执行我的程序中button1的命令

Answer 6

因为我的程序中还有一些操作，然后再去点button1