delphi - 如何读取具有不同分隔符的ParamEter值？

Question

当您阅读 ParamStr() 时，每个参数之间由空格分隔。但是，我见过许多命令行参数，它们接受参数名称及其配对值之间的空格，同时还接受等号 = 符号，甚至不接受分隔符(仅以参数名称为前缀)或没有值。

以下是可能的参数字符串的一些示例:

-name value
/name value
-name=value
/name=value
-namevalue
/namevalue
-name -nextname
/name /nextname
-name="value with spaces"
/name="value with spaces"

...等等

我想做的是两件事都相关...检查参数名称是否存在，并读取参数的值。例如...

if ParamExists('ParamName') then
  SomeString:= ParamValue('ParamName')
else
  SomeString:= 'SomeOtherString';

Delphi中有什么东西可以做到这一点吗？如果没有，我该怎么做？我在搜索时找到的所有内容都只是将我引向相同的基本示例:

for i := 0 to ParamCount do
  ShowMessage(ParamStr(i));

它还需要区分大小写。我正在寻找像 OSQL 之类的东西以及类似的命令行工具，其中“-s”可能与“-S”不同。

问题是，如果我使用空格作为分隔符，我不知道如何识别它何时是前一个参数的一部分，因为它用空格将它们分开。我该如何解决这个问题？

我确信这也有一个标准术语，它是命令行参数的常见格式。但我不知道如何仅使用 ParamStr 正确读取它们。看来 ParamStr 达不到它通常的用途。

需要明确的是，我不一定需要支持上面的每个示例 - 这些只是我以前见过的示例。

Answer 1

ParamStr()(以及相应的 FindCmdLineSwitch())不够灵活，无法处理您所展示的所有示例。您必须调用 Win32 API GetCommandLine() 函数并手动解析它。