dzEventsMagic

[specci48]

Originally Posted by agraham

I like to have a help file for each library accessible from within the desktop so here is one that I wrote for dzEventsMagic.

Two thumbs up!

specci48

[dzt]

One more sample.

How to get X,Y coordinates of mouse down (or tap) and mouse up events on a control (for example Image control), using dzEventsMagic and BitWise library.

See attached code file.

[RandomCoder]

@DZT,

Thanks for pointing this great library out to me.
I've had a play and got some thing working but from this I have two questions....
1) Have you a list of parameters for each of the messages listed at the start of this thread? How are we to know what lparam and wparam contain?
2) Is it possible to have a simple click event? I've searched through the messages and there are several mouse related messages but none specific to a single click (unless I've missed it). Does this mean that I have to program by own by combining the mousedown and mouseup with a time delay?

The reason for question 2 is that I have a treeview control with a context menu already working but using mousedown on its own prevents the context menu from displaying as there is no way to know if the user has mearly tapped the screen or tapped and held.

Thanks,
RandomCoder

[mamuen]

Hi,

i want to control sprites with the arrowkey on my device, using dzEventsMagic.dll and sprite.dll with no success. Form1 never receive
an event. Any ideas?

[dzt]

Hi,

@RandomCoder

I've just seen you questions.
1. No I don't. Google and you will find MSDN articles and others. Or ask if I can help
2. No unfortunately there is not a "single click event"

@mamuen
The Moving Label sample does not work in this case because the GameWindow is a "focusable" control and the Form loses the focus.
See the attached modified SpriteExample showing a workaround. It needs dzEventsMagic.dll, dzEventsMagicDesktop.dll and sprite.dll

[Byak@]

dzt thanks for ypu libs

i'm wright little sample.
moving image.
dzt help optimizing it please))

Sub Globals
xx=0
yy=0
End Sub

Sub App_Start
dzem.New1("Image1", false)
bit.New1
dzem.Hook(512)
Form1.Show
End Sub


Sub Form1_Close
dzem.UnHook(512)
End Sub

Sub dzem_MagicEvent
Dim LowWord, HighWord, X, Y
LowWord = bit.OR2(dzem.lParam, 4294901760)
X = bit.XOR2(LowWord, 4294901760)
HighWord = bit.OR2(dzem.lParam, 65535)
Y = bit.XOR2(HighWord, 65535)/2^16
If x>xx+5 Then
image1.Left=image1.Left+5
End If
form1.Refresh
If x<xx-5 Then
image1.Left=image1.Left-5
End If
form1.Refresh
If y>yy+5 Then
image1.Top=image1.Top+5
End If
form1.Refresh
If y<yy-5 Then
image1.Top=image1.Top-5
End If
form1.Refresh
yy=y
xx=x
End Sub

and i'm write scrolling textbox))

[tsteward]

DZT I see examples here on scrolling text boxes. Can you please tell me is there a way to sroll the web browser built by agraham found here >>>Web browser for desktop and device

Thanks
Tony

[Byak@]

tsteward it's not real :-(

[tsteward]

Originally Posted by Byak@

tsteward it's not real :-(

Please explain?

[Byak@]

webbrowser doesn't have programming scroll