参数(50分)

我想编一条程序,可以在执行时,接收参数,比如说执行aaa.exe bbb,ccc
aaa为命令,bbb和ccc为参数,然后根据传递参数进行处理,DELPHI要怎么设置才能
有这种功能

可以直接用以下的函数：
paramcount:命令行参数个数
ParamStr(i):返回命令行中的第 i 个参数，是字符串。
paramstr(0):是执行程序的文件名。

procedure TForm1.FormCreate(Sender: TObject);

var
i: Integer;
for i := 0 to ParamCount - 1 do
begin
if LowerCase(ParamStr(i)) = 'beep' then
Beep(10000,1000)
else if (LowerCase(ParamStr(i)) = 'exit' then
Application.Terminate;
end;
end;

参数以空格分开 比如 aaa.exe bbb ccc（2个参数）
如果参数本身有空格，用双引号引起来，比如aaa.exe "bbb ccc"(一个参数)

谢谢大家