Delphi-PRAXiS
Seite 3 von 4     123 4      

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)
-   -   Delphi ShellExecute (https://www.delphipraxis.net/100774-shellexecute.html)

JB-1990 1. Dez 2008 20:34

Re: ShellExecute
 
keiner ne idee?

mkinzler 1. Dez 2008 20:39

Re: ShellExecute
 
Bei welchem Parameter?

JB-1990 1. Dez 2008 22:19

Re: ShellExecute
 
das ding is, dass der Befehl ShellExec so weit funzt (probiert mit IEXPLORE.EXE)
sobald es jedoch um CMD.EXE geht, trägt er meinen Befehl nicht ein, ob ipconfig oder dem zuvor erwähnten Befehl zum ändern der localen IP
LG

mkinzler 1. Dez 2008 22:22

Re: ShellExecute
 
Und welchen der Paramter mahnt er nun an?

JB-1990 1. Dez 2008 22:51

Re: ShellExecute
 
keinen, er macht es einfach nicht, Programm läuft, macht aber nicht, was es soll

mkinzler 1. Dez 2008 22:57

Re: ShellExecute
 
Was hast du als Pfad angegeben?
Was für ein Code wird zurückgeliefert?

JB-1990 1. Dez 2008 23:03

Re: ShellExecute
 
so sieht das ding aus:
Delphi-Quellcode:
procedure TFIP.BChangeClick(Sender: TObject);
 var netzname,ip,nm,dns,befehl :string;
begin
 netzname :=EName.Text;
 ip      :=EIP1.Text+'.'+EIP2.Text+'.'+EIP3.Text+'.'+EIP4.Text;
 nm      :=ENM1.Text+'.'+ENM2.Text+'.'+ENM3.Text+'.'+ENM4.Text;
 dns     :=EDNS1.Text+'.'+EDNS2.Text+'.'+EDNS3.Text+'.'+EDNS4.Text;
 befehl  :='netsh interface ip set address "'+netzname+'" static '+ip+' '+nm+' '+dns+' 1';
 ShellExecute(handle,nil,'cmd.exe',PChar(befehl),nil,0);
end;

mkinzler 1. Dez 2008 23:09

Re: ShellExecute
 
Versuch mal
Delphi-Quellcode:
befehl  :='interface ip set address "'+netzname+'" static '+ip+' '+nm+' '+dns+' 1';
ShellExecute(handle,'open', 'netsh',PChar(befehl),nil,0);

JB-1990 1. Dez 2008 23:20

Re: ShellExecute
 
nix -.-

Fussball-Robby 1. Dez 2008 23:33

Re: ShellExecute
 
Zitat:

Zitat von JB-1990
nix -.-

Heißt? Konsole geht garnicht auf? Oder wird der Befehl nicht ausgeführt?
Im ersten Fall hilft es eventuell den letzten Parameter von 0 (entspricht dort SW_HIDE, also versteckt) in SW_SHOWNORMAL oder SW_SHOW zu ändern. Ansonsten mal ein '/K' vor den Befehl setzen, das bewirkt manchmal Wunder...


Alle Zeitangaben in WEZ +1. Es ist jetzt 02:20 Uhr.
Seite 3 von 4     123 4      

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz