*.bat execute!?!

[leddl]

Ah, okay. Ich hab das damals immer mit Arrays of Char gelöst. Hatte mir extra mal ne Funktion geschrieben, um den "komplizierten" Aufruf von ShellExecute zu vereinfachen. :mrgreen:

Delphi-Quellcode:

function ExecuteFile(Handle : HWND; FileName, Params : String) : Boolean;
Var Datei, Parameter : Array[0..800] of Char;
Begin
  If FileExists(FileName) Then
  Begin
      StrPCopy(Datei,FileName);
      StrPCopy(Parameter,Params);
      ShellExecute(Handle,'open',Datei,Parameter,nil,SW_NORMAL);
      Result := true;
  End
  Else
    Result := false;
End;

PS: Ja, es heißt "compilieren". ;)

[DGL-luke]

tja leddl... schlecht, wenn man nichts von PChar weiss. :mrgreen: :lol:

PChar gibt glaube ich die anfangsadresse des strings zurück, allerdings ohne den reference count zu erhöhen, was ja ideal für solche funktionsaufrufe ist.

[leddl]

Ich geb zu, daß ich von PChars nicht allzuviel weiß. Hauptsache, ich weiß, wie ich einen bekomm. :mrgreen:
Allerdings hab ich da dunkel irgendwas im Kopf, daß ich damals gezwungenermaßen auf das Array of Byte umgestiegen bin. Hab aber keine Ahnung mehr, was genau das war.

[CodenameCookie]

Ok Leute habe es nu so erstmal gelöst:

Delphi-Quellcode:

ShellExecute(Application.Handle,PChar('open'),PChar('bla.exe'),PChar(0),nil,SW_NORMAL);

So nun geht es um einen ClanBot , er muss auf dem server einen GameServer starten mit Befehlszeile in etwa so "bla.exe -pwCLANWAR" ... habe versucht es so zu lösen:

Delphi-Quellcode:

ShellExecute(Application.Handle,PChar('open'),PChar('bla.exe -pwCLANWAR'),PChar(0),nil,SW_NORMAL);

aber er öffnet die .exe nicht , denke ma die Befehlszeile muss extra "angemeldet" werden , jmd eine Idee ?!

Danke im Vorraus

CC :-D

[100nF]

hi,

vielleicht so?

Delphi-Quellcode:

ShellExecute(Application.Handle,PChar('open'),PChar('bla.exe'),PChar('-pwCLANWAR'),nil,SW_NORMAL);

[leddl]

Anscheinend haste dich nich sonderlich damit beschäftigt ;)
Denn - in deinem Fall - der 3. PChar-Parameter steht für die zu übergebenden Parameter. Daher mußt du diese eben auch genau dort übergeben, und nicht im Dateinamen.

@urbanbruhin:
Nich nur vielleicht, das sollte so klappen :mrgreen:

[DGL-luke]

DA musst du dir mein erstes bsp. noch mal ansehen ;)

Delphi-Quellcode:

shellexecute(application.handle, 
    'open', 
    PChar( extractfilepath(paramstr(0))+'1.bat'), 
    '-bla - foo -bar x', //das hier ist es - verständlich, oder? ;)
    '', 
    SW_HIDE)

[CodenameCookie]

Zitat:

Zitat von urbanbruhin

hi,

vielleicht so?

Delphi-Quellcode:

ShellExecute(Application.Handle,PChar('open'),PChar('bla.exe'),PChar('-pwCLANWAR'),nil,SW_NORMAL);

Vielen Dank so funzt.es - @Luke jo ThX , is mir ned so aufgefallen ;) .

CC :-D