Verfasst: 01.04.2006 10:40
ich bezog mich auf:Macros hat geschrieben:@ Alteingesessenen Kaeru Gaman:
Erst lesen, dann Posten
so wie ich das sehe, hat er hier die desktop-maus und die screen-maus durcheinandergeworfen.Andre123 hat geschrieben:Thx für deine Hilfe
das teste ich nu auch aus und sag dan bescheid!
nur jetzt hab ich ein neues problem ich hab hier ne Procedure
geschrieben die einfach mitten drin stehen bleibt ich versteh nich wieso!
also ich mach am anfang des Programs das:
If InitMouse() = 0 Or InitKeyboard() = 0
MessageRequester("Error", "Can't open DirectX 7", 0)
End
EndIf
das scheint ja auch zu gehen das Requester wirt nich angezeigt!
und dann meine procedure:
Procedure sete()
anzahl$ = GetGadgetText(#input2)
For i=0 To E.l = Val(anzahl$)
Repeat
ExamineMouse()<-------------------Hier bleibt es stehen!
Until MouseButton(1)
Aposx.l = DesktopMouseX()
Aposy.l = DesktopMouseY()
Channel$ = Channel$+" "+Str(Aposx.l)+" "+Str(Aposy.l)
SetGadgetText(#sete,Str(i))
Next
EndProcedure
weis vieleicht einer warum das nich get?
ich sagte AFAIK sind diese -> ExamineMouse() ; MouseButton(1)
maus-geschichten für den screen.
seh ich da was falsch?