XProfan

Italia

 $H Windows.ph
'von A.Miethe
Declare Ende&,hRgn&
CLS
hRgn& = ~CreateRectRgn(0,0,120,120)'Test-Region anlegen
~SelectObject(%hdc,hRgn&)'Region fuer Hauptfenster
CLS RGB(255,0,0)'Region sichtbar machen

Whilenot Ende&

    Waitinput

    If ~PtInRegion(hRgn&,%MouseX,%Mousey)

        Print "Gotcha"

    Endif

Endwhile

Salve, iF.

24.09.2005 ▲

Vollständiges Zitat

Absatzweise Citazione Zeilenweise Citazione

Jörg
Sellmeyer

hier fehlten z B. die Kommentarzeichen. Läuft da ein Script Amok oder ist das schon beim Erstellen versäumt worden?

Windows XP SP2 XProfan X4
... und hier mal was ganz anderes als Profan ...

26.09.2014 ▲

Vollständiges Zitat

Absatzweise Citazione Zeilenweise Citazione

Das war damals ich glaube 2009 schon schiefgelaufen als ich Codes von der alten DB in die neue verbracht hatte. Ich hatte dabei so vieles nicht bedacht und ich kann es nicht rückgängig machen. Ich korrigiere auch Postings ständig bzw. wann und wo ich sie sehe und/ oder Lust zu habe.

XProfan X2
WinXP, SP3, Core(TM) i7-3770 @ 3.40GHz

26.09.2014 ▲

Vollständiges Zitat

Absatzweise Citazione Zeilenweise Citazione

Jörg
Sellmeyer

Windows XP SP2 XProfan X4
... und hier mal was ganz anderes als Profan ...

26.09.2014 ▲

Vollständiges Zitat

Absatzweise Citazione Zeilenweise Citazione