XProfan

Frank
Abbing

Probier times the API ExitProcess.

07/21/09 ▲

Sato
Pinto

Hello Frank

thanks for response, but unfortunately knows I do not as Api applied becomes.
is it at all possibly, must I do not whom lever the Process know?
or can I simply at started the Hauptprogram always try whom Process
over the Dateiname To killen too fals it not at all existieren ought to. After whom Motto
Compile Mark Separation

Hauptprogramm
cls
killProcess sccp_out.exe
waitinput
end

Proc KillProcess

    Parameters hProcess&
    GetExitCodeProcess(hProcess&,Exitcode#)
    TerminateProcess(hProcess&,Long(exitcode#,0))
    Dispose Exitcode#

Sato Pinto
WIN XP Home
XPROFAN 11

Dieter
Zornow

you know Yes certainly whom Fentertitel, then kannsr You time the try.
Compile Mark Separation

proc Killwindow

    parameters such$
    such$ = Upper$(such$)
    var comp$ = ""
    clearlist
    addwindows ""

    whileloop 0,%getcount

        comp$ = Upper$(listboxitem$(&loop))

        if instr(such$,comp$)

            such$ = left$(comp$,10)
            break

        endif

    endwhile

    Var hdl& =  findwindow(such$)
    sendmessage(hdl&,16,0,0)

endproc

cls
Killwindow("Dein Fenstertitel")
waitinput

important is only
Var hdl& = findwindow(such$)
sendmessage(hdl&,16,0,0)
means lever your Fensters and the Message wm_close Send

Er ist ein Mann wie ein Baum. Sie nennen ihn Bonsai., Win 7 32 bit und Win 7 64 bit, mit XProfan X2

@Sato: is the program, which You close want, likewise one Program from you?

Sato
Pinto

Hello iF
Yes, its one Program of me, only has it none Window, runs verstäkt in the background around the Serielle Schnistelle To valet. If the Hauptprogram exits then becomes this Process gekillt, but How said, only if the Hauptprogram normal closed becomes.

greeting
Sato

Sato Pinto
WIN XP Home
XPROFAN 11

E.T.

I had the time so resolved, the the aufgerufene Program in regelmäßigen intervals "nachschaut", whether the aufrufende Proggi yet runs. if not, exits itself the aufgerufene Program self (and can z.B. yet Ports tidy close etc.) and must not "abgeschossen werden". the working by me integrally well, there the terminate the aufgerufenen Program too functions, if the others Program z.B. abgestürzt is.

Grüße aus Sachsen... Mario
WinXP, Win7 (64 Bit),Win8(.1),Win10, Win 11, Profan 6 - X4, XPSE, und 'nen schwarzes, blinkendes Dingens, wo ich das alles reinschütte...

@Sato: then have I a idea, something very very Simple!

Verpasse the Process one hWnd, can Yes invisible his - but cans Entry / the hWnd the hWnd the Hauptprozesses.

becomes the Hauptprozess closed, becomes "Windows" whom Zweitprozess then automatically close, too z.B. if the Hauptprozess "abstürzt".

otherwise would I (naturally) with userMessages works and the Zweitprozess a Message Send (and ggf. to control too a response Send).

I faith, in Your drop ought to the klappen.

Sato
Pinto

Hello iF, Dieter and E.T.

Thanks XPSE have I the Error find can, nevertheless have I E.T. idea
followed and it functions very well.
thanks on you

many Regards
Sato

Sato Pinto
WIN XP Home
XPROFAN 11