XProfan

- Page 2 -

Sato
Pinto

Hello Rolf

The Hauptschleife

While %scankey <> 27 end with ESC
getmessage
" " "
" " "
" " "
Endwhile

greeting and thanks for your INC

Sat6

Sato Pinto
WIN XP Home
XPROFAN 11

Sato Pinto

can You me Please a small example ... without The PCU ...

Should here already rumlungern, but should You get... (if I because To dwell be...) *g*

PS: Gewöhne you Please on, Source in the Forum with [ code ] To umrahmen, otherwise functions defined items not and the Texts weden difficult-To-wrong displayed. (z.B. wg. Smilies & co...) alternatively use simply [...]

- then need one only The URL post.

Rolf
Koch

Have strain tested. in the Hauptschleife is aufjedenfall How vermutet Settimer, %wmtimer and Endtimer guilt.
VIelleicht The Uhrzeit somehow differently solve and for Thread number 4 for Loop benefit. If the then works, look we time moreover. because I can only on suspicion on Your code basteln

@Rolf: %wmtimer becomes from the thread-unit not broken or irritiert since the thread-unit setTimer not by ID separate by Funktionsadresse anspricht.

Rolf
Koch

but iF, if I in the code wmtimer rausnehme then happens the Error hold nothing around. I kuck time moreover.

OK, the lying then on it, the it

a) over %wmtimer something auslöst

and

b) "zeitgleich" The Thread.Do "reinkloppt".

he'll startPainten - and then comes The thread.Do and wants too "startPainten"...

%wmtimer is here only one Alias but not the blamefully.

Rolf
Koch

is correct iF.
I habs at least now a further switch to that dauerlauf and this very often persuated:
@Sato:
Ändere in the laufschrift.inc this:
Compile Mark Separation

PROC SCROLLTEXT

    Parameters schrift%,bold%,backg&,Farbe%,string$,akt%

    if akt% = 0

        dec ydr%

    endif

    if inpaint%=0

        StartPaint backg&
        inpaint%=1
        TextColor farbe%,getpixel(1,1)
        UseFont "MS Sans Serif",schrift%,0,bold%,0,0
        DrawText xdr%,ydr% + (schrift%*akt%),string$+space$(500)
        ENDPAINT
        inpaint%=0
        case ydr% < (zeilenanzahl% * -schrift%) : ydr% = gesydr%

    endif

ENDPROC

and füge global one Declare inpaint% hinzu.
everything else time so let what's it like. hope, that to the trouble so bypass can.

very Rolf, and this is the reason why I me already forever whom StartPaint-Stack of Roland wish...

[...]

Hehe Have already on the 18.01.2007 very this trouble posted... How should one something like too find?! The Community missing yet ever a function...

Nachtrag: your method isn't sure, but safer! If your Proc strain startPaint unzipped has could The thread.do reinhüpfen and startPaint open want.

it helps really only if any pages (means your inc and his code) no StartPaint use and only hiernach [...]

works.

i'm strain on the update from the furchtbaren Source the startPaint-Stack-Paketes.

The joke is, too so ists not sure, only safer! even if Roland now a startPaint-Stack installed had, then would the too only safer and as long as not sure, To too the procAddr-trouble fixed is.

Oje! (because one call on a function which StartPaint uses would then immernoch whom Error produce, or if intern gestackt, on incorrect pics draw)