Delphi-PRAXiS
Seite 2 von 4     12 34      

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)
-   -   Delphi Programm extern ausführen (https://www.delphipraxis.net/83839-programm-extern-ausfuehren.html)

lbccaleb 7. Jan 2007 02:43

Re: Programm extern ausführen
 
ja das wären dann in dem fall wie ich oben beschrieben hab die parameter was ich meinte....


das wäre mit der funktion dann so:

Delphi-Quellcode:
WinExecAndWait_32('c:\path\bla.exe model testy.mod', 1, False);

Ari 7. Jan 2007 03:05

Re: Programm extern ausführen
 
Hmm er spuckt mir "Undeclared Identifier: sFileName" aus...Soll ich das noch irgendwo in die Variablen reinschreiben?

Sorry, wie gesagt, kenn mich da nicht so wirklich aus..

Was dies hier angeht
Delphi-Quellcode:
WinExecAndWait_32('c:\path\bla.exe model testy.mod', 1, False);
wird das Programmfenster sofort geschlossen. hab mal mit nem Screenshot versucht herauszufinden, was das Programm ausgibt, ich meine, dass es die Worte einzeln betrachtet oder so..
"invalid parameter: ..."

Harry M. 7. Jan 2007 03:09

Re: Programm extern ausführen
 
sFileName ist ein Sring den Du noch deklarieren musst.

Ari 7. Jan 2007 03:18

Re: Programm extern ausführen
 
Merkwürdig, habe jetzt:

Delphi-Quellcode:
procedure TForm1.BitBtn3Click(Sender: TObject);
var sFileName: String;
begin
sFileName := 'scip.exe'
shellexecute(Handle, ExtractFileName(sFileName), 'model test.mod', ExtractfilePath(sFileName), SW_SHOW);
end;
und dann wird gemeldet: "Missing operator or semicolon" und "Incompatible types: 'String' and 'PAnsiChar'".

lbccaleb 7. Jan 2007 03:31

Re: Programm extern ausführen
 
Zitat:

Zitat von Ari
Merkwürdig, habe jetzt:

Delphi-Quellcode:
procedure TForm1.BitBtn3Click(Sender: TObject);
var sFileName: String;
begin
sFileName := 'scip.exe'
shellexecute(Handle, ExtractFileName(sFileName), 'model test.mod', ExtractfilePath(sFileName), SW_SHOW);
end;
und dann wird gemeldet: "Missing operator or semicolon" und "Incompatible types: 'String' and 'PAnsiChar'".

muss so aussehen:
Delphi-Quellcode:
sFileName := 'scip.exe';
shellexecute(Handle, pchar(ExtractFileName(sFileName)), pchar('model test.mod'), pchar(ExtractfilePath(sFileName)), SW_SHOW);

Harry M. 7. Jan 2007 04:04

Re: Programm extern ausführen
 
Delphi-Quellcode:
var sFileName: Char;
würde auch gehn.

lbccaleb 7. Jan 2007 04:15

Re: Programm extern ausführen
 
Liste der Anhänge anzeigen (Anzahl: 1)
Zitat:

Zitat von Harry M.
Delphi-Quellcode:
var sFileName: Char;
würde auch gehn.



sorry muss dir leider sagen nee würds nicht, denn wenn man die var als char deklariert, kann man danach ihr keinen string zuweisen, das sind inkompatible komponenten! ausserdem würde in der prozedure shellexecute dadurch gleich 2 fehler entstehen, zumeinen weil der string 'model test.mod' weiterhinn besteht und zum anderen würde es glaub ich auch noch ne meldung geben das char und pchar inkompatibel sind (da will ich mich aber nicht drauf festlegen, müsst ich selber probieren erst)


habs dir mal gemacht stellst dir das ungefähr so vor??

Harry M. 7. Jan 2007 04:20

Re: Programm extern ausführen
 
Upps Ich meinte PChar.
Aber ich muss korigieren. Du hast. Hab es eben probiert.

Ari 7. Jan 2007 17:02

Re: Programm extern ausführen
 
Liste der Anhänge anzeigen (Anzahl: 1)
Hallo nochmal, tut mir leid, dass ich erst jetzt wieder reinschau...

also, an und für cih funktioniert die Ausführung des Programms jetzt. Da sich das Fenster immer selbst schließt, hab ich mal probeweise das Programm mit cmd ausgeführt. Es funktioniert, wenn ich nur "scip.exe" eingebe und dann erst die Befehle eingebe. Gebe ich aber "scip.exe model xy.mod" ein, wird angezeigt "Invalid Parameter". Ist es möglich, dass Delphi dann erst das Programm scip.exe ausführt und dann die Befehle weiter gibt? Blödes Programm :(

edit: Im Anhang ist jetzt ein Bild von dem, was dann angezeigt wird...

Harry M. 7. Jan 2007 18:15

Re: Programm extern ausführen
 
Check mal mal scip.exe "model test.mod"

Wo ist das der Parameter "model" (im Screen)??


Alle Zeitangaben in WEZ +1. Es ist jetzt 02:24 Uhr.
Seite 2 von 4     12 34      

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-2025 by Thomas Breitkreuz