是否有一个简单的语句可以给出与Delphi中的paramstr()类似的结果?

最佳答案

Delphi Prism(.Net)不包含ParamStr函数,但是可以使用GetCommandLineArgs方法轻松实现,here是一个示例:

class method TMyClass.ParamStr(Index: Integer): String;
var
  MyAssembly: System.Reflection.Assembly;
  Params    : array of string;
begin
  if Index = 0 then
  begin
    MyAssembly:= System.Reflection.Assembly.GetEntryAssembly;
    if Assigned(MyAssembly) then
      Result := MyAssembly.Location
    else
      Result := System.Diagnostics.Process.GetCurrentProcess.MainModule.FileName;
  end
  else
  begin
    Params := System.Environment.GetCommandLineArgs;
    if Index > Length(Params) - 1 then
      Result := ''
    else
      Result := Params[Index];
  end;
end;


您还可以看到ShineOn项目,其中包含功能ParamStr的实现。

关于delphi - Delphi Prism中的paramstr等效项是什么,我们在Stack Overflow上找到一个类似的问题:https://stackoverflow.com/questions/1875477/

10-13 02:16