-
Forum: Object-Pascal / Delphi-Language
Delphi
by Ari,
11. Jan 2007
Habs jetzt rausgefunden :) muss dafür nur
RunCaptured('.\', 'scip.exe', '-c "read prog.zpl quit"')
Nochmal danke :hi:
-
Forum: Object-Pascal / Delphi-Language
Delphi
by Ari,
10. Jan 2007
Mit Ausgabe abfangen meinst du, dass Delphi Zeilen aus dem ausgeführten Programm ausliest? Brauche das Einlesen/Abfangen leider nach wie vor..
-
Forum: Object-Pascal / Delphi-Language
Delphi
by Ari,
10. Jan 2007
Och mist...heut ist mir ein Fehler aufgefallen:
hatte RunCaptured('e:', 'scip.exe', '-c "read prog.zpl"') benutzt und wie erwartet funktionierte die ganze Geschichte auf einem anderen Computer wieder nicht..
Übrigens läuft das ganze über meinen USB-Stick, dachte also daran, einfach per c:\windows\explorer (müsste der arbeitsplatz sein..eigentlich o.O) meinen USB-Stick "anzusprechen" - aber...
-
Forum: Object-Pascal / Delphi-Language
Delphi
by Ari,
8. Jan 2007
Vielen vielen Dank, es funktioniert jetzt!! :bounce1:
Danke danke und nochmals danke :balloon:
-
Forum: Object-Pascal / Delphi-Language
Delphi
by Ari,
8. Jan 2007
Oh man...mein Fehler war, dass ich für SCIP nicht den Befehl "quit" eingegeben habe -.-
Hmm jetzt verbleibt zuletzt (dann hör ich auch auf zu nerven ;) ), dass ich nur einen Teil der Zeile einlese, da meine Zeilen so aussehen:
x#1#1#5
und ich will nur die 5 einlesen lassen und in das label bringen. Geht das?
-
Forum: Object-Pascal / Delphi-Language
Delphi
by Ari,
8. Jan 2007
Danke für die Antwort!!
Mittlerweile scheint Delphi wieder zu funktionieren, hab einfach mal reparieren lassen und meine "environment" paths zurückgesetzt, immerhin hab ich jetzt keinen fehler mit "can't find system.pas" mehr.
Delphi startet das Programm ohne Fehlermeldungen. Führe ich aber den Prozess aus (klicke also auf den Button), läuft das Programm - spuckt aber nichts aus und stürzt...
-
Forum: Object-Pascal / Delphi-Language
Delphi
by Ari,
8. Jan 2007
Hab jetzt versucht, TDoscommand.pas zu installieren, da wird aber dann angezeigt
"Could not create '(mein Verzeichnispfad von Delphi)\projects\bpl\dclusr70.bpl'"
Wobei meine bpl Dateien glaub ich alle in (Delphi-Pfad)\Bin liegen..
Daraufhin hab ich ein neues Package erstellt und absolutes Chaos angerichtet..
Hab immerhin gute zwei Stunden gebraucht, um den angerichteten Schaden wieder zu...
-
Forum: Object-Pascal / Delphi-Language
Delphi
by Ari,
7. Jan 2007
Oh mist :angel2:
Mit
WinExecAndWait_32('scip.exe -c "read sudoku.zpl opt disp sol"', 1, False);
funktionierts jetzt...
Vielen Dank an euch beide!! Hab mich ja selten doof angestellt xD
Jetzt bleibt nur noch aus, wie ich die Zeilen, die das Programm ausgibt (die Lösungen) in Delphi einlese..soll ich dazu einen extra Thread erstellen?
-
Forum: Object-Pascal / Delphi-Language
Delphi
by Ari,
7. Jan 2007
Funktioniert leider auch nicht. Habe außerdem leider auch die Befehle von AMPL und SCIP durchnander gebracht :oops: Kann die ja zum Glück leicht ändern..im Anhang jetzt der Versuch mit
scip.exe "read prog.zpl"
Also mit diesen Eingaben funktionierts leider nicht. Gebe ich aber zuerst scip.exe ein, lande ich im "SCIP>" und dann funktioniert "read prog.zpl"...
Ohne das "read" bzw....
-
Forum: Object-Pascal / Delphi-Language
Delphi
by Ari,
7. Jan 2007
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...
-
Forum: Object-Pascal / Delphi-Language
Delphi
by Ari,
7. Jan 2007
Merkwürdig, habe jetzt:
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'".
-
Forum: Object-Pascal / Delphi-Language
Delphi
by Ari,
7. Jan 2007
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
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...
-
Forum: Object-Pascal / Delphi-Language
Delphi
by Ari,
7. Jan 2007
Ja genau. Ich möchte *nachzähl* 3 Befehle an scip.exe übergeben.
-
Forum: Object-Pascal / Delphi-Language
Delphi
by Ari,
7. Jan 2007
Ok, konkretes Beispiel:
Programm: ampl.exe
Befehle, die ich eingeben möchte: model test.mod;
(noch weitere Befehle)
quit;
Es wäre doch bestimmt möglich, dass Delphi diese Befehle direkt an das Programm weiter gibt, oder?
Am Ende soll Folgendes herauskommen:
-
Forum: Object-Pascal / Delphi-Language
Delphi
by Ari,
7. Jan 2007
Erstmal danke für die Hilfe!!
Kann mit beiden Varianten das gewünschte Programm starten - aber wie lasse ich Delphi die Befehle in das Programm eingeben? Möchte, dass das Programm, sobald es gestartet wurde, immer das Selbe tut - also auch immer die selben Befehle bekommt.
edit: Mir ist auch nicht so klar, was der Parameter auslöst..
edit2: ach doch, zumindest hab ich herausgefunden, dass...
-
Forum: Object-Pascal / Delphi-Language
Delphi
by Ari,
7. Jan 2007
Hallo erstmal :hi:
ich hoff ich bin in der richtigen Kategorie gelandet..
Ich möchte gern mit Delphi ein Programm ausführen und die Befehle angeben, nach stundenlangem Ggoglen hab ich herausgefunden, dass ShellExecute, WinExecute und TProcess geeignet wären, wobei glaube ich nur letztere Funktion auch Befehle ausführt - oder?
Dabei hab ich jetzt folgendes Problem: Muss ja eingeben
uses...