| |
|
|
Jac de Lad | Jaja, Yo ya otra vez...
In Profano gabs veces a la Befehl GetUsage. Der es en Xprofan 8.0a pero no mehr drin (zumindest Yo no Referencia darauf gefunden...) Yo möchte una Programa escribir, el una más aufruft aber trotzdem weiterläuft (also hilft me WinExecWait como no más...). ¿Cómo se puede al realisieren?
Jac |
|
|
| Profan² 2.6 bis XProfan 11.1+XPSE+XPIA+XPRR (und irgendwann XIDE) Core2Duo E8500/T2250, 8192/1024 MB, Radeon HD4850/Radeon XPress 1250, Vista64/XP | 31.10.2005 ▲ |
|
|
|
|
Torsten Rümker | Mit WinExec() würd Yo media
Steht muy schön en uno Página en el Ayuda, oben WinExec darunter WinExecWait.
mfg Torsten |
|
|
| Ich lerne, ob ich will oder nicht! Betriebssystem: - Ubuntu 15.x - Windows (diverse) XProfan Version: X2 | 31.10.2005 ▲ |
|
|
|
|
Jac de Lad | Hm, sagen wirs veces así rum: Yo starte una Programa por WinExec y möchte wissen, si todavía aktiv es...sin dass el Programa esta pausiert. Das mi Yo!
Jac |
|
|
| Profan² 2.6 bis XProfan 11.1+XPSE+XPIA+XPRR (und irgendwann XIDE) Core2Duo E8500/T2250, 8192/1024 MB, Radeon HD4850/Radeon XPress 1250, Vista64/XP | 31.10.2005 ▲ |
|
|
|
|
Torsten Rümker | Ok, tener dich falso verstanden.
Also Yo sería sagen, (IF möge mich korrigieren) el es una Fall para el Hilo.pcu es, entonces doch con WinExecWait.
Alternativ kannst du natürlich auch regelmäßig por Findwindow(Fenstername) nachschauen si el Ventana des Programmes todavía son.
Ähem el son todos möglichkeiten el Yo gerade así de el Fingern saugen kann (Bin sí kein Profi)
MfG Torsten |
|
|
| Ich lerne, ob ich will oder nicht! Betriebssystem: - Ubuntu 15.x - Windows (diverse) XProfan Version: X2 | 31.10.2005 ▲ |
|
|
|
|
Jac de Lad | Sí, a FindWindow tener Yo inzwischen auch pensamiento! Yo glaube así voluntad ego lösen. Hatte sólo pensamiento, dafür gibts n API más o menos!!
Gracias, Jac |
|
|
| Profan² 2.6 bis XProfan 11.1+XPSE+XPIA+XPRR (und irgendwann XIDE) Core2Duo E8500/T2250, 8192/1024 MB, Radeon HD4850/Radeon XPress 1250, Vista64/XP | 31.10.2005 ▲ |
|
|
|
|
Torsten Rümker | Wenn lo dafür una API son bin Yo el Falsche en el a beantworten, como Yo mich con APIs sólo entonces beschäftigt habe si no anders ging. Sozusagen Yo versuche en purem Profano a bleiben, aber dat is nada así simplemente.
MfG Torsten |
|
|
| Ich lerne, ob ich will oder nicht! Betriebssystem: - Ubuntu 15.x - Windows (diverse) XProfan Version: X2 | 31.10.2005 ▲ |
|
|
|
|
Jac de Lad | Hm...Yo pensamiento sólo, porque lo GetUsage sí ya veces gab, dass el irgendwie otra vez auferstehen kann.
Gracias, Jac |
|
|
| Profan² 2.6 bis XProfan 11.1+XPSE+XPIA+XPRR (und irgendwann XIDE) Core2Duo E8500/T2250, 8192/1024 MB, Radeon HD4850/Radeon XPress 1250, Vista64/XP | 31.10.2005 ▲ |
|
|
|
|
Ragnar Rehbein | Yo para solche sachen una nette INC KompilierenMarcaSeparaciónDEF CreateProcessA(10) ! "Kernel32","CreateProcessA"
DEF GetExitCodeProcess(2) ! "Kernel32","GetExitCodeProcess"
DEF TerminateProcess(2) ! "Kernel32","TerminateProcess"
DEF ZeroMemory(2) ! "Kernel32","RtlZeroMemory"
DEF CloseHandle(1) ! "Kernel32","CloseHandle"
Declare lpCommandLine#
Declare lpStartupInfo#
Declare lpProcessInformation#
Declare ExitCode#
Proc CreateProcess
Parameters CommandLine$
Declare hProcess&
Dim lpCommandLine#,Len(CommandLine$)+1
Dim lpStartupInfo#,68
ZeroMemory(lpStartupinfo#,68)
Long lpStartupInfo#,0=68
Dim lpProcessInformation#,16
ZeroMemory(lpProcessInformation#,16)
String lpCommandLine#,0=CommandLine$
CreateProcessA(0,lpCommandLine#,0,0,0,0,0,0,lpStartupInfo#,lpProcessInformation#)
hProcess&=Long(lpProcessInformation#,0)
Dispose lpCommandLine#
Dispose lpStartupInfo#
Dispose lpProcessInformation#
Return hProcess&
EndProc
Proc KillProcess
Parameters hProcess&
Dim exitcode#,4
GetExitCodeProcess(hProcess&,Exitcode#)
TerminateProcess(hProcess&,Long(exitcode#,0))
Dispose Exitcode#
EndProc
Proc ProcessStatus
parameters prozid&
declare status&
Dim exitcode#,4
GetExitCodeProcess(prozid&,Exitcode#)
status& = long(Exitcode#,0)
Dispose Exitcode#
return status&
endproc
----------Democode, später auskommentieren --------
Declare hProcess&
hProcess& = createprocess("NOTEPAD.EXE")
cls
settimer 400
while 1
waitinput
print ProcessStatus(hProcess&) 259 Prozess läuft
endwhile
WaitInput
KillProcess hProcess&Notepad wird mit dem Profan-Programm geschlossen
ss=s4 href='./../../function-references/XProfan/end/'>End
uno muß sólo dran denken después de el starten des programms una vez a warten a el Status en 259 es, como uno während el startphase (en großen programmen) zuerst 0 zurückbekommt.
r.r. |
|
|
| |
|
|
|
Jac de Lad | Gracias, Yo probiers... |
|
|
| Profan² 2.6 bis XProfan 11.1+XPSE+XPIA+XPRR (und irgendwann XIDE) Core2Duo E8500/T2250, 8192/1024 MB, Radeon HD4850/Radeon XPress 1250, Vista64/XP | 31.10.2005 ▲ |
|
|
|
|
Jac de Lad | Hm, ok, also el va ya veces. Tuve algo angsprochen, una Programa en el HWnd uno otro Programmes auszuführen. Como funzt desafortunadamente weder el una todavía FindWindow...puede ser el realisieren???
Jac |
|
|
| Profan² 2.6 bis XProfan 11.1+XPSE+XPIA+XPRR (und irgendwann XIDE) Core2Duo E8500/T2250, 8192/1024 MB, Radeon HD4850/Radeon XPress 1250, Vista64/XP | 31.10.2005 ▲ |
|
|
|
|
Ragnar Rehbein | Yo fürchte mi treffenquote beim erraten des sinns deiner fragen nimmt rapide de.
du kannst kein 2 programm de una programm heraus starten y el 2. programm ha el HWND des aufrufenden programms.
el va sólo DLL (después de mi reciente verständnis)
sag doch más bien algo du eingentlich hacer o. erreichen willst.
lo son muy wenig en dieser (Windows) welt qué con XProfan (y el netten drumherum como XPIA / Profano2CPP) no hacer kann. para alles otro hay Java (libre / beste IDE / beste dokumentation / jede menge freien quelltext / sólo desafortunadamente schwieriger a verstehen como XProfan)
r.r. |
|
|
| |
|
|
|
Jac de Lad | Sí, el va. Mit Mit FindWindow Handle ermitteln y SetParent el propio HWnd stellen. Funktioniert auch, aber FindWindow finde Yo el Ventana no otra vez. Yo probiers veces con el Handle, el FindWindow beim ersten Aufruf zurückgibt. Morgen poste Yo el Ergebnis. Si el Prog fertig es, könnt ihrs veces ausprobieren, siempre hin scheint ahora el gesamte Comunidad mitzumachen!
Jac |
|
|
| Profan² 2.6 bis XProfan 11.1+XPSE+XPIA+XPRR (und irgendwann XIDE) Core2Duo E8500/T2250, 8192/1024 MB, Radeon HD4850/Radeon XPress 1250, Vista64/XP | 01.11.2005 ▲ |
|
|
|