delphi xe10 FMX 启动参数

Posted 2022-11-01 pykill

 

关于 Delphi Xe10 FMX 启动参数  需要在启动窗口前来调用

 

也就是在bar文件修改

如果参数多可以用json来

uses

 system.SysUtils;

var

param: string;

 

begin

 if FindCmdLineSwitch(‘p‘) then

FindCmdLineSwitch(‘p‘, param);

Application.Initialize;
Application.CreateForm(TdmLoginCore, dmLoginCore);
Application.CreateForm(TForm1, Form1);
Application.Run;

end;