Delphi提供了訪問命令行參數的方便的方式,那就是使用ParamStr和ParamCount函數。其中ParamStr(0)返回的是當前程序名,如C:\TEST\MYPROG.EXE,ParamStr(1)返回第一個參數,以此類推;ParamCount則是參數個數。示例如下:
var
I: Word;
Y: Integer;
begin
Y := 10;
for I := 1 to ParamCount do
begin
Canvas.TextOut(5, Y, ParamStr(I));
Y := Y + Canvas.TextHeight(ParamStr(I)) + 5;
end;
end;