如題.煩請賜教 除了 ParamStr 之外, 請問是否另有其它FUNCTION或API可接收UNICODE的參數?    小弟的需求是: 將檔案名稱傳入程式之中    例如:  C:\MyApp.exe "C:\王建煊.TXT"    謝謝 發表人 -

自問自答..小弟找到方法了... 提供出來大家參考參考 ================================================================= 改寫 GetParamStr 和ParamStr 這二個FUNCTION..就可以了.. ================================================================= function GetParamStrW(P:PWChar;var Param:WideString):PWChar; var Len:Integer; Buffer:array[0..4095] of WChar; begin while True do begin while (P[0]<>#0) and (P[0]<=' ') do Inc(P); if (P[0]='"') and (P[1]='"') then Inc(P,2) else Break; end; Len:=0; while (P[0]>' ') and (Len#0) and (P[0]<>'"') do begin Buffer[Len]:=P[0]; Inc(Len); Inc(P); end; if P[0]<>#0 then Inc(P); end else begin Buffer[Len]:=P[0]; Inc(Len); Inc(P); end; end; SetString(Param, Buffer, Len); Result:=P; end; function ParamStrW(Index: Integer): WideString; var P:PWChar; Buffer:array[0..MAX_PATH] of WChar; begin if Index=0 then SetString(Result,Buffer,GetModuleFileNameW(0,Buffer,SizeOf(Buffer))) else begin P:=GetCommandLineW; Result:=''; while True do begin P:=GetParamStrW(P,Result); if (Index = 0) or (Result = '') then Break; Dec(Index); end; end; end;