XProfan

Deutsch

So, ich wollte auch mal eine XProfan-Unit herstellen.

~~thread.archive.zip~~	209 kB

Kurzbeschreibung:	Thread Unit V2.0.2

Hochgeladen:	25.10.2006

Ladeanzahl:
		~~Herunterladen~~

24.07.2004 ▲

Vollständiges Zitat

Absatzweise zitieren Zeilenweise zitieren

Update auf V2.0.2 - der neue XPSE hatte einen Fehler entdeckt den XProfan10 auch anmerkert - ich hatte eine Variable doppelt deklariert.

25.10.2006 ▲

Vollständiges Zitat

Absatzweise zitieren Zeilenweise zitieren

Die bisherige Methodik der Unit, relativ timer-abgesichert und geregelt die thread.do aufzurufen, macht dank toller Neuerungen in XProfan11 (fast) keinen Sinn mehr.

Da ich an der Source grad nicht heran komme kann ich jetzt auch nicht einfach neu kompilieren.

Die Unit wirds weiter geben, als Include und Unit und mit völlig anderer und sicherer Herangehensweise auf SubClassProc-Ebene, sodass auch bereits damit arbeitende Programme noch besser als wie bisher reagieren werden.

14.03.2008 ▲

Vollständiges Zitat

Absatzweise zitieren Zeilenweise zitieren

Die mit der Unit liebgewonnene Arbeitsweise kann nun direkt auch ohne Unit und sogar threadsicher angewandt werden:
Kompilieren Markieren Separieren

cls
createThread(0,0,procAddr(myTest1,1),%hWnd,0,0)

while 1

    locate 1,1
    print myTest2()
    waitinput

wend

end

nproc myTest1

    parameters data&

    while 1

        setText(data&,str$(&getTickCount))
        sleep(100)

    wend

    return data&

endproc

nproc myTest2

    return 50

endproc