频道分类

Delphi应用程序 ParamStr()带有参数

作者:admin 来源: 日期:2020/11/12 11:32:51 人气: 标签:

 

尽管运行带有参数的应用程序是过去的日子,但是新版本的操作系统使您可以在应用程序中运行参数。

与其他任何编程语言一样,Delphi也允许您创建应用程序,该应用程序读取发送的参数并通过ParamStr()函数与之交互

我们不仅可以在运行时读取发送给应用程序的参数,还可以在Debug时进行读取为此,我们必须转到Run-> Parameters菜单,并为每个应用程序版本放置必要的参数。

ParamStr()和ParamCount()

为了与发送到应用程序的参数进行交互,我们必须首先知道是否已经发送了一些参数。

要知道这些数据,我们有ParamCount()函数,该函数返回已执行的应用程序接收到的参数数量。

知道接收到的参数数量对于避免访问冲突错误至关重要,因为如果我们想使用ParamStr(0)函数读取参数,而我们尚未收到该参数,则将收到上述错误。

在哪里读取接收到的参数

onActivate事件开始执行起,就可以使用发送到应用程序的参数

换句话说,一旦激活应用程序并贯穿整个过程,我们将能够访问所有接收到的参数,包括onDestroy事件

ParamStr()示例

为了执行此ParamStr()和ParamCount()函数示例,我们创建一个空白应用程序,并将TMemo放置在如下图所示的形式中:

我们打开菜单Run-> Parameters,然后在对话框中的Parameters选项中放置一些要测试的参数,如下图所示:

然后,将以下代码放入Form的onActivate事件中:

procedure TForm1.FormActivate(Sender: TObject);
var
  I: Integer;
begin
  {Vaciamos el memo}
  memo1.Lines.Clear;
  {Leemos los parámetros recibidos y los mostramos en el memo}
  for I := 0 to ParamCount() do
  begin
    memo1.Lines.Add(('Parámetro '+IntToStr(I)+' = '+ParamStr(I)));
  end;
end;
在执行应用程序时,我们会发现备忘录显示了我们发送给应用程序的所有参数:

Delphi接收参数



(是的,我知道,三个英文写成三个) 🙂但是我们遇到了一个惊喜,参数0。该参数的索引为零,将在每次应用程序执行中出现,它不过是包含扩展名的应用程序的完整路径和名称。请记住,如果在任何时候需要我们的可执行文件所在的路径或文件名,则可以通过ParamStr(0)函数使用它。


上一篇:Delphi删除文件下一篇:没有资料