演示代码如下
::code
procedure TForm1.FormCreate(Sender: TObject);
var
i: Integer;
begin
self.Memo1.Lines.Add(IntToStr(ParamCount));
for i := 1 to ParamCount do
begin
self.Memo1.Lines.Add(ParamStr(i));
//self.Memo2.Lines.LoadFromFile(ParamStr(i)); 这个是用于第二种路径参数
end;
end;
ParamStr(0) 这个用得多 就是表示 自身的 全path
像你把一文件 拖放到 一个程序上 系统会自动把你这个拖放的文件取了路径 作为参数 传给程序,如你在程序创建时接收并利用这参数
就变成 *.exe 拖放文件的全路径 就图1的 那种 打开。 就如系统中的 *.exe %1 是等开 delphi程序的 *.exe ParamStr(1)
像大于0的参数 是指什么呢?
如下图所示 就能看懂是什么了.我编译的程序名为P.exe
图1

图2:

Copyright © 2014 DelphiW.com 开发 源码 文档 技巧 All Rights Reserved
晋ICP备14006235号-8 晋公网安备 14108102000087号
执行时间: 0.050028800964355 seconds