2
Есть ли простой оператор, который может дать результат, аналогичный параметру() в Delphi?Что такое эквивалент paramstr в Delphi Prism
Есть ли простой оператор, который может дать результат, аналогичный параметру() в Delphi?Что такое эквивалент paramstr в Delphi Prism
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.