fb:porticula NoPaste
GetMouse in Vollbild
| Uploader: | PMedia |
| Datum/Zeit: | 28.09.2007 16:27:43 |
dim as integer mx, my
screenres 1024, 768,32,,1
do
getmouse mx, my
locate 1,1
print "X: " + str(mx) + " - Y: " + str(my) + " "
loop until multikey(1)



FreeBASIC-Nachrichten jetzt auch über Twitter erhalten. Follow us!



