Mac Professional Member

Joined: 08 Jul 2000 Posts: 1585 Location: Oklahoma USA
|
Posted: Thu Apr 29, 2004 10:49 pm Post subject: |
|
|
OK, here's an example.
1. First, we add "Please Select..." to the combo, and an
empty line to list one. This keeps the two synchronized
when we click the combo.
2. We use "LIST SEEK, Combo1, 0" to make it appear in
the combo display.
3. On click, we check if the first item (Please Select...)
is clicked - if so, we do nothing and return to EVLOOP.
| Code: |
OPTION SCALE, 96
OPTION DECIMALSEP, "."
TITLE By Mac
DIALOG CREATE,"Test Program",-1,0,200,100
DIALOG ADD,COMBO,Combo1,4,4,192,24,,,LIST,CLICK
DIALOG SHOW
LIST CREATE, 1
LIST ADD, Combo1, "Please Select..."
LIST ADD, 1, ""
LIST ADD, Combo1, "Notepad"
LIST ADD, 1, "c:\windows\notepad.exe"
LIST ADD, Combo1, "Wordpad"
LIST ADD, 1, "c:\windows\wordpad.exe"
LIST SEEK, Combo1, 0
:EVLOOP
WAIT EVENT
goto @event()
:Combo1CLICK
if @equal(@index(Combo1), 0)
goto EVLOOP
end
RUN @item(1, @index(Combo1))
goto EVLOOP
:CLOSE
EXIT
|
Cheers, Mac  _________________ 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
 |
|