在delphi中如何做一个.exe,让应用程序在运行时接收用户输入的参数? 是这样的,以前学C的时候,main()函数可以接收用户输入的参数,不知道在delphi中,可不可以,我想做一个小程序,当用户在运行框中输入小程序的名称+参数时,根据参数的不同来执行不同的功能,请问可以实现吗?最好讲一下原理及实现的过程,谢谢各位大虾,先给20分,问题解决了另开贴再加100分!! 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 执行EXE的时间加上参数,在程序中取参数用下面的方法ParamStr(1),ParamStr(2)根据不同的参数做不同的处理 1.ParamCount: 得到输入的参数数;2.ParamStr(Index): 得到第Index个参数; Index = 0 --> Exe 文件名(含目录) Index = 1 --> 第1个参数,依此类推 另:API GetCommandLine 可以直接得到整个命令行,你也可以自己解析它。3. 关于命令行: blabla.exe Param1 Param2 ^^ 参数1 ^^^ 参数2 参数以空格作为分割符,所以: 如果某参数中含有空格,则该参数必须用双引号括起来; 若没有空格,就无所谓了,引号可有可无。 写就写,又不死人。var str: string;begin // ParamStr = Applicaiton.ExeName // 不过,在控制台程序里Delphi未自动创建TApplication对象, // 这时,可用ParamStr(0)来得到exe的路径等信息 ShowMessage(ParamStr(0)); ShowMessage('一共输入了如下个参数' + IntToStr(ParamCount)); for i := 1 to ParamCount do begine str := Format('第 %d 个参数是 %s', [i, ParamStr(i)]); ShowMessage(str); end;end;楼主满意了吧? 抱歉,改错: // ParamStr(0) = Applicaiton.ExeName // 不过,在控制台程序里Delphi未自动创建TApplication对象, // 这时,可用ParamStr(0)来得到exe的路径等信息 ShowMessage(ParamStr(0)); 建议楼主做一个logoForm,里面放几个Edit控件,根据Edit。Text内容不用去执行不用的功能不就行了嘛。 刚学delphi,有什么好点的参考书推荐下吗 !!!在线等待一个关于日期的函数。已知一个日期,如何获取下一天日期?? 怎样实现将dbgrideh的某几列合并(就像excel的合并单元格 ) 我的全文检索忽略中文了!怎么回事? 有中文的delphi帮助吗?谢谢 怎样清除StringGrid控件的全部内容? 本人现在有QQ号码n个(n>1000),现在放在我的信箱中,而且每天都在增加!!! 第一次提问:有关findkey查询数据库记录。 delphi这句代码是什么意思? 在程序运行期间怎样及时捕捉输入法的变化? 大家讨论讨论delphi.net 三个关联表格的字段的重新排序问题?
在程序中取参数用下面的方法
ParamStr(1),ParamStr(2)
根据不同的参数做不同的处理
2.ParamStr(Index): 得到第Index个参数;
Index = 0 --> Exe 文件名(含目录)
Index = 1 --> 第1个参数,依此类推 另:API GetCommandLine 可以直接得到整个命令行,你也可以自己解析它。3. 关于命令行:
blabla.exe Param1 Param2
^^ 参数1 ^^^ 参数2
参数以空格作为分割符,所以:
如果某参数中含有空格,则该参数必须用双引号括起来;
若没有空格,就无所谓了,引号可有可无。
str: string;
begin
// ParamStr = Applicaiton.ExeName
// 不过,在控制台程序里Delphi未自动创建TApplication对象,
// 这时,可用ParamStr(0)来得到exe的路径等信息
ShowMessage(ParamStr(0));
ShowMessage('一共输入了如下个参数' + IntToStr(ParamCount));
for i := 1 to ParamCount do
begine
str := Format('第 %d 个参数是 %s', [i, ParamStr(i)]);
ShowMessage(str);
end;
end;楼主满意了吧?
// ParamStr(0) = Applicaiton.ExeName
// 不过,在控制台程序里Delphi未自动创建TApplication对象,
// 这时,可用ParamStr(0)来得到exe的路径等信息
ShowMessage(ParamStr(0));