● DelphiTips 005 - 获得命令行参数 - 荔园在线 | 深圳大学学生论坛,荔园晨风BBS,深大在线网站

荔园之美，在春之萌芽，在夏之绽放，在秋之收获，在冬之沉淀

发信人: Peter (小飞侠), 信区: Program
标题: DelphiTips 005 - 获得命令行参数
发信站: BBS 荔园晨风站 (Thu Jan 21 21:13:27 1999), 转信

1. 取得命令列参数的个数: ParamCount 函数
2. 呼叫 ParamStr(0), 传回执行档的档名(含路径)
3. 呼叫 ParamStr(n), 传回第ｎ个参数的内容
例子：
procedure TForm1.FormCreate(Sender: TObject);
var
　ix: integer;
begin
　Memo1.Lines.Clear;
　if ParamCount = 0 then
　　Memo1.Lines.Add('??统??.')
　else
　begin
　　Memo1.Lines.Add('档名:' + ParamStr(0));
　　for ix := 1 to ParamCount do
　　Memo1.Lines.Add(ParamStr(ix));
　end;
end;

--
※ 来源:．BBS 荔园晨风站 bbs.szu.edu.cn．[FROM: 192.168.1.3]

荔园在线首页友情链接：深圳大学深大招生荔园晨风BBS S-Term软件网络书店