[cellleexx]

Здравствуйте!

Подскажите, пожалуйста, как передать параметры в строку запуска внешнего приложения?
Приложил фото.

https://ibb.co/HDjcnbG

[lmikle]

Код:

1 2 3 4 5

var   cmd : String; begin cmd := format('appname.exe /%s /%s /%s',[edit1.text,edit2.text,edit3.text]); winexec(cmd,SW_SHOW);

То?

[cellleexx]

Сообщение от lmikle

Код:

То?

[Error] Unit1.pas(34): Incompatible types: 'String' and 'PAnsiChar'

Код:

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38

unit Unit1;   interface   uses   Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,   Dialogs, StdCtrls;   type   TForm1 = class(TForm)     Edit1: TEdit;     Edit2: TEdit;     Edit3: TEdit;     Button1: TButton;     procedure Button1Click(Sender: TObject);   private     { Private declarations }   public     { Public declarations }   end;   var   Form1: TForm1;   implementation   {$R *.dfm}   procedure TForm1.Button1Click(Sender: TObject); var   cmd : String; begin cmd := format('ping.exe /%s /%s /%s',[edit1.text,edit2.text,edit3.text]); winexec(cmd,SW_SHOW);   end;   end.

[lmikle]

Ну просто же:

Код:

1	winexec(PChar(cmd),SW_SHOW);

PS. Я так понимаю, это Delphi 7.

[cellleexx]

Сообщение от lmikle

Ну просто же:

Код:

PS. Я так понимаю, это Delphi 7.

Просто, когда умеешь). Буду знать куда PChar толкать, спасибо!
Да, 7. в профиле указал. В 10 тоже самое, но еще хуже, ввобще не запускается.

В 7 аргументы не передаются.
--

ShellExecute(cmd,SW_SHOW);
ошибка в 10м:
Incompatible types: 'HWND' and 'string'()
в 7м:
Incompatible types: 'String' and 'PShellExecuteInfoA'