hola.
quisiera saber como concatenar variables dentro de un winexec. me explico
lo que quiero hacer es los siguiente
Código Delphi
[-]
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls;
type
TForm1 = class(TForm)
Button1: TButton;
Button2: TButton;
Edit1: TEdit;
Edit2: TEdit;
Edit3: TEdit;
Button3: TButton;
Label1: TLabel;
Label2: TLabel;
Label3: TLabel;
procedure Button2Click(Sender: TObject);
procedure Button1Click(Sender: TObject);
procedure Image1Click(Sender: TObject);
procedure Button3Click(Sender: TObject);
private
public
end;
var
Form1: TForm1;
implementation
{$R *.dfm}
procedure TForm1.Button1Click(Sender: TObject);
begin
winexec('cmd /c netsh interface ip set address "Inalambrica" dhcp',sw_hide);
close;
end;
procedure TForm1.Button2Click(Sender: TObject);
begin
winexec('cmd /c netsh interface ip set address "Inalambrica" static 192.168.1.23 255.255.255.0 192.168.1.1 1',sw_hide);
close;
end;
procedure TForm1.Button3Click(Sender: TObject);
begin
winexec('cmd /c netsh interface ip set address "Inalambrica" static '+edit1.text+' '+edit2.text+' '+edit3.text+' 1',sw_hide);
end;
end.
y me tira el siguiente error
[Pascal Error] Unit1.pas(51): E2010 Incompatible types: 'string' and 'PAnsiChar'
y marca esta linea
Código Delphi
[-]winexec('cmd /c netsh interface ip set address "Inalambrica" static '+edit1.text+' '+edit2.text+' '+edit3.text+' 1',sw_hide);
el programa lo que va a hacer es configurar la ip de la red inalambrica
a una por default (192.168.1.23), que es la que ocupo en mi casa o a una por dhcp que ocupo en el instituto. ademas se va a poder definir una desde el programa.
si me pudieran ayudar estaria muy agradecido
(tambien me serviría para poder implementar net use en mi pregunta anterior
)