使用系统参数:ParamStr
ParamStr(0)是应用程序文件名,ParamStr(1)是第一个外部参数,ParamStr(2)是第二个外部参数,以此类推。它们都是String类型的。下面是一个简单的例子procedure TForm1.Button1Click(Sender: TObject);
begin
edit1.text:=paramstr(0);
edit2.text:=paramstr(1);
edit3.text:=paramstr(2);
end;运行程序时赋给外部参数“Hello world”,则edit2显示“Hello”,edit3显示“world”程序在我这里测试通过
ParamStr(0)是应用程序文件名,ParamStr(1)是第一个外部参数,ParamStr(2)是第二个外部参数,以此类推。它们都是String类型的。下面是一个简单的例子procedure TForm1.Button1Click(Sender: TObject);
begin
edit1.text:=paramstr(0);
edit2.text:=paramstr(1);
edit3.text:=paramstr(2);
end;运行程序时赋给外部参数“Hello world”,则edit2显示“Hello”,edit3显示“world”程序在我这里测试通过
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货