home *** CD-ROM | disk | FTP | other *** search
- !ScalaScript
- {
- Sequence:
- :"SubScript"
- {
- Group:
- BoxX.1=139;
- BoxY.1=10;
- BoxX.2=0;
- BoxY.2=0;
- BoxX=BoxX.1;
- BoxY=BoxY.1;
- BoxW=360;
- BoxH=165;
- Descr="Click a button to get information about it!";
- Picture("Scala:\help\graphics\variables.gif",UserPalette(RGBPen(1,0,16777215,12632256,5592405,8553090,11184810)));
- pagename="Variable Definition dialog";
- pagedescr="This dialog allows you to define the variable type for a newly created variable.";
- descr="Click a button to get information about it!";
- title="";
- Button(Normal(Box(496,172,19,25,Style(Norm))),Highlight(Box(496,172,19,25,Style(High))),Select(Box(496,172,19,25,Style(Sel)),Use(infobutton)));
- Button(Normal(Box(127,278,92,25,Style(Norm))),Highlight(Box(127,278,92,25,Style(High))),Select(Box(127,278,92,25,Style(Sel)),Use(textbutton)));
- Button(Normal(Box(224,278,92,25,Style(Norm))),Highlight(Box(224,278,92,25,Style(High))),Select(Box(224,278,92,25,Style(Sel)),Use(numericbutton)));
- Button(Normal(Box(321,278,92,25,Style(Norm))),Highlight(Box(321,278,92,25,Style(High))),Select(Box(321,278,92,25,Style(Sel)),Use(logicalbutton)));
- Button(Normal(Box(418,278,93,25,Style(Norm))),Highlight(Box(418,278,93,25,Style(High))),Select(Box(418,278,93,25,Style(Sel)),Use(cancelbutton)));
- Wait();
- Sequence:
- Use(SetUp);
- Use(DrawBox);
- Resources:
- :infobutton
- {
- title="Information button";
- text[1]="Switches Scala into Help mode. ";
- descr=text[1];
- block=1;
- max=1;
- Use(SetPos);
- }
- :textbutton
- {
- title="Text";
- text[1]="Indicates that you want the variable to be defined as a text variable.";
- descr=text[1];
- block=1;
- max=1;
- Use(SetPos);
- }
- :numericbutton
- {
- title="Numeric";
- text[1]="Indicates that you want the variable to be defined as a numeric integer variable.";
- descr=text[1];
- block=1;
- max=1;
- Use(SetPos);
- }
- :logicalbutton
- {
- title="Logical";
- text[1]="Indicates that you want the variable to be defined as a logical boolean variable.";
- descr=text[1];
- block=1;
- max=1;
- Use(SetPos);
- }
- :cancelbutton
- {
- title="Cancel";
- text[1]="Closes the Variable Definition dialog and returns you to the Branch menu without defining the variable.";
- descr=text[1];
- block=1;
- max=1;
- Use(SetPos);
- }
- }
- Resources:
- }
-