计算机二级:Delphiexe实例之间传递cmd参数计算机二级考试

文章作者 100test 发表时间 2009:05:07 18:06:43
来源 100Test.Com百考试题网

　　{Unit1.pas}
　　通过这个单元的Button，调用另一个实例；
　　procedure TForm1.Button1Click(Sender: TObject).
　　begin
　　ShellExecute(Handle, open, project2.exe, HelloWorld, nil, SW_SHOWNORMAL).
　　end.
　　{Unit2.pas}
　　接受参数的实例
　　procedure TForm1.FormCreate(Sender: TObject).
　　begin
　　Edit1.Text := ParamStr(1).
　　end.
　　其实不是一定要在FormCreate中相应，只要把ParamStr赋值给要用参数的地方就OK了。ParamStr(0)是实例自己，所以参数从1开始；而且传的参数是以空格分看的，“Hello World”，ParamStr(1) = ‘Hello’了；

　　特别推荐：

　　2009年9月全国计算机等级考试时间及科目预告

　　2009年上半年全国计算机等级考试参考答案请进入计算机考试论坛

　　2009年全国计算机等级考试报名信息汇总

　　2009年NCRE考试有新变化

　　2009年全国计算机等级考试-大纲

　　2009年上半年全国计算机二级考试试题及答案

　　2009年上半年全国计算机等级考试试题答案汇总