Español
Foro

GetUsage

 

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ón
DEF 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.
 
31.10.2005  
 




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.
 
31.10.2005  
 




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  
 




Respuesta


Título del Tema, max. 100 Signo.
 

Systemprofile:

Kein Systemprofil creado. [anlegen]

XProfan:

 Contribución  Font  Smilies  ▼ 

Bitte registro en una Contribución a verfassen.
 

Tema opciones

3.441 Views

Untitledvor 0 min.
iF06.11.2012

Themeninformationen



Admins  |  AGB  |  Applications  |  Autores  |  Chat  |  Política de Privacidad  |  Descargar  |  Entrance  |  Ayuda  |  Merchantportal  |  Pie de imprenta  |  Mart  |  Interfaces  |  SDK  |  Services  |  Juegos  |  Búsqueda  |  Support

Ein Projekt aller XProfan, el lo son!


Mi XProfan
Privado Noticias
Eigenes Ablageforum
Temas-Merkliste
Eigene Beiträge
Eigene Temas
Zwischenablage
Cancelar
 Deutsch English Français Español Italia
Traducciones

Política de Privacidad


Wir uso Cookies sólo como Session-Cookies wegen el technischen Notwendigkeit y en uns hay no Cookies de Drittanbietern.

Wenn du hier en unsere Webseite klickst oder navigierst, stimmst du unserer Erfassung de Informationen en unseren Cookies en XProfan.Net a.

Weitere Informationen a unseren Cookies y dazu, como du el Kontrolle darüber behältst, findest du en unserer nachfolgenden Datenschutzerklärung.


einverstandenDatenschutzerklärung
Yo möchte no Cookie