noch mehr RunProgram() probleme
Verfasst: 20.11.2008 20:11
Hallo Leutz,
irgendwie komme ich mit dem RunProgram Befehl nicht ganz zurecht. Jedenfalls funktioniert er nicht so, wie im Refference Manual beschrieben. Sicherlich, mit dem Compiler-Befehl funktioniert es. Allerdings wenn ich mit dem Befehl z.B. so was simples wie whoami aufrufe, hängt sich das ganze in einer never ending Loop auf.
Hier mal ein kleiner Programmausschnitt, hab da schon alles mögliche versucht. Sogar Vermeidung der Fensterausgabe, erst in eine Stringvariable schreiben und erst später ausgeben klappt nicht.
Was habe ich hier falsch gemacht? das Programm hängt sich regelmäßig in der While-Wend-Schleife auf. Es wird von PB also nicht bemerkt, dass das Program schon längst beendet ist. Oder doch nicht? Vielleicht hätte ich diesen Beitrag ins Anfängerforum stellen sollen?
irgendwie komme ich mit dem RunProgram Befehl nicht ganz zurecht. Jedenfalls funktioniert er nicht so, wie im Refference Manual beschrieben. Sicherlich, mit dem Compiler-Befehl funktioniert es. Allerdings wenn ich mit dem Befehl z.B. so was simples wie whoami aufrufe, hängt sich das ganze in einer never ending Loop auf.
Hier mal ein kleiner Programmausschnitt, hab da schon alles mögliche versucht. Sogar Vermeidung der Fensterausgabe, erst in eine Stringvariable schreiben und erst später ausgeben klappt nicht.
Code: Alles auswählen
DispCal = RunProgram("/usr/bin/whoami","","/usr/bin",#PB_Program_Open|#PB_Program_Read)
Zeile$=""
If DispCal
While ProgramRunning(DispCal)
AddGadgetItem(HandleStandardOutput,-1,Str(ProgramID(DispCal)))
If AvailableProgramOutput(DispCal)
Zeile$=Zeile$+ReadProgramString(DispCal)+Chr(13)
AddGadgetItem(HandleStandardOutput,-1,Zeile$)
EndIf
Wend
; AddGadgetItem(HandleStandardOutput,-1,Zeile$)
CloseProgram(DispCal)
Else
MessageRequester("Information", "Programm nicht gefunden", 0)
EndIf
)