XPSE

English

E.T.

can nproc and the main window together communicate ??

partly already, denk I: One Fortschrittsbalken on the HWND becomes of nproc correctly. "fortgeschritten" (by Sendmessage on whom beam). means can beam and nproc "miteinander reden".

but once the HWND once covers was, happens nothing More (leeres, white Window). it comes no updating the Fensters More !!

Do I now the window self (z.B. by Message) To Redraw summon ??

Similar behave itself the window-Menu: with klick the Cross (Closing) says the Profan-Prog: "Keine Rückmeldung", if it in nproc is.

Do I z.B. any Menüs in nproc again evaluate ??

ask over ask...

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

04/14/10 ▲

Vollständiges Quote

Absatzweise Quote Zeilenweise Quote

Hello E.T.,

its so simply, there's so seen none Difference, whether You from Proc or Nproc out work.

You can integrally "normal" in NProcs with Handles play, as windows and XProfan vorsieht.

something difficult becomes it however, if you from Threads out with Handles play want, The but by others Thread created get - here permit The different windows-versions different.

>> Do I now the window self (z.B. by Message) To Redraw summon ??

No, integrally normal - How otherwise too - or. "garnicht".

>> Do I now the window self (z.B. by Message) To Redraw summon ??

No, only, if you it by Proc too would.

>> Similar behave itself the window-Menu: with klick the Cross (Closing) says the
>> Profan-Prog: "Keine Rückmeldung", if it in nproc is.

this is still too "normal" and not differently, as if itself the program in a Proc befindet.

Perhaps. comes with of/ one Proc not same The display, that the Process not rückmeldet, because XProfan any X Lines Nachrichtenabrufe zwischenschiebt - but here reacted Yes "XProfan" "abweichend".

>> ask over ask...

The I any gladly answer would like, simply circa too self see to, whether and where yet Schwachstellen present are.

If something konkretes not works, wovon You but mean, that it functions ought to, then simply fix a small code post, I ggf. deal can. ^^

04/14/10 ▲

Vollständiges Quote

Absatzweise Quote Zeilenweise Quote

E.T.

Have time on the MB gebastelt:
Compile Mark Separation

 {$IQ}
 {$CLQ}
Def @Createwindowex(12) !"USER32","CreateWindowExA"
Def @Setparent(2) !"USER32","SetParent"
Declare Status&, St_Bereich#, Progress&, Classname$

