forum.vdsworld.com Forum Index forum.vdsworld.com
Visit VDSWORLD.com
 
 FAQFAQ   SearchSearch   MemberlistMemberlist   UsergroupsUsergroups   RegisterRegister 
 ProfileProfile   Log in to check your private messagesLog in to check your private messages   Log inLog in 


Bitmap Dblclick event *SOLVED*

 
Post new topic   Reply to topic    forum.vdsworld.com Forum Index -> General Help
View previous topic :: View next topic  
Author Message
Tdk161
Valued Contributor
Valued Contributor


Joined: 08 Feb 2005
Posts: 399
Location: ITALY
PostPosted: Wed Jun 23, 2010 12:37 pm    Post subject: Bitmap Dblclick event *SOLVED* Reply with quote
Hi Guyz,

I need to control a dblclick event in a bitmap element, how I can make it?

Many tnx in advance for any help

Bye

Last edited by Tdk161 on Wed Jun 23, 2010 7:37 pm; edited 1 time in total
Back to top
View user's profile Send private message Send e-mail
uvedese
Contributor
Contributor


Joined: 21 Jan 2006
Posts: 169
Location: Spain
PostPosted: Wed Jun 23, 2010 3:01 pm    Post subject: Reply with quote
Hi Tdk161 Very Happy

I tried a solution and it works fine. It works in VDS6. You can adapt it to work in VDS5:

Code:
  option decimalsep,.

  dialog create,RClick in a Bitmap,-1,0,240,160
  dialog add,bitmap,bitmap1,64,106,32,32,bitmap.bmp,,CLICK
  dialog show
 
  %%x1 =
  %%y1 =
  %%second = .5
  rem ONLY FOR VDS6 *********************
  %%timesep = @fdiv(%%second,84600)
 
:bucle
  wait event
  %e = @event()
  goto %e
 
:Timer1CTDOWN
  %%x1 =
  %%y1 =
  timer stop,1
  rem SIMPLE CLICK
  info Hi! You clicked me
  goto Bucle
 
:Close
  exit
 
:bitmap1CLICK
  parse "%x;%y",@click(XY)
 
  if @null(%%x1)
    %%x1 = %x
    %%y1 = %y
    timer start,1,ctdown,%%timesep
  else
    if @both(@equal(%x,%%x1),@equal(%y,%%y1))
      rem Dblclick
      info Wow! Double click in me
      %%x1 =
      %%y1 =
      while @event()
      wend
    end
  end
  goto Bucle


Good luck! Wink

___________

uVeDeSe
___________

Last edited by uvedese on Sat Jun 26, 2010 8:34 pm; edited 1 time in total
Back to top
View user's profile Send private message Visit poster's website
Tdk161
Valued Contributor
Valued Contributor


Joined: 08 Feb 2005
Posts: 399
Location: ITALY
PostPosted: Wed Jun 23, 2010 5:05 pm    Post subject: Reply with quote
Very Happy Very Happy Many tnx Uvedese
I will try it in my script

Byez
Back to top
View user's profile Send private message Send e-mail
Tdk161
Valued Contributor
Valued Contributor


Joined: 08 Feb 2005
Posts: 399
Location: ITALY
PostPosted: Wed Jun 23, 2010 7:37 pm    Post subject: Reply with quote
Work!! Very Happy Very Happy Very Happy
and work fine
Many thanks Uvedese
Back to top
View user's profile Send private message Send e-mail
uvedese
Contributor
Contributor


Joined: 21 Jan 2006
Posts: 169
Location: Spain
PostPosted: Wed Jun 23, 2010 7:48 pm    Post subject: Reply with quote
I'm glad to help you Hi
Back to top
View user's profile Send private message Visit poster's website
Display posts from previous:   
Post new topic   Reply to topic    forum.vdsworld.com Forum Index -> General Help All times are GMT
Page 1 of 1

 
Jump to:  
You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot vote in polls in this forum
You can attach files in this forum
You can download files in this forum

Twitter@vdsworld       RSS

Powered by phpBB © 2001, 2005 phpBB Group