当前位置: 首页 > 图文教程 > 开发语言 > Delphi > 返回程序执行参数

Delphi
Delphi开发经验四则
Delphi应用程序的应用(一)
Delphi应用程序的应用(二)
异常处理与程序调试(一)
异常处理与程序调试(二)
异常处理与程序调试(三)
Delphi开发数据库应用程序概述(一)
Delphi开发数据库应用程序概述(二)
简单数据库应用的创建及MASTAPP介绍(一)
简单数据库应用的创建及MASTAPP介绍(二)
简单数据库应用的创建及MASTAPP介绍(三)
数据访问部件的应用及编程(一)
数据访问部件的应用及编程(二)
数据访问部件的应用及编程(三)
数据浏览部件的应用及编程(一)
数据浏览部件的应用及编程(二)
SQL编程(一)
SQL编程(二)
Delphi客户服务器应用开发(一)
Delphi客户服务器应用开发(二)

Delphi 中的 返回程序执行参数


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-10-30   浏览: 73 ::
收藏到网摘: n/a

 

有关 Delphi 传入应用程式的命令列参数, 请参考以下的说明:
用ParamCount函数取得命令参数的个数:
呼叫 ParamStr(0), 传回执行档的档名(含路径)
呼叫 ParamStr(n), 传回第n个参数的内容
procedure TForm1.FormCreate(Sender: TObject);
var
sFileName: string;
begin
if ParamCount > 0 then begin (* 有执行参数传入 *)
sFileName := ParamStr(1); (* 取得参数内容 *)
if FileExists(sFileName) then
Memo1.Lines.LoadFromFile(sFileName)
else
Application.MessageBox('找不到指定的档案', '讯息', 48);
end;
end;