Proc Status_Progress

    Dim ST_Bereich#, 8
    Long ST_Bereich#,0 = Width(%HWnd)-100, -1
    Status& = @Create("StatusWindow",%HWND,"",2,St_Bereich#)
    SetText Status&, 0, "Warte"
    SetText Status&, 1, Date$(0)
    Classname$="msctls_progress32"
    Progress&=@Createwindowex(0,@Addr(Classname$),0,$40000000,3,@Height(%HWnd)-50,@Width(%HWnd) - 6,25,%Hwnd,0,%Hinstance,0)
    @Setparent(Progress&,%HWnd)
    @Showwindow(Progress&,1)

Endproc

Proc Durchlauf_1

    Whileloop 1000

        sleep 10
        @Sendmessage(Progress&,$0400+2,100/1000*(&loop+1),0)

    EndWhile

    @Sendmessage(Progress&,$0400+2,0,0)

EndProc

nProc Durchlauf_2

    global Progress&

    Whileloop 1000

        ~RedrawWindow(%HWnd, 0, 0, ~RDW_FRAME | ~RDW_INVALIDATE | ~RDW_ALLCHILDREN | ~RDW_UPDATENOW | ~RDW_INTERNALPAINT)
        ~RedrawWindow(Progress&, 0, 0, ~RDW_FRAME | ~RDW_INVALIDATE | ~RDW_ALLCHILDREN | ~RDW_UPDATENOW | ~RDW_INTERNALPAINT)
        sleep(10)
        Sendmessage(Progress&,$0400+2,int(100.0/Float(1000)*Float(&loop)),0)

    EndWhile

    Sendmessage(Progress&,$0400+2,0,0)

EndProc

Window 800,120
WindowTitle "nProc - Message - Test"
CLS ~Getsyscolor(15)
Status_Progress
SetText Status&, 1, "Arbeite..."
SetText Status&, 0,  "Durchlauf 1 ...bitte warten !!"
Durchlauf_1
SetText Status&, 0,  "Durchlauf 1 (PROC) Fertig !!"
Sleep 500
SetText Status&, 0,  "Durchlauf 2 (nPROC) ...bitte warten !!"
Durchlauf_2()
SetText Status&, 0,  "Durchlauf 2 (nPROC) Fertig !!"
SetText Status&, 0,  "Warte..."
waitinput
Dispose ST_Bereich#
=s4 href='./../../Function-References/XProfan/end/'>end

as long as the Prog in the Durchlauf_1 (Proc), can I the window discretionary verdecken, move etc., XProfan kümmert itself Yes ums Redraw.

in the Durchlauf_2 (nProc) becomes to mehrmaligem "verdecken" the Fensters simply nothing More updated, self the ~RedrawWindow(%HWnd... scheind not any more anzukommen. remaining the window The whole Time visible, flackerts naturally very beautiful

(on the evaluate of %wmpaint in nproc be I failed

).

who "verschluckt" the Redraw (nproc ?, XProfan ?, windows ?) ??

(Getestet XP)

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

04/14/10 ▲

Vollständiges Quote

Absatzweise Quote Zeilenweise Quote

Unwichtig but instead of Global would I Progress& simply as Funktionsparameter transfer - to that trouble: You make in the principle 1000 time Sleep(10) - in this Time is the Process/ (master)Thread sprichwörtlich "beschäftigt" or. dank Sleep even "gesperrt" - windows becomes there hardly The Possibility having, the window to drawing, too because the UI-display quite passiv Windows worn out becomes or. shifts then, if strain Time is.

Virtually give You windows in this Loop no chance, it reacted here "korrekt" or. How expects - if too vlt. not absolutely "wie erwünscht". ^^

here would I sooner by ~SetTimer-Api on a Nproc show, The hold just whom SendMessage absetzt, without Loop.

Salopp spoken: make You means a XProfan-function out lauter SetText, so can You well in addition zuschauen - make You this a Nproc out - so goes this so fix, that windows-UI not hinterherkommt, particularly too because not z.B. any "20 Zeilen" Messages abgeholt/ processing go separate objectively only the done becomes, what dependent is.

One Irrglaube is vlt. too, that Sleep the Process/ Thread "Zeit" gives - objectively is it sooner so, that Sleep The Time steal, because in this Time the Thread sooner "totgestellt" is.

04/14/10 ▲

Vollständiges Quote

Absatzweise Quote Zeilenweise Quote

E.T.

Have I well the MB "etwas doof" configures:
in the right Progg standing naturally no sleep , Have I only in that MB installed, so one Time to that testing has. really lead I in the Loop (many,many) String-compare through. The effect is the same How with sleep.

desirable would me simply request ala
Compile Mark Separation

If %wmpaint(%HWnd)

    ...Fenster aktualisieren

Endi

but komm I in nProc on %wmpaint of XProfan-Window ran ?? I denk, then would me helped

then should I windows not each creep-Durchlauf with of/ one Repaint - Message "zuballern".

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

04/15/10 ▲

Vollständiges Quote

Absatzweise Quote Zeilenweise Quote

>> in the right Progg standing naturally no sleep , Have I only in that MB installed,
>> so one Time to that testing has.

i see, only, that even Sleep here really no Time gives separate only which cost - means this Thread no Time gives, something To manage. ^^

>> really lead I in the Loop (many,many) String-compare through. The effect
>> is the same How with sleep.

clear, whether You thousands of Male s$=s$+"Hallo" make, or Sleep(... in both Make is the Thread not Fensterzeichnerei engage.

>> but komm I in nProc on %wmpaint of XProfan-Window ran ?? I denk, then would me helped

%wmPaint becomes vlt. from the WProc staid, whether hold The Message wm_paint arrived - You could simply the hWnd subclassen - but the lane becomes Yes always longer so.

>> then should I windows not each creep-Durchlauf with of/ one Repaint -
>> Message "zuballern".

From one GetMessage etc. have I yet foreseen, because I z.B. not gestackte User Messages abtragen would like - I let me something to occur.

04/15/10 ▲

Vollständiges Quote

Absatzweise Quote Zeilenweise Quote