程式一:WINEXEC傳遞變數:
 
procedure Tform1.Button1Click(Sender: TObject);
var tt_str, yy_str: string;
begin
  tt_str := 'james';
  yy_str := 'chien';
    WinExec(pchar('e:\delphi\接收WINEXEC傳遞參數\get.exe ' + tt_str+','+yy_str), SW_ShowDefault);
end;
 
程式二:ParamStr接收變數:
 
procedure Tdayback.FormCreate(Sender: TObject);
var yy:string;
     i:integer;
begin
for i:=0 to Paramcount-1 do
begin
    yy:=ParamStr(i);
    showmessage(yy);
end;
end;
 
**********************************************************
問題:明明在程式一傳遞了三個引數,但程式二卻只接收到一個變數,WHY?
 
註:三個接收的ParamStr應為:
ParamStr(0)是'e:\delphi\接收WINEXEC傳遞參數\get.exe'
ParamStr(1)是'james'
ParamStr(2)是'chien'
arrow
arrow
    文章標籤
    ParamStr
    全站熱搜
    創作者介紹
    創作者 抓狂小白 的頭像
    抓狂小白

    抓狂小白的程式筆記

    抓狂小白 發表在 痞客邦 留言(0) 人氣()

    E-mail轉寄