View previous topic :: View next topic |
Author |
Message |
Mac Professional Member
Joined: 08 Jul 2000 Posts: 1585 Location: Oklahoma USA
|
Posted: Mon Jan 14, 2002 10:56 pm Post subject: |
|
|
OK, try the last example again... _________________ VDSug.dll does file IO, check/disable menu items,
non-VDS dlls, draw functions and more...
Free download (30k dll size) at:
http://www.vdsworld.com/download.php?id=361
|
|
Back to top |
|
|
SnarlingSheep Professional Member
Joined: 13 Mar 2001 Posts: 759 Location: Michigan
|
Posted: Mon Jan 14, 2002 11:03 pm Post subject: |
|
|
In your code the menu sizes to the right and then down, in mine it does both at the same time. It's up to whoever uses it, but mine looks more like Win98's style. _________________ -Sheep
My pockets hurt... |
|
Back to top |
|
|
Mac Professional Member
Joined: 08 Jul 2000 Posts: 1585 Location: Oklahoma USA
|
Posted: Mon Jan 14, 2002 11:10 pm Post subject: |
|
|
Actually it does both directions at once, just faster across than down.
It would anyway on long menus, but like you said, both increments
can be adjusted to suit the user.
I changed the code so both directions use @fadd() for max adjustment. _________________ VDSug.dll does file IO, check/disable menu items,
non-VDS dlls, draw functions and more...
Free download (30k dll size) at:
http://www.vdsworld.com/download.php?id=361
|
|
Back to top |
|
|
cnodnarb Professional Member
Joined: 11 Sep 2002 Posts: 762 Location: Rockeledge, GA
|
Posted: Sat Dec 28, 2002 11:28 pm Post subject: |
|
|
Script based on other post in this thread.
Please try this one with 16x16 images for bitbtns 0-5 It really does
look cool if you do, and if you don't you'll still probably think its OK.
Code: |
DIALOG CREATE,New Dialog,-1,0,240,160
DIALOG ADD,BITMAP,BITMAP1,2,0,238,160,,click
DIALOG SHOW
DIALOG CREATE,Popup Menu,-1,0,125,120,notitle
DIALOG ADD,BUTTON,BUTTON1,0,0,125,120,BUTTON1
dialog add,bitbtn,bitbtn0,2,4,19,19,backwards.dll|7634,Ig,Allows Undo in Edit Window
dialog add,bitbtn,bitbtn1,21,4,19,19,backwards.dll|0,Ig,Allows Redo in Edit Window
dialog add,bitbtn,bitbtn2,40,4,19,19,backwards.DLL|3797,Ig,Allows you to Cut selected text to the clipboard
dialog add,bitbtn,bitbtn3,59,4,19,19,backwards.dll|5064,Ig,Allows you to Copy selected text to the clipboard
dialog add,bitbtn,bitbtn4,78,4,19,19,backwards.dll|6335,Ig,Allows you to Paste text from the clipboard
dialog add,bitbtn,bitbtn5,97,4,19,19,backwards.dll|0,Ig,Allows you to select all text in the Edit field
dialog add,bitbtn,bitbtn6,2,23,100,19,,&Undo" ",Allows Undo in Edit Window
dialog add,bitbtn,bitbtn7,21,23,100,19,,&Redo" ",Allows Redo in Edit Window
dialog add,bitbtn,bitbtn8,40,23,100,19,,Cu&t" ",Allows you to Cut selected text to the clipboard
dialog add,bitbtn,bitbtn9,59,23,100,19,,&Copy" ",Allows you to Copy selected text to the clipboard
dialog add,bitbtn,bitbtn10,78,23,100,19,,&Paste" ",Allows you to Paste text from the clipboard
dialog add,bitbtn,bitbtn11,97,23,100,19,,Select &All" ",Allows you to select all text in the Edit field
dialog show
dialog hide
:Evloop
wait event
%%eventdialog = @event(d)
parse "%%event;%%dialog",%%eventdialog
if %%event
dialog select,%%dialog
if @equal(%%event,bitmap1click)
goto %%event
else
end
if @equal(%%event,close)
goto %%event
else
dialog select,1
dialog hide
end
goto evloop
:bitmap1click
:CLICK
PARSE "%b;%x;%y",@click(BXY)
rem -- Open menu on right click only --
if @equal(%b, "RIGHT")
dialog select,1
%%y = @sum(%y,@winpos("new dialog",T),20)
%%x = @diff(@sum(%x,@winpos("New dialog",L)),20)
window position,popup menu,%%y,%%x
dialog show
dialog focus,bitbtn0
goto evloop
else
end
goto evloop
:close
exit
|
NodNarb |
|
Back to top |
|
|
|
|
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
|
|