1. Another VEL question.
------=_NextPart_000_001E_01BF1FE3.771279C0
charset="iso-8859-1"
Content-Transfer-Encoding: quoted-printable
I've got a quick question for anyone who's had any experience with VEL. =
I'm working on the editor for race creation in a little rpg I'm working =
on, and what I'd hoped to do was have an updown button, which when =
pushed up or down would display the next race in the race string. So, =
the string being loaded as race, and the value =
I'd set up the updown button and edit as=20
RaceUpDown1 =3D CreateControl(UPDOWNBUTTON,RaceForm)
s =3D { {ASSOCIATE,RaceNumberEdit},
{MAX, 100},
{MIN,1},
{INCREMENT,1},
{ARROWKEYS, TRUE}}
SetAttribute(RaceUpDown1,s)
RaceEdit1 =3D CreateControl(EDIT,RaceForm)
s =3D { {TEXT, race[ GetAttribute(RaceUpDown1, POSITION) ] },
{TOP, 20},
{LEFT, 250},
{HEIGHT,10},
{WIDTH,150},
{MAXLENGTH, 20},
{TABORDER, 1},
{TABSTOP, TRUE},
{HINT, "Write the name of your race here."},
{SHOWHINT, TRUE}}
SetAttribute(RaceEdit1,s)
The button though, is allways reading as being 0. Am I phrasing this =
incorectly?
Thanks in advance for any help, for anyone able to make some sence of my =
sleepy ramblings 
------=_NextPart_000_001E_01BF1FE3.771279C0
charset="iso-8859-1"
Content-Transfer-Encoding: quoted-printable
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML><HEAD>
<META content=3D"text/html; charset=3Diso-8859-1" =
http-equiv=3DContent-Type>
<META content=3D"MSHTML 5.00.2314.1000" name=3DGENERATOR>
<STYLE></STYLE>
</HEAD>
<BODY bgColor=3D#ffffff>
<DIV><FONT face=3DArial size=3D2>I've got a quick question for anyone =
who's had any=20
experience with VEL. I'm working on the editor for race creation in a =
little rpg=20
I'm working on, and what I'd hoped to do was have an updown button, =
which when=20
pushed up or down would display the next race in the race string. So, =
the string=20
being loaded as race, and the value=20
NT></DIV>
<DIV> </DIV>
<DIV><FONT face=3DArial size=3D2>I'd set up the updown button and =
edit as=20
</FONT></DIV>
<DIV> </DIV>
<DIV><FONT face=3DArial size=3D2>RaceUpDown1 =3D=20
CreateControl(UPDOWNBUTTON,RaceForm)<BR>s =3D {=20
{ASSOCIATE,RaceNumberEdit},</FONT></DIV>
<DIV><FONT face=3DArial size=3D2> {MAX,=20
100},<BR> {MIN,1},<BR> =20
{INCREMENT,1},<BR> {ARROWKEYS,=20
<DIV> </DIV>
<DIV><FONT face=3DArial size=3D2></FONT> </DIV>
<DIV> </DIV>
<DIV><FONT face=3DArial size=3D2>RaceEdit1 =3D =
CreateControl(EDIT,RaceForm)<BR>s =3D {=20
{TEXT, race[ GetAttribute(RaceUpDown1, =
POSITION) ] =20
},<BR> {TOP, 20},<BR> {LEFT,=20
250},<BR> {HEIGHT,10},<BR> =20
{WIDTH,150},<BR> {MAXLENGTH, =
20},<BR> =20
{TABORDER, 1},<BR> {TABSTOP, =
TRUE},<BR> =20
{HINT, "Write the name of your race here."},<BR> =
{SHOWHINT,=20
TRUE}}<BR> SetAttribute(RaceEdit1,s)</FONT></DIV>
<DIV> </DIV>
<DIV> </DIV>
<DIV> </DIV>
<DIV><FONT face=3DArial size=3D2>The button though, is allways reading =
as being 0.=20
Am I phrasing this incorectly?</FONT></DIV>
<DIV> </DIV>
<DIV><FONT face=3DArial size=3D2>Thanks in advance for any help, for =
anyone able to=20
make some sence of my sleepy ramblings </FONT></DIV>
<DIV> </DIV>
<DIV> </DIV>
<DIV> </DIV>
------=_NextPart_000_001E_01BF1FE3.771279C0--
2. Re: Another VEL question.
------=_NextPart_000_0008_01BF201A.A1A755C0
charset="iso-8859-1"
Content-Transfer-Encoding: quoted-printable
Rather then an UpDownButton, I would use a ComboBox here, set the =
ComboStyle to DropDownList, and fill the Combo with the predefined =
choices. Gary told me to use APPENDITEM, a method not well documented in =
Experimental.doc.
constant Combo =3D CreateControl(COMBOBOX, RaceForm)
SetAttribute(Combo, { {COMBOSTYLE, DROPDOWNLIST} } )
-- set other attributes too
constant RaceNames =3D =
for n =3D 1 to length(RaceNames) do
SetAttribute( Combo, { {APPENDITEM, RaceNames[n] } } )
end for
Hope this helps, Ad Rienks
----- Oorspronkelijk bericht -----=20
Van: Naflign=20
Aan: EUPHORIA at LISTSERV.MUOHIO.EDU=20
Verzonden: woensdag 27 oktober 1999 1:54
Onderwerp: Another VEL question.
I've got a quick question for anyone who's had any experience with =
VEL. I'm working on the editor for race creation in a little rpg I'm =
working on, and what I'd hoped to do was have an updown button, which =
when pushed up or down would display the next race in the race string. =
So, the string being loaded as race, and the value =
I'd set up the updown button and edit as=20
RaceUpDown1 =3D CreateControl(UPDOWNBUTTON,RaceForm)
s =3D { {ASSOCIATE,RaceNumberEdit},
{MAX, 100},
{MIN,1},
{INCREMENT,1},
{ARROWKEYS, TRUE}}
SetAttribute(RaceUpDown1,s)
=20
RaceEdit1 =3D CreateControl(EDIT,RaceForm)
s =3D { {TEXT, race[ GetAttribute(RaceUpDown1, POSITION) ] },
{TOP, 20},
{LEFT, 250},
{HEIGHT,10},
{WIDTH,150},
{MAXLENGTH, 20},
{TABORDER, 1},
{TABSTOP, TRUE},
{HINT, "Write the name of your race here."},
{SHOWHINT, TRUE}}
SetAttribute(RaceEdit1,s)
The button though, is allways reading as being 0. Am I phrasing this =
incorectly?
Thanks in advance for any help, for anyone able to make some sence of =
my sleepy ramblings
------=_NextPart_000_0008_01BF201A.A1A755C0
charset="iso-8859-1"
Content-Transfer-Encoding: quoted-printable
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML><HEAD>
<META content=3D"text/html; charset=3Diso-8859-1" =
http-equiv=3DContent-Type>
<META content=3D"MSHTML 5.00.2314.1000" name=3DGENERATOR>
<STYLE></STYLE>
</HEAD>
<BODY bgColor=3D#ffffff>
<DIV>Rather then an UpDownButton, I would use a ComboBox here, set the=20
ComboStyle to DropDownList, and fill the Combo with the predefined =
choices. Gary=20
told me to use APPENDITEM, a method not well documented in=20
Experimental.doc.</DIV>
<DIV> </DIV>
<DIV>constant Combo =3D CreateControl(COMBOBOX, RaceForm)</DIV>
<DIV>SetAttribute(Combo, { {COMBOSTYLE, DROPDOWNLIST} } )</DIV>
<DIV>-- set other attributes too</DIV>
<DIV> </DIV>
<DIV>constant RaceNames =3D=20
<DIV> </DIV>
<DIV>for n =3D 1 to length(RaceNames) do</DIV>
<DIV> SetAttribute( Combo, { {APPENDITEM, RaceNames[n] =
} }=20
)</DIV>
<DIV>end for</DIV>
<DIV> </DIV>
<DIV>Hope this helps, Ad Rienks</DIV>
<DIV> </DIV>
<DIV>----- Oorspronkelijk bericht ----- </DIV>
<BLOCKQUOTE=20
style=3D"BORDER-LEFT: #000000 2px solid; MARGIN-LEFT: 5px; MARGIN-RIGHT: =
0px; PADDING-LEFT: 5px; PADDING-RIGHT: 0px">
<DIV=20
style=3D"BACKGROUND: #e4e4e4; FONT: 10pt arial; font-color: =
black"><B>Van:</B>=20
<A href=3D"mailto:naflign at MEDIAONE.NET" =
title=3Dnaflign at MEDIAONE.NET>Naflign</A>=20
</DIV>
<DIV style=3D"FONT: 10pt arial"><B>Aan:</B> <A=20
href=3D"mailto:EUPHORIA at LISTSERV.MUOHIO.EDU"=20
title=3DEUPHORIA at LISTSERV.MUOHIO.EDU>EUPHORIA at LISTSERV.MUOHIO.EDU</A> =
</DIV>
<DIV style=3D"FONT: 10pt arial"><B>Verzonden:</B> woensdag 27 oktober =
1999=20
1:54</DIV>
<DIV style=3D"FONT: 10pt arial"><B>Onderwerp:</B> Another VEL =
question.</DIV>
<DIV><BR></DIV>
<DIV><FONT face=3DArial size=3D2>I've got a quick question for anyone =
who's had=20
any experience with VEL. I'm working on the editor for race creation =
in a=20
little rpg I'm working on, and what I'd hoped to do was have an updown =
button,=20
which when pushed up or down would display the next race in the race =
string.=20
So, the string being loaded as race, and the value=20
=
NT></DIV>
<DIV> </DIV>
<DIV><FONT face=3DArial size=3D2>I'd set up the updown button and =
edit as=20
</FONT></DIV>
<DIV> </DIV>
<DIV><FONT face=3DArial size=3D2>RaceUpDown1 =3D=20
CreateControl(UPDOWNBUTTON,RaceForm)<BR>s =3D {=20
{ASSOCIATE,RaceNumberEdit},</FONT></DIV>
<DIV><FONT face=3DArial size=3D2> {MAX,=20
100},<BR> {MIN,1},<BR> =20
{INCREMENT,1},<BR> {ARROWKEYS,=20
TRUE}}<BR>SetAttribute(RaceUpDown1,s)</FONT></DIV>
<DIV> </DIV>
<DIV><FONT face=3DArial size=3D2></FONT> </DIV>
<DIV> </DIV>
<DIV><FONT face=3DArial size=3D2>RaceEdit1 =3D =
CreateControl(EDIT,RaceForm)<BR>s =3D {=20
{TEXT, race[ GetAttribute(RaceUpDown1, =
POSITION) ] =20
},<BR> {TOP, 20},<BR> {LEFT,=20
250},<BR> {HEIGHT,10},<BR> =20
{WIDTH,150},<BR> {MAXLENGTH, =
20},<BR> =20
{TABORDER, 1},<BR> {TABSTOP, =
TRUE},<BR> =20
{HINT, "Write the name of your race here."},<BR> =
{SHOWHINT,=20
TRUE}}<BR> SetAttribute(RaceEdit1,s)</FONT></DIV>
<DIV> </DIV>
<DIV> </DIV>
<DIV> </DIV>
<DIV><FONT face=3DArial size=3D2>The button though, is allways reading =
as being 0.=20
Am I phrasing this incorectly?</FONT></DIV>
<DIV> </DIV>
<DIV><FONT face=3DArial size=3D2>Thanks in advance for any help, for =
anyone able=20
to make some sence of my sleepy ramblings </FONT></DIV>
<DIV> </DIV>
<DIV> </DIV>
<DIV> </DIV>
------=_NextPart_000_0008_01BF201A.A1A755C0--
3. Re: Another VEL question.
Hello,
>From: Ad Rienks <kwibus at ZONNET.NL>
>
>Rather then an UpDownButton, I would use a ComboBox here, set the
>ComboStyle to DropDownList, and fill the Combo with the predefined choices.
>Gary told me to use APPENDITEM, a method not well documented in
>Experimental.doc.
>
<Snip Code>
>
>Hope this helps, Ad Rienks
>> Van: Naflign
>
> I've got a quick question for anyone who's had any experience with VEL.
>I'm working on the editor for race creation in a little rpg I'm working on,
>and what I'd hoped to do was have an updown button, which when pushed up or
>down would display the next race in the race string. So, the string being
>loaded as race, and the value as
>
> I'd set up the updown button and edit as
>
> RaceUpDown1 = CreateControl(UPDOWNBUTTON,RaceForm)
> s = { {ASSOCIATE,RaceNumberEdit},
> {MAX, 100},
> {MIN,1},
> {INCREMENT,1},
> {ARROWKEYS, TRUE}}
> SetAttribute(RaceUpDown1,s)
>
> RaceEdit1 = CreateControl(EDIT,RaceForm)
> s = { {TEXT, race[ GetAttribute(RaceUpDown1, POSITION) ] },
> {TOP, 20},
> {LEFT, 250},
> {HEIGHT,10},
> {WIDTH,150},
> {MAXLENGTH, 20},
> {TABORDER, 1},
> {TABSTOP, TRUE},
> {HINT, "Write the name of your race here."},
> {SHOWHINT, TRUE}}
> SetAttribute(RaceEdit1,s)
>
> The button though, is allways reading as being 0. Am I phrasing this
>incorectly?
>
> Thanks in advance for any help, for anyone able to make some sence of my
>sleepy ramblings
>
What Ad wrote is probably what you want to do but in case there
is some reason you really need to use UPDOWN buttons then here's
my suggestion:
You need to have "RaceNumberEdit" already set as a textbox or
something before associating the updown with it. It can be an
invisible text box if you want but the associate property needs
a control.
If you've got that then the text of 'RaceNumberEdit' should
update whenever you click on the updown button. If it doesn't
then I don't know what the problem is.
Lastly you must set an event procedure for the change event of
RaceNumberEdit so that RaceEdit1 is updated with the race name
determined by the value in RaceNumberEdit. If it doesn't work
then download the latest bleeding edge version of VEL.
later,
Lewis Townsend
______________________________________________________
Get Your Private, Free Email at http://www.hotmail.com
