PWCT 1.9 Art Documentation ( http://doublesvsoop.sourceforge.net )

2006-2019, Mahmoud Fayed ( msfclipper@users.sourceforge.net )

_____________________________________________________________________________________

Table of contents

1 - Introduction

2 - Implementation steps

3 - Final Steps Tree

1 - Introduction

In this lesson we are going to create the GUI.SSF

This file is part of the Supernova programming language

2 - Implementation Steps

s1.JPG

Fig. (1) Goal Desginer - Steps Tree

Select the step (The First Step)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Structure Programming)

                3 - Select the component (Define Procedure)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Define Procedure)

                Note : Stop typing when you see the required component is selected

s2.JPG

Fig. (2) Component Browser – Select the component (Define Procedure)

After selecting the component click Ok or press ENTER

s3.JPG

Fig. (3) Interaction page - Set the properties and enter the required data as in the image above

s4.JPG

Fig. (4) Goal Desginer - Steps Tree

Select the step (The First Step)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Structure Programming)

                3 - Select the component (Define Procedure)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Define Procedure)

                Note : Stop typing when you see the required component is selected

s5.JPG

Fig. (5) Component Browser – Select the component (Define Procedure)

After selecting the component click Ok or press ENTER

s6.JPG

Fig. (6) Interaction page - Set the properties and enter the required data as in the image above

s7.JPG

Fig. (7) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Variables)

                3 - Select the component (Assignment)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Assignment)

                Note : Stop typing when you see the required component is selected

s8.JPG

Fig. (8) Component Browser – Select the component (Assignment)

After selecting the component click Ok or press ENTER

s9.JPG

Fig. (9) Interaction page - Set the properties and enter the required data as in the image above

s10.JPG

Fig. (10) Goal Desginer - Steps Tree

Select the step (Set Window Auto Show On)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Control Structure)

                3 - Select the component (IF Statement)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (IF Statement)

                Note : Stop typing when you see the required component is selected

s11.JPG

Fig. (11) Component Browser – Select the component (IF Statement)

After selecting the component click Ok or press ENTER

s12.JPG

Fig. (12) Interaction page - Set the properties and enter the required data as in the image above

s13.JPG

Fig. (13) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Variables)

                3 - Select the component (Assignment)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Assignment)

                Note : Stop typing when you see the required component is selected

s14.JPG

Fig. (14) Component Browser – Select the component (Assignment)

After selecting the component click Ok or press ENTER

s15.JPG

Fig. (15) Interaction page - Set the properties and enter the required data as in the image above

s16.JPG

Fig. (16) Goal Desginer - Steps Tree

Select the step (Set Window Auto Show Off)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Control Structure)

                3 - Select the component (IF Statement)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (IF Statement)

                Note : Stop typing when you see the required component is selected

s17.JPG

Fig. (17) Component Browser – Select the component (IF Statement)

After selecting the component click Ok or press ENTER

s18.JPG

Fig. (18) Interaction page - Set the properties and enter the required data as in the image above

s19.JPG

Fig. (19) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Variables)

                3 - Select the component (Assignment)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Assignment)

                Note : Stop typing when you see the required component is selected

s20.JPG

Fig. (20) Component Browser – Select the component (Assignment)

After selecting the component click Ok or press ENTER

s21.JPG

Fig. (21) Interaction page - Set the properties and enter the required data as in the image above

s22.JPG

Fig. (22) Goal Desginer - Steps Tree

Select the step (The First Step)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Structure Programming)

                3 - Select the component (Define Procedure)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Define Procedure)

                Note : Stop typing when you see the required component is selected

s23.JPG

Fig. (23) Component Browser – Select the component (Define Procedure)

After selecting the component click Ok or press ENTER

s24.JPG

Fig. (24) Interaction page - Set the properties and enter the required data as in the image above

s25.JPG

Fig. (25) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Structure Programming)

                3 - Select the component (Scope of Variable)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Scope of Variable)

                Note : Stop typing when you see the required component is selected

s26.JPG

Fig. (26) Component Browser – Select the component (Scope of Variable)

After selecting the component click Ok or press ENTER

s27.JPG

Fig. (27) Interaction page - Set the properties and enter the required data as in the image above

s28.JPG

Fig. (28) Goal Desginer - Steps Tree

Select the step (The First Step)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Structure Programming)

                3 - Select the component (Define Procedure)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Define Procedure)

                Note : Stop typing when you see the required component is selected

s29.JPG

Fig. (29) Component Browser – Select the component (Define Procedure)

After selecting the component click Ok or press ENTER

s30.JPG

Fig. (30) Interaction page - Set the properties and enter the required data as in the image above

s31.JPG

Fig. (31) Goal Desginer - Steps Tree

Select the step (Windows Events)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Variables)

                3 - Select the component (Get String/Variable/Array Length)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Get String/Variable/Array Length)

                Note : Stop typing when you see the required component is selected

s32.JPG

Fig. (32) Component Browser – Select the component (Get String/Variable/Array Length)

After selecting the component click Ok or press ENTER

s33.JPG

Fig. (33) Interaction page - Set the properties and enter the required data as in the image above

s34.JPG

Fig. (34) Goal Desginer - Steps Tree

Select the step (The First Step)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Structure Programming)

                3 - Select the component (Define Procedure)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Define Procedure)

                Note : Stop typing when you see the required component is selected

s35.JPG

Fig. (35) Component Browser – Select the component (Define Procedure)

After selecting the component click Ok or press ENTER

s36.JPG

Fig. (36) Interaction page - Set the properties and enter the required data as in the image above

s37.JPG

Fig. (37) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Structure Programming)

                3 - Select the component (Scope of Variable)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Scope of Variable)

                Note : Stop typing when you see the required component is selected

s38.JPG

Fig. (38) Component Browser – Select the component (Scope of Variable)

After selecting the component click Ok or press ENTER

s39.JPG

Fig. (39) Interaction page - Set the properties and enter the required data as in the image above

s40.JPG

Fig. (40) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Structure Programming)

                3 - Select the component (Scope of Variable)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Scope of Variable)

                Note : Stop typing when you see the required component is selected

s41.JPG

Fig. (41) Component Browser – Select the component (Scope of Variable)

After selecting the component click Ok or press ENTER

s42.JPG

Fig. (42) Interaction page - Set the properties and enter the required data as in the image above

s43.JPG

Fig. (43) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Structure Programming)

                3 - Select the component (Scope of Variable)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Scope of Variable)

                Note : Stop typing when you see the required component is selected

s44.JPG

Fig. (44) Component Browser – Select the component (Scope of Variable)

After selecting the component click Ok or press ENTER

s45.JPG

Fig. (45) Interaction page - Set the properties and enter the required data as in the image above

s46.JPG

Fig. (46) Goal Desginer - Steps Tree

Select the step (The First Step)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Structure Programming)

                3 - Select the component (Define Procedure)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Define Procedure)

                Note : Stop typing when you see the required component is selected

s47.JPG

Fig. (47) Component Browser – Select the component (Define Procedure)

After selecting the component click Ok or press ENTER

s48.JPG

Fig. (48) Interaction page - Set the properties and enter the required data as in the image above

s49.JPG

Fig. (49) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Variables)

                3 - Select the component (Assignment)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Assignment)

                Note : Stop typing when you see the required component is selected

s50.JPG

Fig. (50) Component Browser – Select the component (Assignment)

After selecting the component click Ok or press ENTER

s51.JPG

Fig. (51) Interaction page - Set the properties and enter the required data as in the image above

s52.JPG

Fig. (52) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Variables)

                3 - Select the component (Get String/Variable/Array Length)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Get String/Variable/Array Length)

                Note : Stop typing when you see the required component is selected

s53.JPG

Fig. (53) Component Browser – Select the component (Get String/Variable/Array Length)

After selecting the component click Ok or press ENTER

s54.JPG

Fig. (54) Interaction page - Set the properties and enter the required data as in the image above

s55.JPG

Fig. (55) Goal Desginer - Steps Tree

Select the step (The First Step)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Structure Programming)

                3 - Select the component (Define Procedure)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Define Procedure)

                Note : Stop typing when you see the required component is selected

s56.JPG

Fig. (56) Component Browser – Select the component (Define Procedure)

After selecting the component click Ok or press ENTER

s57.JPG

Fig. (57) Interaction page - Set the properties and enter the required data as in the image above

s58.JPG

Fig. (58) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Variables)

                3 - Select the component (Assignment)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Assignment)

                Note : Stop typing when you see the required component is selected

s59.JPG

Fig. (59) Component Browser – Select the component (Assignment)

After selecting the component click Ok or press ENTER

s60.JPG

Fig. (60) Interaction page - Set the properties and enter the required data as in the image above

s61.JPG

Fig. (61) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Variables)

                3 - Select the component (Get String/Variable/Array Length)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Get String/Variable/Array Length)

                Note : Stop typing when you see the required component is selected

s62.JPG

Fig. (62) Component Browser – Select the component (Get String/Variable/Array Length)

After selecting the component click Ok or press ENTER

s63.JPG

Fig. (63) Interaction page - Set the properties and enter the required data as in the image above

s64.JPG

Fig. (64) Goal Desginer - Steps Tree

Select the step (The First Step)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Structure Programming)

                3 - Select the component (Define Procedure)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Define Procedure)

                Note : Stop typing when you see the required component is selected

s65.JPG

Fig. (65) Component Browser – Select the component (Define Procedure)

After selecting the component click Ok or press ENTER

s66.JPG

Fig. (66) Interaction page - Set the properties and enter the required data as in the image above

s67.JPG

Fig. (67) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Variables)

                3 - Select the component (Assignment)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Assignment)

                Note : Stop typing when you see the required component is selected

s68.JPG

Fig. (68) Component Browser – Select the component (Assignment)

After selecting the component click Ok or press ENTER

s69.JPG

Fig. (69) Interaction page - Set the properties and enter the required data as in the image above

s70.JPG

Fig. (70) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Control Structure)

                3 - Select the component (IF Statement)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (IF Statement)

                Note : Stop typing when you see the required component is selected

s71.JPG

Fig. (71) Component Browser – Select the component (IF Statement)

After selecting the component click Ok or press ENTER

s72.JPG

Fig. (72) Interaction page - Set the properties and enter the required data as in the image above

s73.JPG

Fig. (73) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Structure Programming)

                3 - Select the component (Call Procedure)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Call Procedure)

                Note : Stop typing when you see the required component is selected

s74.JPG

Fig. (74) Component Browser – Select the component (Call Procedure)

After selecting the component click Ok or press ENTER

s75.JPG

Fig. (75) Interaction page - Set the properties and enter the required data as in the image above

s76.JPG

Fig. (76) Goal Desginer - Steps Tree

Select the step (Set Active GUI Control)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Control Structure)

                3 - Select the component (IF Statement)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (IF Statement)

                Note : Stop typing when you see the required component is selected

s77.JPG

Fig. (77) Component Browser – Select the component (IF Statement)

After selecting the component click Ok or press ENTER

s78.JPG

Fig. (78) Interaction page - Set the properties and enter the required data as in the image above

s79.JPG

Fig. (79) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Structure Programming)

                3 - Select the component (Call Procedure)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Call Procedure)

                Note : Stop typing when you see the required component is selected

s80.JPG

Fig. (80) Component Browser – Select the component (Call Procedure)

After selecting the component click Ok or press ENTER

s81.JPG

Fig. (81) Interaction page - Set the properties and enter the required data as in the image above

s82.JPG

Fig. (82) Goal Desginer - Steps Tree

Select the step (Windows Events)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Variables)

                3 - Select the component (Get String/Variable/Array Length)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Get String/Variable/Array Length)

                Note : Stop typing when you see the required component is selected

s83.JPG

Fig. (83) Component Browser – Select the component (Get String/Variable/Array Length)

After selecting the component click Ok or press ENTER

s84.JPG

Fig. (84) Interaction page - Set the properties and enter the required data as in the image above

s85.JPG

Fig. (85) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Variables)

                3 - Select the component (Assignment)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Assignment)

                Note : Stop typing when you see the required component is selected

s86.JPG

Fig. (86) Component Browser – Select the component (Assignment)

After selecting the component click Ok or press ENTER

s87.JPG

Fig. (87) Interaction page - Set the properties and enter the required data as in the image above

s88.JPG

Fig. (88) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Structure Programming)

                3 - Select the component (Return Value)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Return Value)

                Note : Stop typing when you see the required component is selected

s89.JPG

Fig. (89) Component Browser – Select the component (Return Value)

After selecting the component click Ok or press ENTER

s90.JPG

Fig. (90) Interaction page - Set the properties and enter the required data as in the image above

s91.JPG

Fig. (91) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Structure Programming)

                3 - Select the component (Return Value)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Return Value)

                Note : Stop typing when you see the required component is selected

s92.JPG

Fig. (92) Component Browser – Select the component (Return Value)

After selecting the component click Ok or press ENTER

s93.JPG

Fig. (93) Interaction page - Set the properties and enter the required data as in the image above

s94.JPG

Fig. (94) Goal Desginer - Steps Tree

Select the step (The First Step)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Structure Programming)

                3 - Select the component (Define Procedure)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Define Procedure)

                Note : Stop typing when you see the required component is selected

s95.JPG

Fig. (95) Component Browser – Select the component (Define Procedure)

After selecting the component click Ok or press ENTER

s96.JPG

Fig. (96) Interaction page - Set the properties and enter the required data as in the image above

s97.JPG

Fig. (97) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Structure Programming)

                3 - Select the component (Scope of Variable)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Scope of Variable)

                Note : Stop typing when you see the required component is selected

s98.JPG

Fig. (98) Component Browser – Select the component (Scope of Variable)

After selecting the component click Ok or press ENTER

s99.JPG

Fig. (99) Interaction page - Set the properties and enter the required data as in the image above

s100.JPG

Fig. (100) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Variables)

                3 - Select the component (Assignment)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Assignment)

                Note : Stop typing when you see the required component is selected

s101.JPG

Fig. (101) Component Browser – Select the component (Assignment)

After selecting the component click Ok or press ENTER

s102.JPG

Fig. (102) Interaction page - Set the properties and enter the required data as in the image above

s103.JPG

Fig. (103) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Variables)

                3 - Select the component (Get String/Variable/Array Length)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Get String/Variable/Array Length)

                Note : Stop typing when you see the required component is selected

s104.JPG

Fig. (104) Component Browser – Select the component (Get String/Variable/Array Length)

After selecting the component click Ok or press ENTER

s105.JPG

Fig. (105) Interaction page - Set the properties and enter the required data as in the image above

s106.JPG

Fig. (106) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Variables)

                3 - Select the component (Get String/Variable/Array Length)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Get String/Variable/Array Length)

                Note : Stop typing when you see the required component is selected

s107.JPG

Fig. (107) Component Browser – Select the component (Get String/Variable/Array Length)

After selecting the component click Ok or press ENTER

s108.JPG

Fig. (108) Interaction page - Set the properties and enter the required data as in the image above

s109.JPG

Fig. (109) Goal Desginer - Steps Tree

Select the step (prepare p1)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Variables)

                3 - Select the component (Sub String Transform)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Sub String Transform)

                Note : Stop typing when you see the required component is selected

s110.JPG

Fig. (110) Component Browser – Select the component (Sub String Transform)

After selecting the component click Ok or press ENTER

s111.JPG

Fig. (111) Interaction page - Set the properties and enter the required data as in the image above

s112.JPG

Fig. (112) Goal Desginer - Steps Tree

Select the step (prepare p1)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Variables)

                3 - Select the component (lower Case)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (lower Case)

                Note : Stop typing when you see the required component is selected

s113.JPG

Fig. (113) Component Browser – Select the component (lower Case)

After selecting the component click Ok or press ENTER

s114.JPG

Fig. (114) Interaction page - Set the properties and enter the required data as in the image above

s115.JPG

Fig. (115) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Control Structure)

                3 - Select the component (IF Statement)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (IF Statement)

                Note : Stop typing when you see the required component is selected

s116.JPG

Fig. (116) Component Browser – Select the component (IF Statement)

After selecting the component click Ok or press ENTER

s117.JPG

Fig. (117) Interaction page - Set the properties and enter the required data as in the image above

s118.JPG

Fig. (118) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Variables)

                3 - Select the component (Assignment)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Assignment)

                Note : Stop typing when you see the required component is selected

s119.JPG

Fig. (119) Component Browser – Select the component (Assignment)

After selecting the component click Ok or press ENTER

s120.JPG

Fig. (120) Interaction page - Set the properties and enter the required data as in the image above

s121.JPG

Fig. (121) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Structure Programming)

                3 - Select the component (Return Value)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Return Value)

                Note : Stop typing when you see the required component is selected

s122.JPG

Fig. (122) Component Browser – Select the component (Return Value)

After selecting the component click Ok or press ENTER

s123.JPG

Fig. (123) Interaction page - Set the properties and enter the required data as in the image above

s124.JPG

Fig. (124) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Variables)

                3 - Select the component (Assignment)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Assignment)

                Note : Stop typing when you see the required component is selected

s125.JPG

Fig. (125) Component Browser – Select the component (Assignment)

After selecting the component click Ok or press ENTER

s126.JPG

Fig. (126) Interaction page - Set the properties and enter the required data as in the image above

s127.JPG

Fig. (127) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Variables)

                3 - Select the component (Assignment)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Assignment)

                Note : Stop typing when you see the required component is selected

s128.JPG

Fig. (128) Component Browser – Select the component (Assignment)

After selecting the component click Ok or press ENTER

s129.JPG

Fig. (129) Interaction page - Set the properties and enter the required data as in the image above

s130.JPG

Fig. (130) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Variables)

                3 - Select the component (Assignment)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Assignment)

                Note : Stop typing when you see the required component is selected

s131.JPG

Fig. (131) Component Browser – Select the component (Assignment)

After selecting the component click Ok or press ENTER

s132.JPG

Fig. (132) Interaction page - Set the properties and enter the required data as in the image above

s133.JPG

Fig. (133) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Variables)

                3 - Select the component (Assignment)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Assignment)

                Note : Stop typing when you see the required component is selected

s134.JPG

Fig. (134) Component Browser – Select the component (Assignment)

After selecting the component click Ok or press ENTER

s135.JPG

Fig. (135) Interaction page - Set the properties and enter the required data as in the image above

s136.JPG

Fig. (136) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Structure Programming)

                3 - Select the component (Call Procedure)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Call Procedure)

                Note : Stop typing when you see the required component is selected

s137.JPG

Fig. (137) Component Browser – Select the component (Call Procedure)

After selecting the component click Ok or press ENTER

s138.JPG

Fig. (138) Interaction page - Set the properties and enter the required data as in the image above

s139.JPG

Fig. (139) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Structure Programming)

                3 - Select the component (Call Procedure)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Call Procedure)

                Note : Stop typing when you see the required component is selected

s140.JPG

Fig. (140) Component Browser – Select the component (Call Procedure)

After selecting the component click Ok or press ENTER

s141.JPG

Fig. (141) Interaction page - Set the properties and enter the required data as in the image above

s142.JPG

Fig. (142) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Variables)

                3 - Select the component (Assignment)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Assignment)

                Note : Stop typing when you see the required component is selected

s143.JPG

Fig. (143) Component Browser – Select the component (Assignment)

After selecting the component click Ok or press ENTER

s144.JPG

Fig. (144) Interaction page - Set the properties and enter the required data as in the image above

s145.JPG

Fig. (145) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Variables)

                3 - Select the component (Assignment)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Assignment)

                Note : Stop typing when you see the required component is selected

s146.JPG

Fig. (146) Component Browser – Select the component (Assignment)

After selecting the component click Ok or press ENTER

s147.JPG

Fig. (147) Interaction page - Set the properties and enter the required data as in the image above

s148.JPG

Fig. (148) Goal Desginer - Steps Tree

Select the step (Arabic Events Support)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Variables)

                3 - Select the component (Sub String Transform)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Sub String Transform)

                Note : Stop typing when you see the required component is selected

s149.JPG

Fig. (149) Component Browser – Select the component (Sub String Transform)

After selecting the component click Ok or press ENTER

s150.JPG

Fig. (150) Interaction page - Set the properties and enter the required data as in the image above

s151.JPG

Fig. (151) Goal Desginer - Steps Tree

Select the step (Arabic Events Support)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Variables)

                3 - Select the component (Sub String Transform)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Sub String Transform)

                Note : Stop typing when you see the required component is selected

s152.JPG

Fig. (152) Component Browser – Select the component (Sub String Transform)

After selecting the component click Ok or press ENTER

s153.JPG

Fig. (153) Interaction page - Set the properties and enter the required data as in the image above

s154.JPG

Fig. (154) Goal Desginer - Steps Tree

Select the step (Arabic Events Support)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Variables)

                3 - Select the component (Sub String Transform)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Sub String Transform)

                Note : Stop typing when you see the required component is selected

s155.JPG

Fig. (155) Component Browser – Select the component (Sub String Transform)

After selecting the component click Ok or press ENTER

s156.JPG

Fig. (156) Interaction page - Set the properties and enter the required data as in the image above

s157.JPG

Fig. (157) Goal Desginer - Steps Tree

Select the step (Arabic Events Support)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Variables)

                3 - Select the component (Sub String Transform)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Sub String Transform)

                Note : Stop typing when you see the required component is selected

s158.JPG

Fig. (158) Component Browser – Select the component (Sub String Transform)

After selecting the component click Ok or press ENTER

s159.JPG

Fig. (159) Interaction page - Set the properties and enter the required data as in the image above

s160.JPG

Fig. (160) Goal Desginer - Steps Tree

Select the step (Arabic Events Support)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Variables)

                3 - Select the component (Sub String Transform)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Sub String Transform)

                Note : Stop typing when you see the required component is selected

s161.JPG

Fig. (161) Component Browser – Select the component (Sub String Transform)

After selecting the component click Ok or press ENTER

s162.JPG

Fig. (162) Interaction page - Set the properties and enter the required data as in the image above

s163.JPG

Fig. (163) Goal Desginer - Steps Tree

Select the step (Arabic Events Support)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Variables)

                3 - Select the component (Sub String Transform)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Sub String Transform)

                Note : Stop typing when you see the required component is selected

s164.JPG

Fig. (164) Component Browser – Select the component (Sub String Transform)

After selecting the component click Ok or press ENTER

s165.JPG

Fig. (165) Interaction page - Set the properties and enter the required data as in the image above

s166.JPG

Fig. (166) Goal Desginer - Steps Tree

Select the step (Arabic Events Support)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Variables)

                3 - Select the component (Sub String Transform)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Sub String Transform)

                Note : Stop typing when you see the required component is selected

s167.JPG

Fig. (167) Component Browser – Select the component (Sub String Transform)

After selecting the component click Ok or press ENTER

s168.JPG

Fig. (168) Interaction page - Set the properties and enter the required data as in the image above

s169.JPG

Fig. (169) Goal Desginer - Steps Tree

Select the step (Arabic Events Support)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Variables)

                3 - Select the component (Sub String Transform)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Sub String Transform)

                Note : Stop typing when you see the required component is selected

s170.JPG

Fig. (170) Component Browser – Select the component (Sub String Transform)

After selecting the component click Ok or press ENTER

s171.JPG

Fig. (171) Interaction page - Set the properties and enter the required data as in the image above

s172.JPG

Fig. (172) Goal Desginer - Steps Tree

Select the step (Arabic Events Support)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Variables)

                3 - Select the component (Sub String Transform)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Sub String Transform)

                Note : Stop typing when you see the required component is selected

s173.JPG

Fig. (173) Component Browser – Select the component (Sub String Transform)

After selecting the component click Ok or press ENTER

s174.JPG

Fig. (174) Interaction page - Set the properties and enter the required data as in the image above

s175.JPG

Fig. (175) Goal Desginer - Steps Tree

Select the step (I Want Window)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Control Structure)

                3 - Select the component (IF Statement)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (IF Statement)

                Note : Stop typing when you see the required component is selected

s176.JPG

Fig. (176) Component Browser – Select the component (IF Statement)

After selecting the component click Ok or press ENTER

s177.JPG

Fig. (177) Interaction page - Set the properties and enter the required data as in the image above

s178.JPG

Fig. (178) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Variables)

                3 - Select the component (Assignment)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Assignment)

                Note : Stop typing when you see the required component is selected

s179.JPG

Fig. (179) Component Browser – Select the component (Assignment)

After selecting the component click Ok or press ENTER

s180.JPG

Fig. (180) Interaction page - Set the properties and enter the required data as in the image above

s181.JPG

Fig. (181) Goal Desginer - Steps Tree

Select the step (WinsCount = WinsCount+1)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Variables)

                3 - Select the component (Assignment)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Assignment)

                Note : Stop typing when you see the required component is selected

s182.JPG

Fig. (182) Component Browser – Select the component (Assignment)

After selecting the component click Ok or press ENTER

s183.JPG

Fig. (183) Interaction page - Set the properties and enter the required data as in the image above

s184.JPG

Fig. (184) Goal Desginer - Steps Tree

Select the step (WinsCount = WinsCount+1)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Variables)

                3 - Select the component (Numeric To String)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Numeric To String)

                Note : Stop typing when you see the required component is selected

s185.JPG

Fig. (185) Component Browser – Select the component (Numeric To String)

After selecting the component click Ok or press ENTER

s186.JPG

Fig. (186) Interaction page - Set the properties and enter the required data as in the image above

s187.JPG

Fig. (187) Goal Desginer - Steps Tree

Select the step (WinsCount = WinsCount+1)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Variables)

                3 - Select the component (ALL Trim)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (ALL Trim)

                Note : Stop typing when you see the required component is selected

s188.JPG

Fig. (188) Component Browser – Select the component (ALL Trim)

After selecting the component click Ok or press ENTER

s189.JPG

Fig. (189) Interaction page - Set the properties and enter the required data as in the image above

s190.JPG

Fig. (190) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Variables)

                3 - Select the component (Assignment)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Assignment)

                Note : Stop typing when you see the required component is selected

s191.JPG

Fig. (191) Component Browser – Select the component (Assignment)

After selecting the component click Ok or press ENTER

s192.JPG

Fig. (192) Interaction page - Set the properties and enter the required data as in the image above

s193.JPG

Fig. (193) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Variables)

                3 - Select the component (Assignment)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Assignment)

                Note : Stop typing when you see the required component is selected

s194.JPG

Fig. (194) Component Browser – Select the component (Assignment)

After selecting the component click Ok or press ENTER

s195.JPG

Fig. (195) Interaction page - Set the properties and enter the required data as in the image above

s196.JPG

Fig. (196) Goal Desginer - Steps Tree

Select the step (Event Blocks)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Variables)

                3 - Select the component (Assignment)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Assignment)

                Note : Stop typing when you see the required component is selected

s197.JPG

Fig. (197) Component Browser – Select the component (Assignment)

After selecting the component click Ok or press ENTER

s198.JPG

Fig. (198) Interaction page - Set the properties and enter the required data as in the image above

s199.JPG

Fig. (199) Goal Desginer - Steps Tree

Select the step (Event Blocks)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Variables)

                3 - Select the component (Assignment)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Assignment)

                Note : Stop typing when you see the required component is selected

s200.JPG

Fig. (200) Component Browser – Select the component (Assignment)

After selecting the component click Ok or press ENTER

s201.JPG

Fig. (201) Interaction page - Set the properties and enter the required data as in the image above

s202.JPG

Fig. (202) Goal Desginer - Steps Tree

Select the step (Event Blocks)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Variables)

                3 - Select the component (Assignment)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Assignment)

                Note : Stop typing when you see the required component is selected

s203.JPG

Fig. (203) Component Browser – Select the component (Assignment)

After selecting the component click Ok or press ENTER

s204.JPG

Fig. (204) Interaction page - Set the properties and enter the required data as in the image above

s205.JPG

Fig. (205) Goal Desginer - Steps Tree

Select the step (Event Blocks)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Variables)

                3 - Select the component (Assignment)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Assignment)

                Note : Stop typing when you see the required component is selected

s206.JPG

Fig. (206) Component Browser – Select the component (Assignment)

After selecting the component click Ok or press ENTER

s207.JPG

Fig. (207) Interaction page - Set the properties and enter the required data as in the image above

s208.JPG

Fig. (208) Goal Desginer - Steps Tree

Select the step (Event Blocks)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Variables)

                3 - Select the component (Assignment)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Assignment)

                Note : Stop typing when you see the required component is selected

s209.JPG

Fig. (209) Component Browser – Select the component (Assignment)

After selecting the component click Ok or press ENTER

s210.JPG

Fig. (210) Interaction page - Set the properties and enter the required data as in the image above

s211.JPG

Fig. (211) Goal Desginer - Steps Tree

Select the step (Event Blocks)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Variables)

                3 - Select the component (Assignment)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Assignment)

                Note : Stop typing when you see the required component is selected

s212.JPG

Fig. (212) Component Browser – Select the component (Assignment)

After selecting the component click Ok or press ENTER

s213.JPG

Fig. (213) Interaction page - Set the properties and enter the required data as in the image above

s214.JPG

Fig. (214) Goal Desginer - Steps Tree

Select the step (Event Blocks)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Variables)

                3 - Select the component (Assignment)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Assignment)

                Note : Stop typing when you see the required component is selected

s215.JPG

Fig. (215) Component Browser – Select the component (Assignment)

After selecting the component click Ok or press ENTER

s216.JPG

Fig. (216) Interaction page - Set the properties and enter the required data as in the image above

s217.JPG

Fig. (217) Goal Desginer - Steps Tree

Select the step (Event Blocks)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Variables)

                3 - Select the component (Assignment)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Assignment)

                Note : Stop typing when you see the required component is selected

s218.JPG

Fig. (218) Component Browser – Select the component (Assignment)

After selecting the component click Ok or press ENTER

s219.JPG

Fig. (219) Interaction page - Set the properties and enter the required data as in the image above

s220.JPG

Fig. (220) Goal Desginer - Steps Tree

Select the step (Event Blocks)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Variables)

                3 - Select the component (Assignment)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Assignment)

                Note : Stop typing when you see the required component is selected

s221.JPG

Fig. (221) Component Browser – Select the component (Assignment)

After selecting the component click Ok or press ENTER

s222.JPG

Fig. (222) Interaction page - Set the properties and enter the required data as in the image above

s223.JPG

Fig. (223) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Control Structure)

                3 - Select the component (IF Statement)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (IF Statement)

                Note : Stop typing when you see the required component is selected

s224.JPG

Fig. (224) Component Browser – Select the component (IF Statement)

After selecting the component click Ok or press ENTER

s225.JPG

Fig. (225) Interaction page - Set the properties and enter the required data as in the image above

s226.JPG

Fig. (226) Goal Desginer - Steps Tree

Select the step (Window Title Is)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Control Structure)

                3 - Select the component (IF Statement)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (IF Statement)

                Note : Stop typing when you see the required component is selected

s227.JPG

Fig. (227) Component Browser – Select the component (IF Statement)

After selecting the component click Ok or press ENTER

s228.JPG

Fig. (228) Interaction page - Set the properties and enter the required data as in the image above

s229.JPG

Fig. (229) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Structure Programming)

                3 - Select the component (Call Procedure)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Call Procedure)

                Note : Stop typing when you see the required component is selected

s230.JPG

Fig. (230) Component Browser – Select the component (Call Procedure)

After selecting the component click Ok or press ENTER

s231.JPG

Fig. (231) Interaction page - Set the properties and enter the required data as in the image above

s232.JPG

Fig. (232) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Structure Programming)

                3 - Select the component (Return Value)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Return Value)

                Note : Stop typing when you see the required component is selected

s233.JPG

Fig. (233) Component Browser – Select the component (Return Value)

After selecting the component click Ok or press ENTER

s234.JPG

Fig. (234) Interaction page - Set the properties and enter the required data as in the image above

s235.JPG

Fig. (235) Goal Desginer - Steps Tree

Select the step (Window Direction Is)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Control Structure)

                3 - Select the component (IF Statement)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (IF Statement)

                Note : Stop typing when you see the required component is selected

s236.JPG

Fig. (236) Component Browser – Select the component (IF Statement)

After selecting the component click Ok or press ENTER

s237.JPG

Fig. (237) Interaction page - Set the properties and enter the required data as in the image above

s238.JPG

Fig. (238) Goal Desginer - Steps Tree

Select the step (Window Backcolor is)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Control Structure)

                3 - Select the component (IF Statement)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (IF Statement)

                Note : Stop typing when you see the required component is selected

s239.JPG

Fig. (239) Component Browser – Select the component (IF Statement)

After selecting the component click Ok or press ENTER

s240.JPG

Fig. (240) Interaction page - Set the properties and enter the required data as in the image above

s241.JPG

Fig. (241) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Variables)

                3 - Select the component (Assignment)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Assignment)

                Note : Stop typing when you see the required component is selected

s242.JPG

Fig. (242) Component Browser – Select the component (Assignment)

After selecting the component click Ok or press ENTER

s243.JPG

Fig. (243) Interaction page - Set the properties and enter the required data as in the image above

s244.JPG

Fig. (244) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Variables)

                3 - Select the component (Assignment)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Assignment)

                Note : Stop typing when you see the required component is selected

s245.JPG

Fig. (245) Component Browser – Select the component (Assignment)

After selecting the component click Ok or press ENTER

s246.JPG

Fig. (246) Interaction page - Set the properties and enter the required data as in the image above

s247.JPG

Fig. (247) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Structure Programming)

                3 - Select the component (Call Procedure)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Call Procedure)

                Note : Stop typing when you see the required component is selected

s248.JPG

Fig. (248) Component Browser – Select the component (Call Procedure)

After selecting the component click Ok or press ENTER

s249.JPG

Fig. (249) Interaction page - Set the properties and enter the required data as in the image above

s250.JPG

Fig. (250) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Structure Programming)

                3 - Select the component (Return Value)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Return Value)

                Note : Stop typing when you see the required component is selected

s251.JPG

Fig. (251) Component Browser – Select the component (Return Value)

After selecting the component click Ok or press ENTER

s252.JPG

Fig. (252) Interaction page - Set the properties and enter the required data as in the image above

s454.JPG

Fig. (454) Goal Desginer - Steps Tree

Select the step (Window Top is)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Control Structure)

                3 - Select the component (IF Statement)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (IF Statement)

                Note : Stop typing when you see the required component is selected

s254.JPG

Fig. (254) Component Browser – Select the component (IF Statement)

After selecting the component click Ok or press ENTER

s255.JPG

Fig. (255) Interaction page - Set the properties and enter the required data as in the image above

s256.JPG

Fig. (256) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Structure Programming)

                3 - Select the component (Call Procedure)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Call Procedure)

                Note : Stop typing when you see the required component is selected

s257.JPG

Fig. (257) Component Browser – Select the component (Call Procedure)

After selecting the component click Ok or press ENTER

s258.JPG

Fig. (258) Interaction page - Set the properties and enter the required data as in the image above

s259.JPG

Fig. (259) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Structure Programming)

                3 - Select the component (Return Value)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Return Value)

                Note : Stop typing when you see the required component is selected

s260.JPG

Fig. (260) Component Browser – Select the component (Return Value)

After selecting the component click Ok or press ENTER

s261.JPG

Fig. (261) Interaction page - Set the properties and enter the required data as in the image above

s262.JPG

Fig. (262) Goal Desginer - Steps Tree

Select the step (Window Left is)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Control Structure)

                3 - Select the component (IF Statement)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (IF Statement)

                Note : Stop typing when you see the required component is selected

s263.JPG

Fig. (263) Component Browser – Select the component (IF Statement)

After selecting the component click Ok or press ENTER

s264.JPG

Fig. (264) Interaction page - Set the properties and enter the required data as in the image above

s265.JPG

Fig. (265) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Structure Programming)

                3 - Select the component (Call Procedure)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Call Procedure)

                Note : Stop typing when you see the required component is selected

s266.JPG

Fig. (266) Component Browser – Select the component (Call Procedure)

After selecting the component click Ok or press ENTER

s267.JPG

Fig. (267) Interaction page - Set the properties and enter the required data as in the image above

s268.JPG

Fig. (268) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Structure Programming)

                3 - Select the component (Return Value)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Return Value)

                Note : Stop typing when you see the required component is selected

s269.JPG

Fig. (269) Component Browser – Select the component (Return Value)

After selecting the component click Ok or press ENTER

s270.JPG

Fig. (270) Interaction page - Set the properties and enter the required data as in the image above

s271.JPG

Fig. (271) Goal Desginer - Steps Tree

Select the step (Window Width is)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Control Structure)

                3 - Select the component (IF Statement)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (IF Statement)

                Note : Stop typing when you see the required component is selected

s272.JPG

Fig. (272) Component Browser – Select the component (IF Statement)

After selecting the component click Ok or press ENTER

s273.JPG

Fig. (273) Interaction page - Set the properties and enter the required data as in the image above

s274.JPG

Fig. (274) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Structure Programming)

                3 - Select the component (Call Procedure)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Call Procedure)

                Note : Stop typing when you see the required component is selected

s275.JPG

Fig. (275) Component Browser – Select the component (Call Procedure)

After selecting the component click Ok or press ENTER

s276.JPG

Fig. (276) Interaction page - Set the properties and enter the required data as in the image above

s277.JPG

Fig. (277) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Structure Programming)

                3 - Select the component (Return Value)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Return Value)

                Note : Stop typing when you see the required component is selected

s278.JPG

Fig. (278) Component Browser – Select the component (Return Value)

After selecting the component click Ok or press ENTER

s279.JPG

Fig. (279) Interaction page - Set the properties and enter the required data as in the image above

s280.JPG

Fig. (280) Goal Desginer - Steps Tree

Select the step (Window Height is)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Control Structure)

                3 - Select the component (IF Statement)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (IF Statement)

                Note : Stop typing when you see the required component is selected

s281.JPG

Fig. (281) Component Browser – Select the component (IF Statement)

After selecting the component click Ok or press ENTER

s282.JPG

Fig. (282) Interaction page - Set the properties and enter the required data as in the image above

s283.JPG

Fig. (283) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Structure Programming)

                3 - Select the component (Call Procedure)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Call Procedure)

                Note : Stop typing when you see the required component is selected

s284.JPG

Fig. (284) Component Browser – Select the component (Call Procedure)

After selecting the component click Ok or press ENTER

s285.JPG

Fig. (285) Interaction page - Set the properties and enter the required data as in the image above

s286.JPG

Fig. (286) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Structure Programming)

                3 - Select the component (Return Value)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Return Value)

                Note : Stop typing when you see the required component is selected

s287.JPG

Fig. (287) Component Browser – Select the component (Return Value)

After selecting the component click Ok or press ENTER

s288.JPG

Fig. (288) Interaction page - Set the properties and enter the required data as in the image above

s289.JPG

Fig. (289) Goal Desginer - Steps Tree

Select the step (You Maximize Window)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Control Structure)

                3 - Select the component (IF Statement)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (IF Statement)

                Note : Stop typing when you see the required component is selected

s290.JPG

Fig. (290) Component Browser – Select the component (IF Statement)

After selecting the component click Ok or press ENTER

s291.JPG

Fig. (291) Interaction page - Set the properties and enter the required data as in the image above

s292.JPG

Fig. (292) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Structure Programming)

                3 - Select the component (Call Procedure)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Call Procedure)

                Note : Stop typing when you see the required component is selected

s293.JPG

Fig. (293) Component Browser – Select the component (Call Procedure)

After selecting the component click Ok or press ENTER

s294.JPG

Fig. (294) Interaction page - Set the properties and enter the required data as in the image above

s295.JPG

Fig. (295) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Structure Programming)

                3 - Select the component (Return Value)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Return Value)

                Note : Stop typing when you see the required component is selected

s296.JPG

Fig. (296) Component Browser – Select the component (Return Value)

After selecting the component click Ok or press ENTER

s297.JPG

Fig. (297) Interaction page - Set the properties and enter the required data as in the image above

s298.JPG

Fig. (298) Goal Desginer - Steps Tree

Select the step (You Minimize Window)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Control Structure)

                3 - Select the component (IF Statement)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (IF Statement)

                Note : Stop typing when you see the required component is selected

s299.JPG

Fig. (299) Component Browser – Select the component (IF Statement)

After selecting the component click Ok or press ENTER

s300.JPG

Fig. (300) Interaction page - Set the properties and enter the required data as in the image above

s301.JPG

Fig. (301) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Structure Programming)

                3 - Select the component (Call Procedure)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Call Procedure)

                Note : Stop typing when you see the required component is selected

s302.JPG

Fig. (302) Component Browser – Select the component (Call Procedure)

After selecting the component click Ok or press ENTER

s303.JPG

Fig. (303) Interaction page - Set the properties and enter the required data as in the image above

s304.JPG

Fig. (304) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Structure Programming)

                3 - Select the component (Return Value)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Return Value)

                Note : Stop typing when you see the required component is selected

s305.JPG

Fig. (305) Component Browser – Select the component (Return Value)

After selecting the component click Ok or press ENTER

s306.JPG

Fig. (306) Interaction page - Set the properties and enter the required data as in the image above

s307.JPG

Fig. (307) Goal Desginer - Steps Tree

Select the step (You Centre Window)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Control Structure)

                3 - Select the component (IF Statement)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (IF Statement)

                Note : Stop typing when you see the required component is selected

s308.JPG

Fig. (308) Component Browser – Select the component (IF Statement)

After selecting the component click Ok or press ENTER

s309.JPG

Fig. (309) Interaction page - Set the properties and enter the required data as in the image above

s310.JPG

Fig. (310) Goal Desginer - Steps Tree

Select the step (You Show Window)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Control Structure)

                3 - Select the component (IF Statement)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (IF Statement)

                Note : Stop typing when you see the required component is selected

s311.JPG

Fig. (311) Component Browser – Select the component (IF Statement)

After selecting the component click Ok or press ENTER

s312.JPG

Fig. (312) Interaction page - Set the properties and enter the required data as in the image above

s313.JPG

Fig. (313) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Structure Programming)

                3 - Select the component (Call Procedure)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Call Procedure)

                Note : Stop typing when you see the required component is selected

s314.JPG

Fig. (314) Component Browser – Select the component (Call Procedure)

After selecting the component click Ok or press ENTER

s315.JPG

Fig. (315) Interaction page - Set the properties and enter the required data as in the image above

s316.JPG

Fig. (316) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Structure Programming)

                3 - Select the component (Return Value)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Return Value)

                Note : Stop typing when you see the required component is selected

s317.JPG

Fig. (317) Component Browser – Select the component (Return Value)

After selecting the component click Ok or press ENTER

s318.JPG

Fig. (318) Interaction page - Set the properties and enter the required data as in the image above

s319.JPG

Fig. (319) Goal Desginer - Steps Tree

Select the step (You Hide Window)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Control Structure)

                3 - Select the component (IF Statement)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (IF Statement)

                Note : Stop typing when you see the required component is selected

s320.JPG

Fig. (320) Component Browser – Select the component (IF Statement)

After selecting the component click Ok or press ENTER

s321.JPG

Fig. (321) Interaction page - Set the properties and enter the required data as in the image above

s322.JPG

Fig. (322) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Structure Programming)

                3 - Select the component (Call Procedure)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Call Procedure)

                Note : Stop typing when you see the required component is selected

s323.JPG

Fig. (323) Component Browser – Select the component (Call Procedure)

After selecting the component click Ok or press ENTER

s324.JPG

Fig. (324) Interaction page - Set the properties and enter the required data as in the image above

s325.JPG

Fig. (325) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Structure Programming)

                3 - Select the component (Return Value)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Return Value)

                Note : Stop typing when you see the required component is selected

s326.JPG

Fig. (326) Component Browser – Select the component (Return Value)

After selecting the component click Ok or press ENTER

s327.JPG

Fig. (327) Interaction page - Set the properties and enter the required data as in the image above

s328.JPG

Fig. (328) Goal Desginer - Steps Tree

Select the step (You Close Window)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Control Structure)

                3 - Select the component (IF Statement)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (IF Statement)

                Note : Stop typing when you see the required component is selected

s329.JPG

Fig. (329) Component Browser – Select the component (IF Statement)

After selecting the component click Ok or press ENTER

s330.JPG

Fig. (330) Interaction page - Set the properties and enter the required data as in the image above

s331.JPG

Fig. (331) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Structure Programming)

                3 - Select the component (Call Procedure)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Call Procedure)

                Note : Stop typing when you see the required component is selected

s332.JPG

Fig. (332) Component Browser – Select the component (Call Procedure)

After selecting the component click Ok or press ENTER

s333.JPG

Fig. (333) Interaction page - Set the properties and enter the required data as in the image above

s334.JPG

Fig. (334) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Structure Programming)

                3 - Select the component (Return Value)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Return Value)

                Note : Stop typing when you see the required component is selected

s335.JPG

Fig. (335) Component Browser – Select the component (Return Value)

After selecting the component click Ok or press ENTER

s336.JPG

Fig. (336) Interaction page - Set the properties and enter the required data as in the image above

s337.JPG

Fig. (337) Goal Desginer - Steps Tree

Select the step (Window Name Is)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Control Structure)

                3 - Select the component (IF Statement)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (IF Statement)

                Note : Stop typing when you see the required component is selected

s338.JPG

Fig. (338) Component Browser – Select the component (IF Statement)

After selecting the component click Ok or press ENTER

s339.JPG

Fig. (339) Interaction page - Set the properties and enter the required data as in the image above

s340.JPG

Fig. (340) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Variables)

                3 - Select the component (Get String/Variable/Array Length)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Get String/Variable/Array Length)

                Note : Stop typing when you see the required component is selected

s341.JPG

Fig. (341) Component Browser – Select the component (Get String/Variable/Array Length)

After selecting the component click Ok or press ENTER

s342.JPG

Fig. (342) Interaction page - Set the properties and enter the required data as in the image above

s343.JPG

Fig. (343) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Control Structure)

                3 - Select the component (For Loop)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (For Loop)

                Note : Stop typing when you see the required component is selected

s344.JPG

Fig. (344) Component Browser – Select the component (For Loop)

After selecting the component click Ok or press ENTER

s345.JPG

Fig. (345) Interaction page - Set the properties and enter the required data as in the image above

s346.JPG

Fig. (346) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Control Structure)

                3 - Select the component (IF Statement)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (IF Statement)

                Note : Stop typing when you see the required component is selected

s347.JPG

Fig. (347) Component Browser – Select the component (IF Statement)

After selecting the component click Ok or press ENTER

s348.JPG

Fig. (348) Interaction page - Set the properties and enter the required data as in the image above

s349.JPG

Fig. (349) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Control Structure)

                3 - Select the component (IF Statement)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (IF Statement)

                Note : Stop typing when you see the required component is selected

s350.JPG

Fig. (350) Component Browser – Select the component (IF Statement)

After selecting the component click Ok or press ENTER

s351.JPG

Fig. (351) Interaction page - Set the properties and enter the required data as in the image above

s352.JPG

Fig. (352) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Variables)

                3 - Select the component (Assignment)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Assignment)

                Note : Stop typing when you see the required component is selected

s353.JPG

Fig. (353) Component Browser – Select the component (Assignment)

After selecting the component click Ok or press ENTER

s354.JPG

Fig. (354) Interaction page - Set the properties and enter the required data as in the image above

s355.JPG

Fig. (355) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Control Structure)

                3 - Select the component (Exit)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Exit)

                Note : Stop typing when you see the required component is selected

s356.JPG

Fig. (356) Component Browser – Select the component (Exit)

After selecting the component click Ok or press ENTER

s357.JPG

Fig. (357) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Structure Programming)

                3 - Select the component (Return Value)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Return Value)

                Note : Stop typing when you see the required component is selected

s358.JPG

Fig. (358) Component Browser – Select the component (Return Value)

After selecting the component click Ok or press ENTER

s359.JPG

Fig. (359) Interaction page - Set the properties and enter the required data as in the image above

s360.JPG

Fig. (360) Goal Desginer - Steps Tree

Select the step (Window Selected)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Control Structure)

                3 - Select the component (IF Statement)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (IF Statement)

                Note : Stop typing when you see the required component is selected

s361.JPG

Fig. (361) Component Browser – Select the component (IF Statement)

After selecting the component click Ok or press ENTER

s362.JPG

Fig. (362) Interaction page - Set the properties and enter the required data as in the image above

s363.JPG

Fig. (363) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Variables)

                3 - Select the component (Assignment)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Assignment)

                Note : Stop typing when you see the required component is selected

s364.JPG

Fig. (364) Component Browser – Select the component (Assignment)

After selecting the component click Ok or press ENTER

s365.JPG

Fig. (365) Interaction page - Set the properties and enter the required data as in the image above

s366.JPG

Fig. (366) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Variables)

                3 - Select the component (Get String/Variable/Array Length)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Get String/Variable/Array Length)

                Note : Stop typing when you see the required component is selected

s367.JPG

Fig. (367) Component Browser – Select the component (Get String/Variable/Array Length)

After selecting the component click Ok or press ENTER

s368.JPG

Fig. (368) Interaction page - Set the properties and enter the required data as in the image above

s369.JPG

Fig. (369) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Control Structure)

                3 - Select the component (For Loop)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (For Loop)

                Note : Stop typing when you see the required component is selected

s370.JPG

Fig. (370) Component Browser – Select the component (For Loop)

After selecting the component click Ok or press ENTER

s371.JPG

Fig. (371) Interaction page - Set the properties and enter the required data as in the image above

s372.JPG

Fig. (372) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Control Structure)

                3 - Select the component (IF Statement)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (IF Statement)

                Note : Stop typing when you see the required component is selected

s373.JPG

Fig. (373) Component Browser – Select the component (IF Statement)

After selecting the component click Ok or press ENTER

s374.JPG

Fig. (374) Interaction page - Set the properties and enter the required data as in the image above

s375.JPG

Fig. (375) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Control Structure)

                3 - Select the component (IF Statement)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (IF Statement)

                Note : Stop typing when you see the required component is selected

s376.JPG

Fig. (376) Component Browser – Select the component (IF Statement)

After selecting the component click Ok or press ENTER

s377.JPG

Fig. (377) Interaction page - Set the properties and enter the required data as in the image above

s378.JPG

Fig. (378) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Variables)

                3 - Select the component (Assignment)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Assignment)

                Note : Stop typing when you see the required component is selected

s379.JPG

Fig. (379) Component Browser – Select the component (Assignment)

After selecting the component click Ok or press ENTER

s380.JPG

Fig. (380) Interaction page - Set the properties and enter the required data as in the image above

s381.JPG

Fig. (381) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Control Structure)

                3 - Select the component (Exit)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Exit)

                Note : Stop typing when you see the required component is selected

s382.JPG

Fig. (382) Component Browser – Select the component (Exit)

After selecting the component click Ok or press ENTER

s383.JPG

Fig. (383) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Control Structure)

                3 - Select the component (IF Statement)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (IF Statement)

                Note : Stop typing when you see the required component is selected

s384.JPG

Fig. (384) Component Browser – Select the component (IF Statement)

After selecting the component click Ok or press ENTER

s385.JPG

Fig. (385) Interaction page - Set the properties and enter the required data as in the image above

s386.JPG

Fig. (386) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (GUI Application)

                3 - Select the component (Show Message)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Show Message)

                Note : Stop typing when you see the required component is selected

s387.JPG

Fig. (387) Component Browser – Select the component (Show Message)

After selecting the component click Ok or press ENTER

s388.JPG

Fig. (388) Interaction page - Set the properties and enter the required data as in the image above

s389.JPG

Fig. (389) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Variables)

                3 - Select the component (Assignment)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Assignment)

                Note : Stop typing when you see the required component is selected

s390.JPG

Fig. (390) Component Browser – Select the component (Assignment)

After selecting the component click Ok or press ENTER

s391.JPG

Fig. (391) Interaction page - Set the properties and enter the required data as in the image above

s392.JPG

Fig. (392) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Structure Programming)

                3 - Select the component (Return Value)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Return Value)

                Note : Stop typing when you see the required component is selected

s393.JPG

Fig. (393) Component Browser – Select the component (Return Value)

After selecting the component click Ok or press ENTER

s394.JPG

Fig. (394) Interaction page - Set the properties and enter the required data as in the image above

s395.JPG

Fig. (395) Goal Desginer - Steps Tree

Select the step (You Close Application)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Control Structure)

                3 - Select the component (IF Statement)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (IF Statement)

                Note : Stop typing when you see the required component is selected

s396.JPG

Fig. (396) Component Browser – Select the component (IF Statement)

After selecting the component click Ok or press ENTER

s397.JPG

Fig. (397) Interaction page - Set the properties and enter the required data as in the image above

s398.JPG

Fig. (398) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Variables)

                3 - Select the component (Assignment)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Assignment)

                Note : Stop typing when you see the required component is selected

s399.JPG

Fig. (399) Component Browser – Select the component (Assignment)

After selecting the component click Ok or press ENTER

s400.JPG

Fig. (400) Interaction page - Set the properties and enter the required data as in the image above

s401.JPG

Fig. (401) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Variables)

                3 - Select the component (Assignment)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Assignment)

                Note : Stop typing when you see the required component is selected

s402.JPG

Fig. (402) Component Browser – Select the component (Assignment)

After selecting the component click Ok or press ENTER

s403.JPG

Fig. (403) Interaction page - Set the properties and enter the required data as in the image above

s404.JPG

Fig. (404) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Structure Programming)

                3 - Select the component (Return Value)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Return Value)

                Note : Stop typing when you see the required component is selected

s405.JPG

Fig. (405) Component Browser – Select the component (Return Value)

After selecting the component click Ok or press ENTER

s406.JPG

Fig. (406) Interaction page - Set the properties and enter the required data as in the image above

s407.JPG

Fig. (407) Goal Desginer - Steps Tree

Select the step (Window Title from)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Control Structure)

                3 - Select the component (IF Statement)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (IF Statement)

                Note : Stop typing when you see the required component is selected

s408.JPG

Fig. (408) Component Browser – Select the component (IF Statement)

After selecting the component click Ok or press ENTER

s409.JPG

Fig. (409) Interaction page - Set the properties and enter the required data as in the image above

s410.JPG

Fig. (410) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Structure Programming)

                3 - Select the component (Call Procedure)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Call Procedure)

                Note : Stop typing when you see the required component is selected

s411.JPG

Fig. (411) Component Browser – Select the component (Call Procedure)

After selecting the component click Ok or press ENTER

s412.JPG

Fig. (412) Interaction page - Set the properties and enter the required data as in the image above

s413.JPG

Fig. (413) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Structure Programming)

                3 - Select the component (Call Function)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Call Function)

                Note : Stop typing when you see the required component is selected

s414.JPG

Fig. (414) Component Browser – Select the component (Call Function)

After selecting the component click Ok or press ENTER

s415.JPG

Fig. (415) Interaction page - Set the properties and enter the required data as in the image above

s416.JPG

Fig. (416) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Structure Programming)

                3 - Select the component (Call Procedure)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Call Procedure)

                Note : Stop typing when you see the required component is selected

s417.JPG

Fig. (417) Component Browser – Select the component (Call Procedure)

After selecting the component click Ok or press ENTER

s418.JPG

Fig. (418) Interaction page - Set the properties and enter the required data as in the image above

s419.JPG

Fig. (419) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Structure Programming)

                3 - Select the component (Return Value)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Return Value)

                Note : Stop typing when you see the required component is selected

s420.JPG

Fig. (420) Component Browser – Select the component (Return Value)

After selecting the component click Ok or press ENTER

s421.JPG

Fig. (421) Interaction page - Set the properties and enter the required data as in the image above

s422.JPG

Fig. (422) Goal Desginer - Steps Tree

Select the step (Window Title to)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Control Structure)

                3 - Select the component (IF Statement)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (IF Statement)

                Note : Stop typing when you see the required component is selected

s423.JPG

Fig. (423) Component Browser – Select the component (IF Statement)

After selecting the component click Ok or press ENTER

s424.JPG

Fig. (424) Interaction page - Set the properties and enter the required data as in the image above

s425.JPG

Fig. (425) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Structure Programming)

                3 - Select the component (Call Function)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Call Function)

                Note : Stop typing when you see the required component is selected

s426.JPG

Fig. (426) Component Browser – Select the component (Call Function)

After selecting the component click Ok or press ENTER

s427.JPG

Fig. (427) Interaction page - Set the properties and enter the required data as in the image above

s428.JPG

Fig. (428) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Structure Programming)

                3 - Select the component (Call Procedure)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Call Procedure)

                Note : Stop typing when you see the required component is selected

s429.JPG

Fig. (429) Component Browser – Select the component (Call Procedure)

After selecting the component click Ok or press ENTER

s430.JPG

Fig. (430) Interaction page - Set the properties and enter the required data as in the image above

s431.JPG

Fig. (431) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Structure Programming)

                3 - Select the component (Return Value)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Return Value)

                Note : Stop typing when you see the required component is selected

s432.JPG

Fig. (432) Component Browser – Select the component (Return Value)

After selecting the component click Ok or press ENTER

s433.JPG

Fig. (433) Interaction page - Set the properties and enter the required data as in the image above

s434.JPG

Fig. (434) Goal Desginer - Steps Tree

Select the step (Window Parent is)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Control Structure)

                3 - Select the component (IF Statement)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (IF Statement)

                Note : Stop typing when you see the required component is selected

s435.JPG

Fig. (435) Component Browser – Select the component (IF Statement)

After selecting the component click Ok or press ENTER

s436.JPG

Fig. (436) Interaction page - Set the properties and enter the required data as in the image above

s437.JPG

Fig. (437) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Variables)

                3 - Select the component (Get String/Variable/Array Length)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Get String/Variable/Array Length)

                Note : Stop typing when you see the required component is selected

s438.JPG

Fig. (438) Component Browser – Select the component (Get String/Variable/Array Length)

After selecting the component click Ok or press ENTER

s439.JPG

Fig. (439) Interaction page - Set the properties and enter the required data as in the image above

s440.JPG

Fig. (440) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Control Structure)

                3 - Select the component (For Loop)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (For Loop)

                Note : Stop typing when you see the required component is selected

s441.JPG

Fig. (441) Component Browser – Select the component (For Loop)

After selecting the component click Ok or press ENTER

s442.JPG

Fig. (442) Interaction page - Set the properties and enter the required data as in the image above

s443.JPG

Fig. (443) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Control Structure)

                3 - Select the component (IF Statement)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (IF Statement)

                Note : Stop typing when you see the required component is selected

s444.JPG

Fig. (444) Component Browser – Select the component (IF Statement)

After selecting the component click Ok or press ENTER

s445.JPG

Fig. (445) Interaction page - Set the properties and enter the required data as in the image above

s446.JPG

Fig. (446) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Control Structure)

                3 - Select the component (IF Statement)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (IF Statement)

                Note : Stop typing when you see the required component is selected

s447.JPG

Fig. (447) Component Browser – Select the component (IF Statement)

After selecting the component click Ok or press ENTER

s448.JPG

Fig. (448) Interaction page - Set the properties and enter the required data as in the image above

s449.JPG

Fig. (449) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Variables)

                3 - Select the component (Assignment)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Assignment)

                Note : Stop typing when you see the required component is selected

s450.JPG

Fig. (450) Component Browser – Select the component (Assignment)

After selecting the component click Ok or press ENTER

s451.JPG

Fig. (451) Interaction page - Set the properties and enter the required data as in the image above

s452.JPG

Fig. (452) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Windows)

                3 - Select the component (Get Window Handle)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Get Window Handle)

                Note : Stop typing when you see the required component is selected

s453.JPG

Fig. (453) Component Browser – Select the component (Get Window Handle)

After selecting the component click Ok or press ENTER

s454.JPG

Fig. (454) Interaction page - Set the properties and enter the required data as in the image above

s455.JPG

Fig. (455) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Windows)

                3 - Select the component (Get Window Handle)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Get Window Handle)

                Note : Stop typing when you see the required component is selected

s456.JPG

Fig. (456) Component Browser – Select the component (Get Window Handle)

After selecting the component click Ok or press ENTER

s457.JPG

Fig. (457) Interaction page - Set the properties and enter the required data as in the image above

s458.JPG

Fig. (458) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Tools & Extensions)

                3 - Select the component (Call DLL 32)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Call DLL 32)

                Note : Stop typing when you see the required component is selected

s459.JPG

Fig. (459) Component Browser – Select the component (Call DLL 32)

After selecting the component click Ok or press ENTER

s460.JPG

Fig. (460) Interaction page - Set the properties and enter the required data as in the image above

s461.JPG

Fig. (461) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Structure Programming)

                3 - Select the component (Return Value)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Return Value)

                Note : Stop typing when you see the required component is selected

s462.JPG

Fig. (462) Component Browser – Select the component (Return Value)

After selecting the component click Ok or press ENTER

s463.JPG

Fig. (463) Interaction page - Set the properties and enter the required data as in the image above

s464.JPG

Fig. (464) Goal Desginer - Steps Tree

Select the step (Application Title Is)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Control Structure)

                3 - Select the component (IF Statement)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (IF Statement)

                Note : Stop typing when you see the required component is selected

s465.JPG

Fig. (465) Component Browser – Select the component (IF Statement)

After selecting the component click Ok or press ENTER

s466.JPG

Fig. (466) Interaction page - Set the properties and enter the required data as in the image above

s467.JPG

Fig. (467) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Structure Programming)

                3 - Select the component (Call Procedure)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Call Procedure)

                Note : Stop typing when you see the required component is selected

s468.JPG

Fig. (468) Component Browser – Select the component (Call Procedure)

After selecting the component click Ok or press ENTER

s469.JPG

Fig. (469) Interaction page - Set the properties and enter the required data as in the image above

s470.JPG

Fig. (470) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Structure Programming)

                3 - Select the component (Return Value)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Return Value)

                Note : Stop typing when you see the required component is selected

s471.JPG

Fig. (471) Component Browser – Select the component (Return Value)

After selecting the component click Ok or press ENTER

s472.JPG

Fig. (472) Interaction page - Set the properties and enter the required data as in the image above

s473.JPG

Fig. (473) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Control Structure)

                3 - Select the component (For Loop)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (For Loop)

                Note : Stop typing when you see the required component is selected

s474.JPG

Fig. (474) Component Browser – Select the component (For Loop)

After selecting the component click Ok or press ENTER

s475.JPG

Fig. (475) Interaction page - Set the properties and enter the required data as in the image above

s476.JPG

Fig. (476) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Control Structure)

                3 - Select the component (IF Statement)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (IF Statement)

                Note : Stop typing when you see the required component is selected

s477.JPG

Fig. (477) Component Browser – Select the component (IF Statement)

After selecting the component click Ok or press ENTER

s478.JPG

Fig. (478) Interaction page - Set the properties and enter the required data as in the image above

s479.JPG

Fig. (479) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Control Structure)

                3 - Select the component (IF Statement)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (IF Statement)

                Note : Stop typing when you see the required component is selected

s480.JPG

Fig. (480) Component Browser – Select the component (IF Statement)

After selecting the component click Ok or press ENTER

s481.JPG

Fig. (481) Interaction page - Set the properties and enter the required data as in the image above

s482.JPG

Fig. (482) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Control Structure)

                3 - Select the component (Exit)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Exit)

                Note : Stop typing when you see the required component is selected

s483.JPG

Fig. (483) Component Browser – Select the component (Exit)

After selecting the component click Ok or press ENTER

s484.JPG

Fig. (484) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Variables)

                3 - Select the component (Assignment)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Assignment)

                Note : Stop typing when you see the required component is selected

s485.JPG

Fig. (485) Component Browser – Select the component (Assignment)

After selecting the component click Ok or press ENTER

s486.JPG

Fig. (486) Interaction page - Set the properties and enter the required data as in the image above

s487.JPG

Fig. (487) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Control Structure)

                3 - Select the component (Exit)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Exit)

                Note : Stop typing when you see the required component is selected

s488.JPG

Fig. (488) Component Browser – Select the component (Exit)

After selecting the component click Ok or press ENTER

s489.JPG

Fig. (489) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Variables)

                3 - Select the component (Assignment)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Assignment)

                Note : Stop typing when you see the required component is selected

s490.JPG

Fig. (490) Component Browser – Select the component (Assignment)

After selecting the component click Ok or press ENTER

s491.JPG

Fig. (491) Interaction page - Set the properties and enter the required data as in the image above

s492.JPG

Fig. (492) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Variables)

                3 - Select the component (Sub String Transform)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Sub String Transform)

                Note : Stop typing when you see the required component is selected

s493.JPG

Fig. (493) Component Browser – Select the component (Sub String Transform)

After selecting the component click Ok or press ENTER

s494.JPG

Fig. (494) Interaction page - Set the properties and enter the required data as in the image above

s495.JPG

Fig. (495) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Control Structure)

                3 - Select the component (IF Statement)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (IF Statement)

                Note : Stop typing when you see the required component is selected

s496.JPG

Fig. (496) Component Browser – Select the component (IF Statement)

After selecting the component click Ok or press ENTER

s497.JPG

Fig. (497) Interaction page - Set the properties and enter the required data as in the image above

s498.JPG

Fig. (498) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Windows)

                3 - Select the component (Window/Object Right-To-Left)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Window/Object Right-To-Left)

                Note : Stop typing when you see the required component is selected

s499.JPG

Fig. (499) Component Browser – Select the component (Window/Object Right-To-Left)

After selecting the component click Ok or press ENTER

s500.JPG

Fig. (500) Interaction page - Set the properties and enter the required data as in the image above

s501.JPG

Fig. (501) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Structure Programming)

                3 - Select the component (Return Value)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Return Value)

                Note : Stop typing when you see the required component is selected

s502.JPG

Fig. (502) Component Browser – Select the component (Return Value)

After selecting the component click Ok or press ENTER

s503.JPG

Fig. (503) Interaction page - Set the properties and enter the required data as in the image above

s504.JPG

Fig. (504) Goal Desginer - Steps Tree

Select the step (Button)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Control Structure)

                3 - Select the component (IF Statement)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (IF Statement)

                Note : Stop typing when you see the required component is selected

s505.JPG

Fig. (505) Component Browser – Select the component (IF Statement)

After selecting the component click Ok or press ENTER

s454.JPG

Fig. (454) Interaction page - Set the properties and enter the required data as in the image above

s507.JPG

Fig. (507) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Variables)

                3 - Select the component (Assignment)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Assignment)

                Note : Stop typing when you see the required component is selected

s508.JPG

Fig. (508) Component Browser – Select the component (Assignment)

After selecting the component click Ok or press ENTER

s509.JPG

Fig. (509) Interaction page - Set the properties and enter the required data as in the image above

s510.JPG

Fig. (510) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Variables)

                3 - Select the component (Assignment)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Assignment)

                Note : Stop typing when you see the required component is selected

s511.JPG

Fig. (511) Component Browser – Select the component (Assignment)

After selecting the component click Ok or press ENTER

s512.JPG

Fig. (512) Interaction page - Set the properties and enter the required data as in the image above

s513.JPG

Fig. (513) Goal Desginer - Steps Tree

Select the step (Label)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Control Structure)

                3 - Select the component (IF Statement)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (IF Statement)

                Note : Stop typing when you see the required component is selected

s514.JPG

Fig. (514) Component Browser – Select the component (IF Statement)

After selecting the component click Ok or press ENTER

s515.JPG

Fig. (515) Interaction page - Set the properties and enter the required data as in the image above

s516.JPG

Fig. (516) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Variables)

                3 - Select the component (Assignment)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Assignment)

                Note : Stop typing when you see the required component is selected

s517.JPG

Fig. (517) Component Browser – Select the component (Assignment)

After selecting the component click Ok or press ENTER

s518.JPG

Fig. (518) Interaction page - Set the properties and enter the required data as in the image above

s519.JPG

Fig. (519) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Variables)

                3 - Select the component (Assignment)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Assignment)

                Note : Stop typing when you see the required component is selected

s520.JPG

Fig. (520) Component Browser – Select the component (Assignment)

After selecting the component click Ok or press ENTER

s521.JPG

Fig. (521) Interaction page - Set the properties and enter the required data as in the image above

s522.JPG

Fig. (522) Goal Desginer - Steps Tree

Select the step (Picture)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Control Structure)

                3 - Select the component (IF Statement)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (IF Statement)

                Note : Stop typing when you see the required component is selected

s523.JPG

Fig. (523) Component Browser – Select the component (IF Statement)

After selecting the component click Ok or press ENTER

s524.JPG

Fig. (524) Interaction page - Set the properties and enter the required data as in the image above

s525.JPG

Fig. (525) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Variables)

                3 - Select the component (Assignment)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Assignment)

                Note : Stop typing when you see the required component is selected

s526.JPG

Fig. (526) Component Browser – Select the component (Assignment)

After selecting the component click Ok or press ENTER

s527.JPG

Fig. (527) Interaction page - Set the properties and enter the required data as in the image above

s528.JPG

Fig. (528) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Variables)

                3 - Select the component (Assignment)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Assignment)

                Note : Stop typing when you see the required component is selected

s529.JPG

Fig. (529) Component Browser – Select the component (Assignment)

After selecting the component click Ok or press ENTER

s530.JPG

Fig. (530) Interaction page - Set the properties and enter the required data as in the image above

s531.JPG

Fig. (531) Goal Desginer - Steps Tree

Select the step (Textbox)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Control Structure)

                3 - Select the component (IF Statement)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (IF Statement)

                Note : Stop typing when you see the required component is selected

s532.JPG

Fig. (532) Component Browser – Select the component (IF Statement)

After selecting the component click Ok or press ENTER

s533.JPG

Fig. (533) Interaction page - Set the properties and enter the required data as in the image above

s534.JPG

Fig. (534) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Variables)

                3 - Select the component (Assignment)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Assignment)

                Note : Stop typing when you see the required component is selected

s535.JPG

Fig. (535) Component Browser – Select the component (Assignment)

After selecting the component click Ok or press ENTER

s536.JPG

Fig. (536) Interaction page - Set the properties and enter the required data as in the image above

s537.JPG

Fig. (537) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Variables)

                3 - Select the component (Assignment)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Assignment)

                Note : Stop typing when you see the required component is selected

s538.JPG

Fig. (538) Component Browser – Select the component (Assignment)

After selecting the component click Ok or press ENTER

s539.JPG

Fig. (539) Interaction page - Set the properties and enter the required data as in the image above

s1264.JPG

Fig. (1264) Goal Desginer - Steps Tree

Select the step (Editbox)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Control Structure)

                3 - Select the component (IF Statement)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (IF Statement)

                Note : Stop typing when you see the required component is selected

s541.JPG

Fig. (541) Component Browser – Select the component (IF Statement)

After selecting the component click Ok or press ENTER

s542.JPG

Fig. (542) Interaction page - Set the properties and enter the required data as in the image above

s543.JPG

Fig. (543) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Variables)

                3 - Select the component (Assignment)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Assignment)

                Note : Stop typing when you see the required component is selected

s544.JPG

Fig. (544) Component Browser – Select the component (Assignment)

After selecting the component click Ok or press ENTER

s545.JPG

Fig. (545) Interaction page - Set the properties and enter the required data as in the image above

s546.JPG

Fig. (546) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Variables)

                3 - Select the component (Assignment)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Assignment)

                Note : Stop typing when you see the required component is selected

s547.JPG

Fig. (547) Component Browser – Select the component (Assignment)

After selecting the component click Ok or press ENTER

s548.JPG

Fig. (548) Interaction page - Set the properties and enter the required data as in the image above

s549.JPG

Fig. (549) Goal Desginer - Steps Tree

Select the step (Listbox)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Control Structure)

                3 - Select the component (IF Statement)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (IF Statement)

                Note : Stop typing when you see the required component is selected

s550.JPG

Fig. (550) Component Browser – Select the component (IF Statement)

After selecting the component click Ok or press ENTER

s551.JPG

Fig. (551) Interaction page - Set the properties and enter the required data as in the image above

s552.JPG

Fig. (552) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Variables)

                3 - Select the component (Assignment)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Assignment)

                Note : Stop typing when you see the required component is selected

s553.JPG

Fig. (553) Component Browser – Select the component (Assignment)

After selecting the component click Ok or press ENTER

s554.JPG

Fig. (554) Interaction page - Set the properties and enter the required data as in the image above

s555.JPG

Fig. (555) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Variables)

                3 - Select the component (Assignment)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Assignment)

                Note : Stop typing when you see the required component is selected

s556.JPG

Fig. (556) Component Browser – Select the component (Assignment)

After selecting the component click Ok or press ENTER

s557.JPG

Fig. (557) Interaction page - Set the properties and enter the required data as in the image above

s558.JPG

Fig. (558) Goal Desginer - Steps Tree

Select the step (Combobox)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Control Structure)

                3 - Select the component (IF Statement)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (IF Statement)

                Note : Stop typing when you see the required component is selected

s559.JPG

Fig. (559) Component Browser – Select the component (IF Statement)

After selecting the component click Ok or press ENTER

s560.JPG

Fig. (560) Interaction page - Set the properties and enter the required data as in the image above

s561.JPG

Fig. (561) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Variables)

                3 - Select the component (Assignment)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Assignment)

                Note : Stop typing when you see the required component is selected

s562.JPG

Fig. (562) Component Browser – Select the component (Assignment)

After selecting the component click Ok or press ENTER

s563.JPG

Fig. (563) Interaction page - Set the properties and enter the required data as in the image above

s564.JPG

Fig. (564) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Variables)

                3 - Select the component (Assignment)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Assignment)

                Note : Stop typing when you see the required component is selected

s565.JPG

Fig. (565) Component Browser – Select the component (Assignment)

After selecting the component click Ok or press ENTER

s566.JPG

Fig. (566) Interaction page - Set the properties and enter the required data as in the image above

s567.JPG

Fig. (567) Goal Desginer - Steps Tree

Select the step (Checkbox)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Control Structure)

                3 - Select the component (IF Statement)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (IF Statement)

                Note : Stop typing when you see the required component is selected

s568.JPG

Fig. (568) Component Browser – Select the component (IF Statement)

After selecting the component click Ok or press ENTER

s569.JPG

Fig. (569) Interaction page - Set the properties and enter the required data as in the image above

s570.JPG

Fig. (570) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Variables)

                3 - Select the component (Assignment)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Assignment)

                Note : Stop typing when you see the required component is selected

s571.JPG

Fig. (571) Component Browser – Select the component (Assignment)

After selecting the component click Ok or press ENTER

s572.JPG

Fig. (572) Interaction page - Set the properties and enter the required data as in the image above

s573.JPG

Fig. (573) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Variables)

                3 - Select the component (Assignment)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Assignment)

                Note : Stop typing when you see the required component is selected

s574.JPG

Fig. (574) Component Browser – Select the component (Assignment)

After selecting the component click Ok or press ENTER

s575.JPG

Fig. (575) Interaction page - Set the properties and enter the required data as in the image above

s576.JPG

Fig. (576) Goal Desginer - Steps Tree

Select the step (Progressbar)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Control Structure)

                3 - Select the component (IF Statement)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (IF Statement)

                Note : Stop typing when you see the required component is selected

s577.JPG

Fig. (577) Component Browser – Select the component (IF Statement)

After selecting the component click Ok or press ENTER

s578.JPG

Fig. (578) Interaction page - Set the properties and enter the required data as in the image above

s579.JPG

Fig. (579) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Variables)

                3 - Select the component (Assignment)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Assignment)

                Note : Stop typing when you see the required component is selected

s580.JPG

Fig. (580) Component Browser – Select the component (Assignment)

After selecting the component click Ok or press ENTER

s581.JPG

Fig. (581) Interaction page - Set the properties and enter the required data as in the image above

s582.JPG

Fig. (582) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Variables)

                3 - Select the component (Assignment)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Assignment)

                Note : Stop typing when you see the required component is selected

s583.JPG

Fig. (583) Component Browser – Select the component (Assignment)

After selecting the component click Ok or press ENTER

s584.JPG

Fig. (584) Interaction page - Set the properties and enter the required data as in the image above

s585.JPG

Fig. (585) Goal Desginer - Steps Tree

Select the step (Slider)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Control Structure)

                3 - Select the component (IF Statement)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (IF Statement)

                Note : Stop typing when you see the required component is selected

s586.JPG

Fig. (586) Component Browser – Select the component (IF Statement)

After selecting the component click Ok or press ENTER

s587.JPG

Fig. (587) Interaction page - Set the properties and enter the required data as in the image above

s588.JPG

Fig. (588) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Variables)

                3 - Select the component (Assignment)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Assignment)

                Note : Stop typing when you see the required component is selected

s589.JPG

Fig. (589) Component Browser – Select the component (Assignment)

After selecting the component click Ok or press ENTER

s590.JPG

Fig. (590) Interaction page - Set the properties and enter the required data as in the image above

s591.JPG

Fig. (591) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Variables)

                3 - Select the component (Assignment)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Assignment)

                Note : Stop typing when you see the required component is selected

s592.JPG

Fig. (592) Component Browser – Select the component (Assignment)

After selecting the component click Ok or press ENTER

s593.JPG

Fig. (593) Interaction page - Set the properties and enter the required data as in the image above

s594.JPG

Fig. (594) Goal Desginer - Steps Tree

Select the step (Datepicker)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Control Structure)

                3 - Select the component (IF Statement)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (IF Statement)

                Note : Stop typing when you see the required component is selected

s595.JPG

Fig. (595) Component Browser – Select the component (IF Statement)

After selecting the component click Ok or press ENTER

s596.JPG

Fig. (596) Interaction page - Set the properties and enter the required data as in the image above

s597.JPG

Fig. (597) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Variables)

                3 - Select the component (Assignment)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Assignment)

                Note : Stop typing when you see the required component is selected

s598.JPG

Fig. (598) Component Browser – Select the component (Assignment)

After selecting the component click Ok or press ENTER

s599.JPG

Fig. (599) Interaction page - Set the properties and enter the required data as in the image above

s600.JPG

Fig. (600) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Variables)

                3 - Select the component (Assignment)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Assignment)

                Note : Stop typing when you see the required component is selected

s601.JPG

Fig. (601) Component Browser – Select the component (Assignment)

After selecting the component click Ok or press ENTER

s602.JPG

Fig. (602) Interaction page - Set the properties and enter the required data as in the image above

s603.JPG

Fig. (603) Goal Desginer - Steps Tree

Select the step (Spinner)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Control Structure)

                3 - Select the component (IF Statement)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (IF Statement)

                Note : Stop typing when you see the required component is selected

s604.JPG

Fig. (604) Component Browser – Select the component (IF Statement)

After selecting the component click Ok or press ENTER

s605.JPG

Fig. (605) Interaction page - Set the properties and enter the required data as in the image above

s606.JPG

Fig. (606) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Variables)

                3 - Select the component (Assignment)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Assignment)

                Note : Stop typing when you see the required component is selected

s607.JPG

Fig. (607) Component Browser – Select the component (Assignment)

After selecting the component click Ok or press ENTER

s608.JPG

Fig. (608) Interaction page - Set the properties and enter the required data as in the image above

s609.JPG

Fig. (609) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Variables)

                3 - Select the component (Assignment)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Assignment)

                Note : Stop typing when you see the required component is selected

s610.JPG

Fig. (610) Component Browser – Select the component (Assignment)

After selecting the component click Ok or press ENTER

s611.JPG

Fig. (611) Interaction page - Set the properties and enter the required data as in the image above

s612.JPG

Fig. (612) Goal Desginer - Steps Tree

Select the step (Hyperlink)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Control Structure)

                3 - Select the component (IF Statement)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (IF Statement)

                Note : Stop typing when you see the required component is selected

s613.JPG

Fig. (613) Component Browser – Select the component (IF Statement)

After selecting the component click Ok or press ENTER

s614.JPG

Fig. (614) Interaction page - Set the properties and enter the required data as in the image above

s615.JPG

Fig. (615) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Variables)

                3 - Select the component (Assignment)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Assignment)

                Note : Stop typing when you see the required component is selected

s616.JPG

Fig. (616) Component Browser – Select the component (Assignment)

After selecting the component click Ok or press ENTER

s617.JPG

Fig. (617) Interaction page - Set the properties and enter the required data as in the image above

s618.JPG

Fig. (618) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Variables)

                3 - Select the component (Assignment)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Assignment)

                Note : Stop typing when you see the required component is selected

s619.JPG

Fig. (619) Component Browser – Select the component (Assignment)

After selecting the component click Ok or press ENTER

s620.JPG

Fig. (620) Interaction page - Set the properties and enter the required data as in the image above

s621.JPG

Fig. (621) Goal Desginer - Steps Tree

Select the step (You show statusbar : Doesn't work)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Control Structure)

                3 - Select the component (IF Statement)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (IF Statement)

                Note : Stop typing when you see the required component is selected

s622.JPG

Fig. (622) Component Browser – Select the component (IF Statement)

After selecting the component click Ok or press ENTER

s623.JPG

Fig. (623) Interaction page - Set the properties and enter the required data as in the image above

s624.JPG

Fig. (624) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Variables)

                3 - Select the component (Get String/Variable/Array Length)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Get String/Variable/Array Length)

                Note : Stop typing when you see the required component is selected

s625.JPG

Fig. (625) Component Browser – Select the component (Get String/Variable/Array Length)

After selecting the component click Ok or press ENTER

s626.JPG

Fig. (626) Interaction page - Set the properties and enter the required data as in the image above

s627.JPG

Fig. (627) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Control Structure)

                3 - Select the component (For Loop)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (For Loop)

                Note : Stop typing when you see the required component is selected

s628.JPG

Fig. (628) Component Browser – Select the component (For Loop)

After selecting the component click Ok or press ENTER

s629.JPG

Fig. (629) Interaction page - Set the properties and enter the required data as in the image above

s630.JPG

Fig. (630) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Control Structure)

                3 - Select the component (IF Statement)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (IF Statement)

                Note : Stop typing when you see the required component is selected

s631.JPG

Fig. (631) Component Browser – Select the component (IF Statement)

After selecting the component click Ok or press ENTER

s632.JPG

Fig. (632) Interaction page - Set the properties and enter the required data as in the image above

s633.JPG

Fig. (633) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Status Bar)

                3 - Select the component (Status Bar)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Status Bar)

                Note : Stop typing when you see the required component is selected

s634.JPG

Fig. (634) Component Browser – Select the component (Status Bar)

After selecting the component click Ok or press ENTER

s635.JPG

Fig. (635) Interaction page - Set the properties and enter the required data as in the image above

s636.JPG

Fig. (636) Goal Desginer - Steps Tree

Select the step (Items)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Variables)

                3 - Select the component (Get String/Variable/Array Length)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Get String/Variable/Array Length)

                Note : Stop typing when you see the required component is selected

s637.JPG

Fig. (637) Component Browser – Select the component (Get String/Variable/Array Length)

After selecting the component click Ok or press ENTER

s638.JPG

Fig. (638) Interaction page - Set the properties and enter the required data as in the image above

s639.JPG

Fig. (639) Goal Desginer - Steps Tree

Select the step (Items)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Control Structure)

                3 - Select the component (For Loop)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (For Loop)

                Note : Stop typing when you see the required component is selected

s640.JPG

Fig. (640) Component Browser – Select the component (For Loop)

After selecting the component click Ok or press ENTER

s641.JPG

Fig. (641) Interaction page - Set the properties and enter the required data as in the image above

s642.JPG

Fig. (642) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Control Structure)

                3 - Select the component (IF Statement)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (IF Statement)

                Note : Stop typing when you see the required component is selected

s643.JPG

Fig. (643) Component Browser – Select the component (IF Statement)

After selecting the component click Ok or press ENTER

s644.JPG

Fig. (644) Interaction page - Set the properties and enter the required data as in the image above

s645.JPG

Fig. (645) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Variables)

                3 - Select the component (Assignment)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Assignment)

                Note : Stop typing when you see the required component is selected

s646.JPG

Fig. (646) Component Browser – Select the component (Assignment)

After selecting the component click Ok or press ENTER

s647.JPG

Fig. (647) Interaction page - Set the properties and enter the required data as in the image above

s648.JPG

Fig. (648) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Status Bar)

                3 - Select the component (Statusbar Item)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Statusbar Item)

                Note : Stop typing when you see the required component is selected

s649.JPG

Fig. (649) Component Browser – Select the component (Statusbar Item)

After selecting the component click Ok or press ENTER

s650.JPG

Fig. (650) Interaction page - Set the properties and enter the required data as in the image above

s651.JPG

Fig. (651) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Control Structure)

                3 - Select the component (IF Statement)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (IF Statement)

                Note : Stop typing when you see the required component is selected

s652.JPG

Fig. (652) Component Browser – Select the component (IF Statement)

After selecting the component click Ok or press ENTER

s653.JPG

Fig. (653) Interaction page - Set the properties and enter the required data as in the image above

s654.JPG

Fig. (654) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Status Bar)

                3 - Select the component (Clock)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Clock)

                Note : Stop typing when you see the required component is selected

s655.JPG

Fig. (655) Component Browser – Select the component (Clock)

After selecting the component click Ok or press ENTER

s656.JPG

Fig. (656) Interaction page - Set the properties and enter the required data as in the image above

s657.JPG

Fig. (657) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Control Structure)

                3 - Select the component (IF Statement)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (IF Statement)

                Note : Stop typing when you see the required component is selected

s658.JPG

Fig. (658) Component Browser – Select the component (IF Statement)

After selecting the component click Ok or press ENTER

s659.JPG

Fig. (659) Interaction page - Set the properties and enter the required data as in the image above

s660.JPG

Fig. (660) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Controls)

                3 - Select the component (Date)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Date)

                Note : Stop typing when you see the required component is selected

s661.JPG

Fig. (661) Component Browser – Select the component (Date)

After selecting the component click Ok or press ENTER

s662.JPG

Fig. (662) Interaction page - Set the properties and enter the required data as in the image above

s663.JPG

Fig. (663) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Control Structure)

                3 - Select the component (IF Statement)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (IF Statement)

                Note : Stop typing when you see the required component is selected

s664.JPG

Fig. (664) Component Browser – Select the component (IF Statement)

After selecting the component click Ok or press ENTER

s665.JPG

Fig. (665) Interaction page - Set the properties and enter the required data as in the image above

s666.JPG

Fig. (666) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Status Bar)

                3 - Select the component (Keyboard)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Keyboard)

                Note : Stop typing when you see the required component is selected

s667.JPG

Fig. (667) Component Browser – Select the component (Keyboard)

After selecting the component click Ok or press ENTER

s668.JPG

Fig. (668) Interaction page - Set the properties and enter the required data as in the image above

s669.JPG

Fig. (669) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Structure Programming)

                3 - Select the component (Return Value)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Return Value)

                Note : Stop typing when you see the required component is selected

s670.JPG

Fig. (670) Component Browser – Select the component (Return Value)

After selecting the component click Ok or press ENTER

s671.JPG

Fig. (671) Interaction page - Set the properties and enter the required data as in the image above

s672.JPG

Fig. (672) Goal Desginer - Steps Tree

Select the step (i want menubar)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Control Structure)

                3 - Select the component (IF Statement)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (IF Statement)

                Note : Stop typing when you see the required component is selected

s673.JPG

Fig. (673) Component Browser – Select the component (IF Statement)

After selecting the component click Ok or press ENTER

s674.JPG

Fig. (674) Interaction page - Set the properties and enter the required data as in the image above

s675.JPG

Fig. (675) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Variables)

                3 - Select the component (Get String/Variable/Array Length)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Get String/Variable/Array Length)

                Note : Stop typing when you see the required component is selected

s676.JPG

Fig. (676) Component Browser – Select the component (Get String/Variable/Array Length)

After selecting the component click Ok or press ENTER

s677.JPG

Fig. (677) Interaction page - Set the properties and enter the required data as in the image above

s678.JPG

Fig. (678) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Control Structure)

                3 - Select the component (For Loop)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (For Loop)

                Note : Stop typing when you see the required component is selected

s679.JPG

Fig. (679) Component Browser – Select the component (For Loop)

After selecting the component click Ok or press ENTER

s680.JPG

Fig. (680) Interaction page - Set the properties and enter the required data as in the image above

s681.JPG

Fig. (681) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Control Structure)

                3 - Select the component (IF Statement)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (IF Statement)

                Note : Stop typing when you see the required component is selected

s682.JPG

Fig. (682) Component Browser – Select the component (IF Statement)

After selecting the component click Ok or press ENTER

s683.JPG

Fig. (683) Interaction page - Set the properties and enter the required data as in the image above

s684.JPG

Fig. (684) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Main Menu)

                3 - Select the component (Define Main Menu)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Define Main Menu)

                Note : Stop typing when you see the required component is selected

s685.JPG

Fig. (685) Component Browser – Select the component (Define Main Menu)

After selecting the component click Ok or press ENTER

s686.JPG

Fig. (686) Interaction page - Set the properties and enter the required data as in the image above

s687.JPG

Fig. (687) Goal Desginer - Steps Tree

Select the step (MENU POPUPS)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Variables)

                3 - Select the component (Get String/Variable/Array Length)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Get String/Variable/Array Length)

                Note : Stop typing when you see the required component is selected

s688.JPG

Fig. (688) Component Browser – Select the component (Get String/Variable/Array Length)

After selecting the component click Ok or press ENTER

s689.JPG

Fig. (689) Interaction page - Set the properties and enter the required data as in the image above

s690.JPG

Fig. (690) Goal Desginer - Steps Tree

Select the step (MENU POPUPS)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Control Structure)

                3 - Select the component (IF Statement)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (IF Statement)

                Note : Stop typing when you see the required component is selected

s691.JPG

Fig. (691) Component Browser – Select the component (IF Statement)

After selecting the component click Ok or press ENTER

s692.JPG

Fig. (692) Interaction page - Set the properties and enter the required data as in the image above

s693.JPG

Fig. (693) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Control Structure)

                3 - Select the component (For Loop)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (For Loop)

                Note : Stop typing when you see the required component is selected

s694.JPG

Fig. (694) Component Browser – Select the component (For Loop)

After selecting the component click Ok or press ENTER

s695.JPG

Fig. (695) Interaction page - Set the properties and enter the required data as in the image above

s696.JPG

Fig. (696) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Main Menu)

                3 - Select the component (Define POPUP)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Define POPUP)

                Note : Stop typing when you see the required component is selected

s697.JPG

Fig. (697) Component Browser – Select the component (Define POPUP)

After selecting the component click Ok or press ENTER

s698.JPG

Fig. (698) Interaction page - Set the properties and enter the required data as in the image above

s699.JPG

Fig. (699) Goal Desginer - Steps Tree

Select the step (POPUP ITEMS)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Variables)

                3 - Select the component (Get String/Variable/Array Length)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Get String/Variable/Array Length)

                Note : Stop typing when you see the required component is selected

s700.JPG

Fig. (700) Component Browser – Select the component (Get String/Variable/Array Length)

After selecting the component click Ok or press ENTER

s701.JPG

Fig. (701) Interaction page - Set the properties and enter the required data as in the image above

s702.JPG

Fig. (702) Goal Desginer - Steps Tree

Select the step (POPUP ITEMS)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Control Structure)

                3 - Select the component (IF Statement)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (IF Statement)

                Note : Stop typing when you see the required component is selected

s703.JPG

Fig. (703) Component Browser – Select the component (IF Statement)

After selecting the component click Ok or press ENTER

s704.JPG

Fig. (704) Interaction page - Set the properties and enter the required data as in the image above

s705.JPG

Fig. (705) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Control Structure)

                3 - Select the component (For Loop)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (For Loop)

                Note : Stop typing when you see the required component is selected

s706.JPG

Fig. (706) Component Browser – Select the component (For Loop)

After selecting the component click Ok or press ENTER

s707.JPG

Fig. (707) Interaction page - Set the properties and enter the required data as in the image above

s708.JPG

Fig. (708) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Variables)

                3 - Select the component (Assignment)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Assignment)

                Note : Stop typing when you see the required component is selected

s709.JPG

Fig. (709) Component Browser – Select the component (Assignment)

After selecting the component click Ok or press ENTER

s710.JPG

Fig. (710) Interaction page - Set the properties and enter the required data as in the image above

s711.JPG

Fig. (711) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Main Menu)

                3 - Select the component (Define Item)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Define Item)

                Note : Stop typing when you see the required component is selected

s712.JPG

Fig. (712) Component Browser – Select the component (Define Item)

After selecting the component click Ok or press ENTER

s713.JPG

Fig. (713) Interaction page - Set the properties and enter the required data as in the image above

s714.JPG

Fig. (714) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Arrays)

                3 - Select the component (Add Item)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Add Item)

                Note : Stop typing when you see the required component is selected

s715.JPG

Fig. (715) Component Browser – Select the component (Add Item)

After selecting the component click Ok or press ENTER

s716.JPG

Fig. (716) Interaction page - Set the properties and enter the required data as in the image above

s717.JPG

Fig. (717) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Structure Programming)

                3 - Select the component (Return Value)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Return Value)

                Note : Stop typing when you see the required component is selected

s718.JPG

Fig. (718) Component Browser – Select the component (Return Value)

After selecting the component click Ok or press ENTER

s719.JPG

Fig. (719) Interaction page - Set the properties and enter the required data as in the image above

s720.JPG

Fig. (720) Goal Desginer - Steps Tree

Select the step (Check Errors)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Control Structure)

                3 - Select the component (IF Statement)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (IF Statement)

                Note : Stop typing when you see the required component is selected

s721.JPG

Fig. (721) Component Browser – Select the component (IF Statement)

After selecting the component click Ok or press ENTER

s722.JPG

Fig. (722) Interaction page - Set the properties and enter the required data as in the image above

s723.JPG

Fig. (723) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Control Structure)

                3 - Select the component (IF Statement)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (IF Statement)

                Note : Stop typing when you see the required component is selected

s724.JPG

Fig. (724) Component Browser – Select the component (IF Statement)

After selecting the component click Ok or press ENTER

s725.JPG

Fig. (725) Interaction page - Set the properties and enter the required data as in the image above

s726.JPG

Fig. (726) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Structure Programming)

                3 - Select the component (Call Procedure)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Call Procedure)

                Note : Stop typing when you see the required component is selected

s727.JPG

Fig. (727) Component Browser – Select the component (Call Procedure)

After selecting the component click Ok or press ENTER

s728.JPG

Fig. (728) Interaction page - Set the properties and enter the required data as in the image above

s729.JPG

Fig. (729) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Control Structure)

                3 - Select the component (IF Statement)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (IF Statement)

                Note : Stop typing when you see the required component is selected

s730.JPG

Fig. (730) Component Browser – Select the component (IF Statement)

After selecting the component click Ok or press ENTER

s731.JPG

Fig. (731) Interaction page - Set the properties and enter the required data as in the image above

s732.JPG

Fig. (732) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Structure Programming)

                3 - Select the component (Call Procedure)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Call Procedure)

                Note : Stop typing when you see the required component is selected

s733.JPG

Fig. (733) Component Browser – Select the component (Call Procedure)

After selecting the component click Ok or press ENTER

s734.JPG

Fig. (734) Interaction page - Set the properties and enter the required data as in the image above

s735.JPG

Fig. (735) Goal Desginer - Steps Tree

Select the step (No Window Defined)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Control Structure)

                3 - Select the component (IF Statement)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (IF Statement)

                Note : Stop typing when you see the required component is selected

s736.JPG

Fig. (736) Component Browser – Select the component (IF Statement)

After selecting the component click Ok or press ENTER

s737.JPG

Fig. (737) Interaction page - Set the properties and enter the required data as in the image above

s738.JPG

Fig. (738) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Control Structure)

                3 - Select the component (IF Statement)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (IF Statement)

                Note : Stop typing when you see the required component is selected

s739.JPG

Fig. (739) Component Browser – Select the component (IF Statement)

After selecting the component click Ok or press ENTER

s740.JPG

Fig. (740) Interaction page - Set the properties and enter the required data as in the image above

s741.JPG

Fig. (741) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Structure Programming)

                3 - Select the component (Call Procedure)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Call Procedure)

                Note : Stop typing when you see the required component is selected

s742.JPG

Fig. (742) Component Browser – Select the component (Call Procedure)

After selecting the component click Ok or press ENTER

s743.JPG

Fig. (743) Interaction page - Set the properties and enter the required data as in the image above

s744.JPG

Fig. (744) Goal Desginer - Steps Tree

Select the step (I want button)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Control Structure)

                3 - Select the component (IF Statement)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (IF Statement)

                Note : Stop typing when you see the required component is selected

s745.JPG

Fig. (745) Component Browser – Select the component (IF Statement)

After selecting the component click Ok or press ENTER

s746.JPG

Fig. (746) Interaction page - Set the properties and enter the required data as in the image above

s747.JPG

Fig. (747) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Variables)

                3 - Select the component (Assignment)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Assignment)

                Note : Stop typing when you see the required component is selected

s748.JPG

Fig. (748) Component Browser – Select the component (Assignment)

After selecting the component click Ok or press ENTER

s749.JPG

Fig. (749) Interaction page - Set the properties and enter the required data as in the image above

s750.JPG

Fig. (750) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Variables)

                3 - Select the component (Numeric To String)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Numeric To String)

                Note : Stop typing when you see the required component is selected

s751.JPG

Fig. (751) Component Browser – Select the component (Numeric To String)

After selecting the component click Ok or press ENTER

s752.JPG

Fig. (752) Interaction page - Set the properties and enter the required data as in the image above

s753.JPG

Fig. (753) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Variables)

                3 - Select the component (ALL Trim)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (ALL Trim)

                Note : Stop typing when you see the required component is selected

s754.JPG

Fig. (754) Component Browser – Select the component (ALL Trim)

After selecting the component click Ok or press ENTER

s755.JPG

Fig. (755) Interaction page - Set the properties and enter the required data as in the image above

s756.JPG

Fig. (756) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Variables)

                3 - Select the component (Assignment)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Assignment)

                Note : Stop typing when you see the required component is selected

s757.JPG

Fig. (757) Component Browser – Select the component (Assignment)

After selecting the component click Ok or press ENTER

s758.JPG

Fig. (758) Interaction page - Set the properties and enter the required data as in the image above

s759.JPG

Fig. (759) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Variables)

                3 - Select the component (Assignment)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Assignment)

                Note : Stop typing when you see the required component is selected

s760.JPG

Fig. (760) Component Browser – Select the component (Assignment)

After selecting the component click Ok or press ENTER

s761.JPG

Fig. (761) Interaction page - Set the properties and enter the required data as in the image above

s762.JPG

Fig. (762) Goal Desginer - Steps Tree

Select the step (Event Blocks)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Variables)

                3 - Select the component (Assignment)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Assignment)

                Note : Stop typing when you see the required component is selected

s763.JPG

Fig. (763) Component Browser – Select the component (Assignment)

After selecting the component click Ok or press ENTER

s764.JPG

Fig. (764) Interaction page - Set the properties and enter the required data as in the image above

s765.JPG

Fig. (765) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Controls)

                3 - Select the component (Button)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Button)

                Note : Stop typing when you see the required component is selected

s766.JPG

Fig. (766) Component Browser – Select the component (Button)

After selecting the component click Ok or press ENTER

s767.JPG

Fig. (767) Interaction page - Set the properties and enter the required data as in the image above

s768.JPG

Fig. (768) Goal Desginer - Steps Tree

Select the step (Button Events)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Events)

                3 - Select the component (Button Events)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Button Events)

                Note : Stop typing when you see the required component is selected

s769.JPG

Fig. (769) Component Browser – Select the component (Button Events)

After selecting the component click Ok or press ENTER

s770.JPG

Fig. (770) Interaction page - Set the properties and enter the required data as in the image above

s771.JPG

Fig. (771) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Arrays)

                3 - Select the component (Add Item)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Add Item)

                Note : Stop typing when you see the required component is selected

s772.JPG

Fig. (772) Component Browser – Select the component (Add Item)

After selecting the component click Ok or press ENTER

s773.JPG

Fig. (773) Interaction page - Set the properties and enter the required data as in the image above

s774.JPG

Fig. (774) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Variables)

                3 - Select the component (Assignment)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Assignment)

                Note : Stop typing when you see the required component is selected

s775.JPG

Fig. (775) Component Browser – Select the component (Assignment)

After selecting the component click Ok or press ENTER

s776.JPG

Fig. (776) Interaction page - Set the properties and enter the required data as in the image above

s777.JPG

Fig. (777) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Structure Programming)

                3 - Select the component (Return Value)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Return Value)

                Note : Stop typing when you see the required component is selected

s778.JPG

Fig. (778) Component Browser – Select the component (Return Value)

After selecting the component click Ok or press ENTER

s779.JPG

Fig. (779) Interaction page - Set the properties and enter the required data as in the image above

s780.JPG

Fig. (780) Goal Desginer - Steps Tree

Select the step (Button Caption is)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Control Structure)

                3 - Select the component (IF Statement)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (IF Statement)

                Note : Stop typing when you see the required component is selected

s781.JPG

Fig. (781) Component Browser – Select the component (IF Statement)

After selecting the component click Ok or press ENTER

s782.JPG

Fig. (782) Interaction page - Set the properties and enter the required data as in the image above

s783.JPG

Fig. (783) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Structure Programming)

                3 - Select the component (Call Procedure)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Call Procedure)

                Note : Stop typing when you see the required component is selected

s784.JPG

Fig. (784) Component Browser – Select the component (Call Procedure)

After selecting the component click Ok or press ENTER

s785.JPG

Fig. (785) Interaction page - Set the properties and enter the required data as in the image above

s786.JPG

Fig. (786) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Structure Programming)

                3 - Select the component (Return Value)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Return Value)

                Note : Stop typing when you see the required component is selected

s787.JPG

Fig. (787) Component Browser – Select the component (Return Value)

After selecting the component click Ok or press ENTER

s788.JPG

Fig. (788) Interaction page - Set the properties and enter the required data as in the image above

s789.JPG

Fig. (789) Goal Desginer - Steps Tree

Select the step (Button Top is)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Control Structure)

                3 - Select the component (IF Statement)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (IF Statement)

                Note : Stop typing when you see the required component is selected

s790.JPG

Fig. (790) Component Browser – Select the component (IF Statement)

After selecting the component click Ok or press ENTER

s791.JPG

Fig. (791) Interaction page - Set the properties and enter the required data as in the image above

s792.JPG

Fig. (792) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Structure Programming)

                3 - Select the component (Call Procedure)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Call Procedure)

                Note : Stop typing when you see the required component is selected

s793.JPG

Fig. (793) Component Browser – Select the component (Call Procedure)

After selecting the component click Ok or press ENTER

s794.JPG

Fig. (794) Interaction page - Set the properties and enter the required data as in the image above

s795.JPG

Fig. (795) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Structure Programming)

                3 - Select the component (Return Value)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Return Value)

                Note : Stop typing when you see the required component is selected

s796.JPG

Fig. (796) Component Browser – Select the component (Return Value)

After selecting the component click Ok or press ENTER

s797.JPG

Fig. (797) Interaction page - Set the properties and enter the required data as in the image above

s798.JPG

Fig. (798) Goal Desginer - Steps Tree

Select the step (Button Left is)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Control Structure)

                3 - Select the component (IF Statement)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (IF Statement)

                Note : Stop typing when you see the required component is selected

s799.JPG

Fig. (799) Component Browser – Select the component (IF Statement)

After selecting the component click Ok or press ENTER

s800.JPG

Fig. (800) Interaction page - Set the properties and enter the required data as in the image above

s801.JPG

Fig. (801) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Structure Programming)

                3 - Select the component (Call Procedure)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Call Procedure)

                Note : Stop typing when you see the required component is selected

s802.JPG

Fig. (802) Component Browser – Select the component (Call Procedure)

After selecting the component click Ok or press ENTER

s803.JPG

Fig. (803) Interaction page - Set the properties and enter the required data as in the image above

s804.JPG

Fig. (804) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Structure Programming)

                3 - Select the component (Return Value)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Return Value)

                Note : Stop typing when you see the required component is selected

s805.JPG

Fig. (805) Component Browser – Select the component (Return Value)

After selecting the component click Ok or press ENTER

s806.JPG

Fig. (806) Interaction page - Set the properties and enter the required data as in the image above

s807.JPG

Fig. (807) Goal Desginer - Steps Tree

Select the step (Button Width is)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Control Structure)

                3 - Select the component (IF Statement)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (IF Statement)

                Note : Stop typing when you see the required component is selected

s808.JPG

Fig. (808) Component Browser – Select the component (IF Statement)

After selecting the component click Ok or press ENTER

s809.JPG

Fig. (809) Interaction page - Set the properties and enter the required data as in the image above

s810.JPG

Fig. (810) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Structure Programming)

                3 - Select the component (Call Procedure)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Call Procedure)

                Note : Stop typing when you see the required component is selected

s811.JPG

Fig. (811) Component Browser – Select the component (Call Procedure)

After selecting the component click Ok or press ENTER

s812.JPG

Fig. (812) Interaction page - Set the properties and enter the required data as in the image above

s813.JPG

Fig. (813) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Structure Programming)

                3 - Select the component (Return Value)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Return Value)

                Note : Stop typing when you see the required component is selected

s814.JPG

Fig. (814) Component Browser – Select the component (Return Value)

After selecting the component click Ok or press ENTER

s815.JPG

Fig. (815) Interaction page - Set the properties and enter the required data as in the image above

s816.JPG

Fig. (816) Goal Desginer - Steps Tree

Select the step (Button Height is)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Control Structure)

                3 - Select the component (IF Statement)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (IF Statement)

                Note : Stop typing when you see the required component is selected

s817.JPG

Fig. (817) Component Browser – Select the component (IF Statement)

After selecting the component click Ok or press ENTER

s818.JPG

Fig. (818) Interaction page - Set the properties and enter the required data as in the image above

s819.JPG

Fig. (819) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Structure Programming)

                3 - Select the component (Call Procedure)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Call Procedure)

                Note : Stop typing when you see the required component is selected

s820.JPG

Fig. (820) Component Browser – Select the component (Call Procedure)

After selecting the component click Ok or press ENTER

s821.JPG

Fig. (821) Interaction page - Set the properties and enter the required data as in the image above

s822.JPG

Fig. (822) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Structure Programming)

                3 - Select the component (Return Value)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Return Value)

                Note : Stop typing when you see the required component is selected

s823.JPG

Fig. (823) Component Browser – Select the component (Return Value)

After selecting the component click Ok or press ENTER

s824.JPG

Fig. (824) Interaction page - Set the properties and enter the required data as in the image above

s825.JPG

Fig. (825) Goal Desginer - Steps Tree

Select the step (Button Name Is)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Control Structure)

                3 - Select the component (IF Statement)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (IF Statement)

                Note : Stop typing when you see the required component is selected

s826.JPG

Fig. (826) Component Browser – Select the component (IF Statement)

After selecting the component click Ok or press ENTER

s827.JPG

Fig. (827) Interaction page - Set the properties and enter the required data as in the image above

s828.JPG

Fig. (828) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Variables)

                3 - Select the component (Get String/Variable/Array Length)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Get String/Variable/Array Length)

                Note : Stop typing when you see the required component is selected

s829.JPG

Fig. (829) Component Browser – Select the component (Get String/Variable/Array Length)

After selecting the component click Ok or press ENTER

s830.JPG

Fig. (830) Interaction page - Set the properties and enter the required data as in the image above

s831.JPG

Fig. (831) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Control Structure)

                3 - Select the component (For Loop)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (For Loop)

                Note : Stop typing when you see the required component is selected

s832.JPG

Fig. (832) Component Browser – Select the component (For Loop)

After selecting the component click Ok or press ENTER

s833.JPG

Fig. (833) Interaction page - Set the properties and enter the required data as in the image above

s834.JPG

Fig. (834) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Control Structure)

                3 - Select the component (IF Statement)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (IF Statement)

                Note : Stop typing when you see the required component is selected

s835.JPG

Fig. (835) Component Browser – Select the component (IF Statement)

After selecting the component click Ok or press ENTER

s836.JPG

Fig. (836) Interaction page - Set the properties and enter the required data as in the image above

s837.JPG

Fig. (837) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Control Structure)

                3 - Select the component (IF Statement)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (IF Statement)

                Note : Stop typing when you see the required component is selected

s838.JPG

Fig. (838) Component Browser – Select the component (IF Statement)

After selecting the component click Ok or press ENTER

s839.JPG

Fig. (839) Interaction page - Set the properties and enter the required data as in the image above

s840.JPG

Fig. (840) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Variables)

                3 - Select the component (Assignment)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Assignment)

                Note : Stop typing when you see the required component is selected

s841.JPG

Fig. (841) Component Browser – Select the component (Assignment)

After selecting the component click Ok or press ENTER

s842.JPG

Fig. (842) Interaction page - Set the properties and enter the required data as in the image above

s843.JPG

Fig. (843) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Control Structure)

                3 - Select the component (Exit)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Exit)

                Note : Stop typing when you see the required component is selected

s844.JPG

Fig. (844) Component Browser – Select the component (Exit)

After selecting the component click Ok or press ENTER

s845.JPG

Fig. (845) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Structure Programming)

                3 - Select the component (Return Value)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Return Value)

                Note : Stop typing when you see the required component is selected

s846.JPG

Fig. (846) Component Browser – Select the component (Return Value)

After selecting the component click Ok or press ENTER

s847.JPG

Fig. (847) Interaction page - Set the properties and enter the required data as in the image above

s848.JPG

Fig. (848) Goal Desginer - Steps Tree

Select the step (Button Font Name is)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Control Structure)

                3 - Select the component (IF Statement)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (IF Statement)

                Note : Stop typing when you see the required component is selected

s849.JPG

Fig. (849) Component Browser – Select the component (IF Statement)

After selecting the component click Ok or press ENTER

s850.JPG

Fig. (850) Interaction page - Set the properties and enter the required data as in the image above

s851.JPG

Fig. (851) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Structure Programming)

                3 - Select the component (Call Procedure)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Call Procedure)

                Note : Stop typing when you see the required component is selected

s852.JPG

Fig. (852) Component Browser – Select the component (Call Procedure)

After selecting the component click Ok or press ENTER

s853.JPG

Fig. (853) Interaction page - Set the properties and enter the required data as in the image above

s854.JPG

Fig. (854) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Structure Programming)

                3 - Select the component (Return Value)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Return Value)

                Note : Stop typing when you see the required component is selected

s855.JPG

Fig. (855) Component Browser – Select the component (Return Value)

After selecting the component click Ok or press ENTER

s856.JPG

Fig. (856) Interaction page - Set the properties and enter the required data as in the image above

s857.JPG

Fig. (857) Goal Desginer - Steps Tree

Select the step (Button Font Size is)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Control Structure)

                3 - Select the component (IF Statement)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (IF Statement)

                Note : Stop typing when you see the required component is selected

s858.JPG

Fig. (858) Component Browser – Select the component (IF Statement)

After selecting the component click Ok or press ENTER

s859.JPG

Fig. (859) Interaction page - Set the properties and enter the required data as in the image above

s860.JPG

Fig. (860) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Structure Programming)

                3 - Select the component (Call Procedure)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Call Procedure)

                Note : Stop typing when you see the required component is selected

s861.JPG

Fig. (861) Component Browser – Select the component (Call Procedure)

After selecting the component click Ok or press ENTER

s862.JPG

Fig. (862) Interaction page - Set the properties and enter the required data as in the image above

s863.JPG

Fig. (863) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Structure Programming)

                3 - Select the component (Return Value)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Return Value)

                Note : Stop typing when you see the required component is selected

s864.JPG

Fig. (864) Component Browser – Select the component (Return Value)

After selecting the component click Ok or press ENTER

s865.JPG

Fig. (865) Interaction page - Set the properties and enter the required data as in the image above

s866.JPG

Fig. (866) Goal Desginer - Steps Tree

Select the step (Button Fore Color is)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Control Structure)

                3 - Select the component (IF Statement)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (IF Statement)

                Note : Stop typing when you see the required component is selected

s867.JPG

Fig. (867) Component Browser – Select the component (IF Statement)

After selecting the component click Ok or press ENTER

s868.JPG

Fig. (868) Interaction page - Set the properties and enter the required data as in the image above

s869.JPG

Fig. (869) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Variables)

                3 - Select the component (Assignment)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Assignment)

                Note : Stop typing when you see the required component is selected

s870.JPG

Fig. (870) Component Browser – Select the component (Assignment)

After selecting the component click Ok or press ENTER

s871.JPG

Fig. (871) Interaction page - Set the properties and enter the required data as in the image above

s872.JPG

Fig. (872) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Variables)

                3 - Select the component (Assignment)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Assignment)

                Note : Stop typing when you see the required component is selected

s873.JPG

Fig. (873) Component Browser – Select the component (Assignment)

After selecting the component click Ok or press ENTER

s874.JPG

Fig. (874) Interaction page - Set the properties and enter the required data as in the image above

s875.JPG

Fig. (875) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Structure Programming)

                3 - Select the component (Call Procedure)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Call Procedure)

                Note : Stop typing when you see the required component is selected

s876.JPG

Fig. (876) Component Browser – Select the component (Call Procedure)

After selecting the component click Ok or press ENTER

s877.JPG

Fig. (877) Interaction page - Set the properties and enter the required data as in the image above

s878.JPG

Fig. (878) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Structure Programming)

                3 - Select the component (Return Value)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Return Value)

                Note : Stop typing when you see the required component is selected

s879.JPG

Fig. (879) Component Browser – Select the component (Return Value)

After selecting the component click Ok or press ENTER

s880.JPG

Fig. (880) Interaction page - Set the properties and enter the required data as in the image above

s881.JPG

Fig. (881) Goal Desginer - Steps Tree

Select the step (Button Back Color is)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Control Structure)

                3 - Select the component (IF Statement)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (IF Statement)

                Note : Stop typing when you see the required component is selected

s882.JPG

Fig. (882) Component Browser – Select the component (IF Statement)

After selecting the component click Ok or press ENTER

s883.JPG

Fig. (883) Interaction page - Set the properties and enter the required data as in the image above

s884.JPG

Fig. (884) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Variables)

                3 - Select the component (Assignment)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Assignment)

                Note : Stop typing when you see the required component is selected

s885.JPG

Fig. (885) Component Browser – Select the component (Assignment)

After selecting the component click Ok or press ENTER

s886.JPG

Fig. (886) Interaction page - Set the properties and enter the required data as in the image above

s887.JPG

Fig. (887) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Variables)

                3 - Select the component (Assignment)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Assignment)

                Note : Stop typing when you see the required component is selected

s888.JPG

Fig. (888) Component Browser – Select the component (Assignment)

After selecting the component click Ok or press ENTER

s889.JPG

Fig. (889) Interaction page - Set the properties and enter the required data as in the image above

s890.JPG

Fig. (890) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Structure Programming)

                3 - Select the component (Call Procedure)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Call Procedure)

                Note : Stop typing when you see the required component is selected

s891.JPG

Fig. (891) Component Browser – Select the component (Call Procedure)

After selecting the component click Ok or press ENTER

s892.JPG

Fig. (892) Interaction page - Set the properties and enter the required data as in the image above

s893.JPG

Fig. (893) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Structure Programming)

                3 - Select the component (Return Value)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Return Value)

                Note : Stop typing when you see the required component is selected

s894.JPG

Fig. (894) Component Browser – Select the component (Return Value)

After selecting the component click Ok or press ENTER

s895.JPG

Fig. (895) Interaction page - Set the properties and enter the required data as in the image above

s896.JPG

Fig. (896) Goal Desginer - Steps Tree

Select the step (Button Font Bold is)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Control Structure)

                3 - Select the component (IF Statement)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (IF Statement)

                Note : Stop typing when you see the required component is selected

s897.JPG

Fig. (897) Component Browser – Select the component (IF Statement)

After selecting the component click Ok or press ENTER

s898.JPG

Fig. (898) Interaction page - Set the properties and enter the required data as in the image above

s899.JPG

Fig. (899) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Variables)

                3 - Select the component (Assignment)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Assignment)

                Note : Stop typing when you see the required component is selected

s900.JPG

Fig. (900) Component Browser – Select the component (Assignment)

After selecting the component click Ok or press ENTER

s901.JPG

Fig. (901) Interaction page - Set the properties and enter the required data as in the image above

s902.JPG

Fig. (902) Goal Desginer - Steps Tree

Select the step (Button Font Italic is)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Control Structure)

                3 - Select the component (IF Statement)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (IF Statement)

                Note : Stop typing when you see the required component is selected

s903.JPG

Fig. (903) Component Browser – Select the component (IF Statement)

After selecting the component click Ok or press ENTER

s904.JPG

Fig. (904) Interaction page - Set the properties and enter the required data as in the image above

s905.JPG

Fig. (905) Goal Desginer - Steps Tree

Select the step (Button Font Underline is)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Control Structure)

                3 - Select the component (IF Statement)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (IF Statement)

                Note : Stop typing when you see the required component is selected

s906.JPG

Fig. (906) Component Browser – Select the component (IF Statement)

After selecting the component click Ok or press ENTER

s907.JPG

Fig. (907) Interaction page - Set the properties and enter the required data as in the image above

s908.JPG

Fig. (908) Goal Desginer - Steps Tree

Select the step (Button Font Strickout s)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Control Structure)

                3 - Select the component (IF Statement)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (IF Statement)

                Note : Stop typing when you see the required component is selected

s909.JPG

Fig. (909) Component Browser – Select the component (IF Statement)

After selecting the component click Ok or press ENTER

s910.JPG

Fig. (910) Interaction page - Set the properties and enter the required data as in the image above

s911.JPG

Fig. (911) Goal Desginer - Steps Tree

Select the step (Button Picture is)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Control Structure)

                3 - Select the component (IF Statement)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (IF Statement)

                Note : Stop typing when you see the required component is selected

s912.JPG

Fig. (912) Component Browser – Select the component (IF Statement)

After selecting the component click Ok or press ENTER

s913.JPG

Fig. (913) Interaction page - Set the properties and enter the required data as in the image above

s914.JPG

Fig. (914) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Structure Programming)

                3 - Select the component (Call Procedure)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Call Procedure)

                Note : Stop typing when you see the required component is selected

s915.JPG

Fig. (915) Component Browser – Select the component (Call Procedure)

After selecting the component click Ok or press ENTER

s916.JPG

Fig. (916) Interaction page - Set the properties and enter the required data as in the image above

s917.JPG

Fig. (917) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Structure Programming)

                3 - Select the component (Return Value)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Return Value)

                Note : Stop typing when you see the required component is selected

s918.JPG

Fig. (918) Component Browser – Select the component (Return Value)

After selecting the component click Ok or press ENTER

s919.JPG

Fig. (919) Interaction page - Set the properties and enter the required data as in the image above

s920.JPG

Fig. (920) Goal Desginer - Steps Tree

Select the step (Button Selected)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Control Structure)

                3 - Select the component (IF Statement)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (IF Statement)

                Note : Stop typing when you see the required component is selected

s921.JPG

Fig. (921) Component Browser – Select the component (IF Statement)

After selecting the component click Ok or press ENTER

s922.JPG

Fig. (922) Interaction page - Set the properties and enter the required data as in the image above

s923.JPG

Fig. (923) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Structure Programming)

                3 - Select the component (Call Procedure)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Call Procedure)

                Note : Stop typing when you see the required component is selected

s924.JPG

Fig. (924) Component Browser – Select the component (Call Procedure)

After selecting the component click Ok or press ENTER

s925.JPG

Fig. (925) Interaction page - Set the properties and enter the required data as in the image above

s926.JPG

Fig. (926) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Structure Programming)

                3 - Select the component (Return Value)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Return Value)

                Note : Stop typing when you see the required component is selected

s927.JPG

Fig. (927) Component Browser – Select the component (Return Value)

After selecting the component click Ok or press ENTER

s928.JPG

Fig. (928) Interaction page - Set the properties and enter the required data as in the image above

s929.JPG

Fig. (929) Goal Desginer - Steps Tree

Select the step (Button Caption from)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Control Structure)

                3 - Select the component (IF Statement)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (IF Statement)

                Note : Stop typing when you see the required component is selected

s930.JPG

Fig. (930) Component Browser – Select the component (IF Statement)

After selecting the component click Ok or press ENTER

s931.JPG

Fig. (931) Interaction page - Set the properties and enter the required data as in the image above

s932.JPG

Fig. (932) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Structure Programming)

                3 - Select the component (Call Procedure)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Call Procedure)

                Note : Stop typing when you see the required component is selected

s933.JPG

Fig. (933) Component Browser – Select the component (Call Procedure)

After selecting the component click Ok or press ENTER

s934.JPG

Fig. (934) Interaction page - Set the properties and enter the required data as in the image above

s935.JPG

Fig. (935) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Structure Programming)

                3 - Select the component (Call Function)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Call Function)

                Note : Stop typing when you see the required component is selected

s936.JPG

Fig. (936) Component Browser – Select the component (Call Function)

After selecting the component click Ok or press ENTER

s937.JPG

Fig. (937) Interaction page - Set the properties and enter the required data as in the image above

s938.JPG

Fig. (938) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Structure Programming)

                3 - Select the component (Call Procedure)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Call Procedure)

                Note : Stop typing when you see the required component is selected

s939.JPG

Fig. (939) Component Browser – Select the component (Call Procedure)

After selecting the component click Ok or press ENTER

s940.JPG

Fig. (940) Interaction page - Set the properties and enter the required data as in the image above

s941.JPG

Fig. (941) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Structure Programming)

                3 - Select the component (Return Value)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Return Value)

                Note : Stop typing when you see the required component is selected

s942.JPG

Fig. (942) Component Browser – Select the component (Return Value)

After selecting the component click Ok or press ENTER

s943.JPG

Fig. (943) Interaction page - Set the properties and enter the required data as in the image above

s944.JPG

Fig. (944) Goal Desginer - Steps Tree

Select the step (Button Caption to)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Control Structure)

                3 - Select the component (IF Statement)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (IF Statement)

                Note : Stop typing when you see the required component is selected

s945.JPG

Fig. (945) Component Browser – Select the component (IF Statement)

After selecting the component click Ok or press ENTER

s946.JPG

Fig. (946) Interaction page - Set the properties and enter the required data as in the image above

s947.JPG

Fig. (947) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Structure Programming)

                3 - Select the component (Call Function)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Call Function)

                Note : Stop typing when you see the required component is selected

s948.JPG

Fig. (948) Component Browser – Select the component (Call Function)

After selecting the component click Ok or press ENTER

s949.JPG

Fig. (949) Interaction page - Set the properties and enter the required data as in the image above

s950.JPG

Fig. (950) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Structure Programming)

                3 - Select the component (Call Procedure)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Call Procedure)

                Note : Stop typing when you see the required component is selected

s951.JPG

Fig. (951) Component Browser – Select the component (Call Procedure)

After selecting the component click Ok or press ENTER

s952.JPG

Fig. (952) Interaction page - Set the properties and enter the required data as in the image above

s953.JPG

Fig. (953) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Structure Programming)

                3 - Select the component (Return Value)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Return Value)

                Note : Stop typing when you see the required component is selected

s954.JPG

Fig. (954) Component Browser – Select the component (Return Value)

After selecting the component click Ok or press ENTER

s955.JPG

Fig. (955) Interaction page - Set the properties and enter the required data as in the image above

s956.JPG

Fig. (956) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Structure Programming)

                3 - Select the component (Call Procedure)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Call Procedure)

                Note : Stop typing when you see the required component is selected

s957.JPG

Fig. (957) Component Browser – Select the component (Call Procedure)

After selecting the component click Ok or press ENTER

s958.JPG

Fig. (958) Interaction page - Set the properties and enter the required data as in the image above

s959.JPG

Fig. (959) Goal Desginer - Steps Tree

Select the step (Check Errors)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Control Structure)

                3 - Select the component (IF Statement)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (IF Statement)

                Note : Stop typing when you see the required component is selected

s960.JPG

Fig. (960) Component Browser – Select the component (IF Statement)

After selecting the component click Ok or press ENTER

s961.JPG

Fig. (961) Interaction page - Set the properties and enter the required data as in the image above

s962.JPG

Fig. (962) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Control Structure)

                3 - Select the component (IF Statement)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (IF Statement)

                Note : Stop typing when you see the required component is selected

s963.JPG

Fig. (963) Component Browser – Select the component (IF Statement)

After selecting the component click Ok or press ENTER

s964.JPG

Fig. (964) Interaction page - Set the properties and enter the required data as in the image above

s965.JPG

Fig. (965) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Structure Programming)

                3 - Select the component (Call Procedure)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Call Procedure)

                Note : Stop typing when you see the required component is selected

s966.JPG

Fig. (966) Component Browser – Select the component (Call Procedure)

After selecting the component click Ok or press ENTER

s967.JPG

Fig. (967) Interaction page - Set the properties and enter the required data as in the image above

s968.JPG

Fig. (968) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Control Structure)

                3 - Select the component (IF Statement)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (IF Statement)

                Note : Stop typing when you see the required component is selected

s969.JPG

Fig. (969) Component Browser – Select the component (IF Statement)

After selecting the component click Ok or press ENTER

s970.JPG

Fig. (970) Interaction page - Set the properties and enter the required data as in the image above

s971.JPG

Fig. (971) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Structure Programming)

                3 - Select the component (Call Procedure)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Call Procedure)

                Note : Stop typing when you see the required component is selected

s972.JPG

Fig. (972) Component Browser – Select the component (Call Procedure)

After selecting the component click Ok or press ENTER

s973.JPG

Fig. (973) Interaction page - Set the properties and enter the required data as in the image above

s974.JPG

Fig. (974) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Structure Programming)

                3 - Select the component (Call Procedure)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Call Procedure)

                Note : Stop typing when you see the required component is selected

s975.JPG

Fig. (975) Component Browser – Select the component (Call Procedure)

After selecting the component click Ok or press ENTER

s976.JPG

Fig. (976) Interaction page - Set the properties and enter the required data as in the image above

s977.JPG

Fig. (977) Goal Desginer - Steps Tree

Select the step (I want label)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Control Structure)

                3 - Select the component (IF Statement)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (IF Statement)

                Note : Stop typing when you see the required component is selected

s978.JPG

Fig. (978) Component Browser – Select the component (IF Statement)

After selecting the component click Ok or press ENTER

s979.JPG

Fig. (979) Interaction page - Set the properties and enter the required data as in the image above

s980.JPG

Fig. (980) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Variables)

                3 - Select the component (Assignment)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Assignment)

                Note : Stop typing when you see the required component is selected

s981.JPG

Fig. (981) Component Browser – Select the component (Assignment)

After selecting the component click Ok or press ENTER

s982.JPG

Fig. (982) Interaction page - Set the properties and enter the required data as in the image above

s983.JPG

Fig. (983) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Variables)

                3 - Select the component (Numeric To String)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Numeric To String)

                Note : Stop typing when you see the required component is selected

s984.JPG

Fig. (984) Component Browser – Select the component (Numeric To String)

After selecting the component click Ok or press ENTER

s985.JPG

Fig. (985) Interaction page - Set the properties and enter the required data as in the image above

s986.JPG

Fig. (986) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Variables)

                3 - Select the component (ALL Trim)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (ALL Trim)

                Note : Stop typing when you see the required component is selected

s987.JPG

Fig. (987) Component Browser – Select the component (ALL Trim)

After selecting the component click Ok or press ENTER

s988.JPG

Fig. (988) Interaction page - Set the properties and enter the required data as in the image above

s989.JPG

Fig. (989) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Variables)

                3 - Select the component (Assignment)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Assignment)

                Note : Stop typing when you see the required component is selected

s990.JPG

Fig. (990) Component Browser – Select the component (Assignment)

After selecting the component click Ok or press ENTER

s991.JPG

Fig. (991) Interaction page - Set the properties and enter the required data as in the image above

s992.JPG

Fig. (992) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Variables)

                3 - Select the component (Assignment)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Assignment)

                Note : Stop typing when you see the required component is selected

s993.JPG

Fig. (993) Component Browser – Select the component (Assignment)

After selecting the component click Ok or press ENTER

s994.JPG

Fig. (994) Interaction page - Set the properties and enter the required data as in the image above

s995.JPG

Fig. (995) Goal Desginer - Steps Tree

Select the step (Event Blocks)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Variables)

                3 - Select the component (Assignment)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (Assignment)

                Note : Stop typing when you see the required component is selected

s996.JPG

Fig. (996) Component Browser – Select the component (Assignment)

After selecting the component click Ok or press ENTER

s997.JPG

Fig. (997) Interaction page - Set the properties and enter the required data as in the image above

s998.JPG

Fig. (998) Goal Desginer - Steps Tree

Select the step (Start Here)

We will start now new interaction process to generate new steps to our steps tree.

The slow way (Using Mouse):

                1 - Click Interact to open the components browser

                2 - Select the domain (Control Structure)

                3 - Select the component (IF Statement)

The fast way (Using Keyboard shortcuts):

                1 - Get the component using its name by typing (IF Statement)

                Note : Stop typing when you see the required component is selected

s999.JPG

Fig. (999) Component Browser – Select the component (IF Statement)

After selecting the component click Ok or press ENTER

s1000.JPG

Fig. (1000) Interaction page - Set the properties and enter the required data as in the image above

3 - Final Steps Tree

The First Step

                Define Procedure RT_GUI

                                Code Block

                                                Local vmax,x,MyOpObjectName

                                                Commands

                                                                Set Window Auto Show On

                                                                                IF ( myopcode = 22 )

                                                                                                Code Block

                                                                                                                WinShow = True

                                                                                                                Return 0

                                                                                                END OF IF STATEMENT

                                                                Set Window Auto Show Off

                                                                                IF ( myopcode = 23 )

                                                                                                Code Block

                                                                                                                WinShow = False

                                                                                                                Return 0

                                                                                                END OF IF STATEMENT

                                                                Set Window Resize On

                                                                                IF ( myopcode = 24 )

                                                                                                Code Block

                                                                                                                initpara2 = true

                                                                                                                Return 0

                                                                                                END OF IF STATEMENT

                                                                Set Window Resize Off

                                                                                IF ( myopcode = 25 )

                                                                                                Code Block

                                                                                                                initpara2 = false

                                                                                                                Return 0

                                                                                                END OF IF STATEMENT

                                                                Set Window Modal Off

                                                                                IF ( myopcode = 26 )

                                                                                                Code Block

                                                                                                                initpara3 = true

                                                                                                                Return 0

                                                                                                END OF IF STATEMENT

                                                                Set Window Resize Off

                                                                                IF ( myopcode = 27 )

                                                                                                Code Block

                                                                                                                initpara3 = false

                                                                                                                Return 0

                                                                                                END OF IF STATEMENT

                                                                Window Handle To

                                                                                IF ( myopcode = 28 )

                                                                                                Code Block

                                                                                                                myvalue = Get Window (myopwinname) Handle

                                                                                                                myvalue = CONVERT myvalue TO STRING

                                                                                                                myvalue = All Trim myvalue

                                                                                                                Call Procedure RT_SetVarValue Parameters myopdata[1],myvalue

                                                                                                                Return 0

                                                                                                END OF IF STATEMENT

                                                Check Errors

                                                                No Window Defined

                                                                                IF ( myopcode >= 2 .and. myopcode <= 20 .and. myopcode != 17 )

                                                                                                Code Block

                                                                                                                IF ( myopwinname = "NULL" )

                                                                                                                                Code Block

                                                                                                                                                Call Procedure RTE_AddError Parameters 11

                                                                                                                                                Call Procedure RTE_Check

                                                                                                                                END OF IF STATEMENT

                                                                                                END OF IF STATEMENT

                                                                                IF ( myopcode >= 29 .and. myopcode <= 32 )

                                                                                                Code Block

                                                                                                                IF ( myopwinname = "NULL" )

                                                                                                                                Code Block

                                                                                                                                                Call Procedure RTE_AddError Parameters 11

                                                                                                                                                Call Procedure RTE_Check

                                                                                                                                END OF IF STATEMENT

                                                                                                END OF IF STATEMENT

                                                Windows

                                                                I Want Window

                                                                                IF ( myopcode = 1 )

                                                                                                Code Block

                                                                                                                WinsCount = WinsCount+1

                                                                                                                                ObjsCount = ObjsCount+1

                                                                                                                                cobjscount = CONVERT Objscount TO STRING

                                                                                                                                cobjscount = All Trim cobjscount

                                                                                                                cwinname = "win_"+cobjscount

                                                                                                                MyOpWinName = cwinname

                                                                                                                Event Blocks

                                                                                                                                mymoveblock = "RT_DoEvent('window','" + cwinname+"','move')"

                                                                                                                                mygotfocusblock = "RT_DoEvent('window','" + cwinname+"','gotfocus')"

                                                                                                                                mylostfocusblock = "RT_DoEvent('window','" + cwinname+"','lostfocus')"

                                                                                                                                mymouseclickblock = "RT_DoEvent('window','" + cwinname+"','mouseclick')"

                                                                                                                                mymousemoveblock = "RT_DoEvent('window','" + cwinname+"','mousemove')"

                                                                                                                                mysizeblock = "RT_DoEvent('window','" + cwinname+"','resize')"

                                                                                                                                mymaxblock = "RT_DoEvent('window','" + cwinname+"','maximize')"

                                                                                                                                myminblock = "RT_DoEvent('window','" + cwinname+"','minimize')"

                                                                                                                                myreleaseblock = "RT_DoEvent('window','" + cwinname+"','release')"

                                                                                                                IF ( winshow = True )

                                                                                                                                Code Block

                                                                                                                                                IF ( initpara2 = true )

                                                                                                                                                                Code Block

                                                                                                                                                                                IF ( initpara3 = false )

                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                Define Window  ( &cwinname )

                                                                                                                                                                                                                                Window Events

                                                                                                                                                                                                                                                Event: ON RELEASE

                                                                                                                                                                                                                                                Event: ON MOVE

                                                                                                                                                                                                                                                Event: ON GOTFOCUS

                                                                                                                                                                                                                                                Event: ON LOSTFOCUS

                                                                                                                                                                                                                                                Event: ON MOUSECLICK

                                                                                                                                                                                                                                                Event: ON MOUSEMOVE

                                                                                                                                                                                                                                                Event: ON SIZE

                                                                                                                                                                                                                                                Event: ON MAXIMIZE

                                                                                                                                                                                                                                                Event: ON MINIMIZE

                                                                                                                                                                                                                                Window Properties

                                                                                                                                                                                                                                Window Controls

                                                                                                                                                                                                                                                you show statusbar

                                                                                                                                                                                                                                                                mylast = Get Length of String/Variable/Array RT_GUI_Statusbar

                                                                                                                                                                                                                                                                FOR LOOP ( From tempx = 1 To mylast Step 1)

                                                                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                                                                IF ( RT_GUI_Statusbar[tempx][1] == cwinname )

                                                                                                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                                                                                                Define New Statusbar

                                                                                                                                                                                                                                                                                                                                                Items

                                                                                                                                                                                                                                                                                                                                                                mylast2 = Get Length of String/Variable/Array RT_GUI_Statusbar[tempx][8]

                                                                                                                                                                                                                                                                                                                                                                FOR LOOP ( From tempx2 = 1 To mylast2 Step 1)

                                                                                                                                                                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                                                                                                                                                                IF ( RT_GUI_Statusbar[tempx][8][tempx2][1] = 1 )

                                                                                                                                                                                                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                                                                                                                                                                                                tempcaption = RT_GUI_Statusbar[tempx][8][tempx2][2]

                                                                                                                                                                                                                                                                                                                                                                                                                                Define New StatusItem ( (tempcaption) )

                                                                                                                                                                                                                                                                                                                                                                                                                                                Events

                                                                                                                                                                                                                                                                                                                                                                                                                                                Properties

                                                                                                                                                                                                                                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                                                                                                                                                                                                                                IF ( RT_GUI_Statusbar[tempx][8][tempx2][1] = 2 )

                                                                                                                                                                                                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                                                                                                                                                                                                Clock

                                                                                                                                                                                                                                                                                                                                                                                                                                                Events

                                                                                                                                                                                                                                                                                                                                                                                                                                                Properties

                                                                                                                                                                                                                                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                                                                                                                                                                                                                                IF ( RT_GUI_Statusbar[tempx][8][tempx2][1] = 3 )

                                                                                                                                                                                                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                                                                                                                                                                                                Date

                                                                                                                                                                                                                                                                                                                                                                                                                                                Events

                                                                                                                                                                                                                                                                                                                                                                                                                                                Properties

                                                                                                                                                                                                                                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                                                                                                                                                                                                                                IF ( RT_GUI_Statusbar[tempx][8][tempx2][1] = 4 )

                                                                                                                                                                                                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                                                                                                                                                                                                Keyboard

                                                                                                                                                                                                                                                                                                                                                                                                                                                Events

                                                                                                                                                                                                                                                                                                                                                                                                                                                Properties

                                                                                                                                                                                                                                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                                                                                                                                                                                                                End of For Loop

                                                                                                                                                                                                                                                                                                                                                End Statusbar

                                                                                                                                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                                                                                                                End of For Loop

                                                                                                                                                                                                                                End Of Window

                                                                                                                                                                                                ELSE

                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                Define Window  ( &cwinname )

                                                                                                                                                                                                                                                Window Events

                                                                                                                                                                                                                                                Window Properties

                                                                                                                                                                                                                                                Window Controls

                                                                                                                                                                                                                                                                you show statusbar

                                                                                                                                                                                                                                                                                mylast = Get Length of String/Variable/Array RT_GUI_Statusbar

                                                                                                                                                                                                                                                                                FOR LOOP ( From tempx = 1 To mylast Step 1)

                                                                                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                                                                                IF ( RT_GUI_Statusbar[tempx][1] == cwinname )

                                                                                                                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                                                                                                                Define New Statusbar

                                                                                                                                                                                                                                                                                                                                                                Items

                                                                                                                                                                                                                                                                                                                                                                                mylast2 = Get Length of String/Variable/Array RT_GUI_Statusbar[tempx][8]

                                                                                                                                                                                                                                                                                                                                                                                FOR LOOP ( From tempx2 = 1 To mylast2 Step 1)

                                                                                                                                                                                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                                                                                                                                                                                IF ( RT_GUI_Statusbar[tempx][8][tempx2][1] = 1 )

                                                                                                                                                                                                                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                                                                                                                                                                                                                tempcaption = RT_GUI_Statusbar[tempx][8][tempx2][2]

                                                                                                                                                                                                                                                                                                                                                                                                                                                Define New StatusItem ( (tempcaption) )

                                                                                                                                                                                                                                                                                                                                                                                                                                                                Events

                                                                                                                                                                                                                                                                                                                                                                                                                                                                Properties

                                                                                                                                                                                                                                                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                                                                                                                                                                                                                                                IF ( RT_GUI_Statusbar[tempx][8][tempx2][1] = 2 )

                                                                                                                                                                                                                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                                                                                                                                                                                                                Clock

                                                                                                                                                                                                                                                                                                                                                                                                                                                                Events

                                                                                                                                                                                                                                                                                                                                                                                                                                                                Properties

                                                                                                                                                                                                                                                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                                                                                                                                                                                                                                                IF ( RT_GUI_Statusbar[tempx][8][tempx2][1] = 3 )

                                                                                                                                                                                                                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                                                                                                                                                                                                                Date

                                                                                                                                                                                                                                                                                                                                                                                                                                                                Events

                                                                                                                                                                                                                                                                                                                                                                                                                                                                Properties

                                                                                                                                                                                                                                                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                                                                                                                                                                                                                                                IF ( RT_GUI_Statusbar[tempx][8][tempx2][1] = 4 )

                                                                                                                                                                                                                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                                                                                                                                                                                                                Keyboard

                                                                                                                                                                                                                                                                                                                                                                                                                                                                Events

                                                                                                                                                                                                                                                                                                                                                                                                                                                                Properties

                                                                                                                                                                                                                                                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                                                                                                                                                                                                                                End of For Loop

                                                                                                                                                                                                                                                                                                                                                                End Statusbar

                                                                                                                                                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                                                                                                                                End of For Loop

                                                                                                                                                                                                                                                End Of Window

                                                                                                                                                                                                                                winscount = winscount-1

                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                ELSE

                                                                                                                                                                                Code Block

                                                                                                                                                                                                IF ( initpara3 = false )

                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                Define Window  ( &cwinname )

                                                                                                                                                                                                                                                Window Events

                                                                                                                                                                                                                                                                Event: ON RELEASE

                                                                                                                                                                                                                                                                Event: ON MOVE

                                                                                                                                                                                                                                                                Event: ON GOTFOCUS

                                                                                                                                                                                                                                                                Event: ON LOSTFOCUS

                                                                                                                                                                                                                                                                Event: ON MOUSECLICK

                                                                                                                                                                                                                                                                Event: ON MOUSEMOVE

                                                                                                                                                                                                                                                                Event: ON SIZE

                                                                                                                                                                                                                                                                Event: ON MAXIMIZE

                                                                                                                                                                                                                                                                Event: ON MINIMIZE

                                                                                                                                                                                                                                                Window Properties

                                                                                                                                                                                                                                                Window Controls

                                                                                                                                                                                                                                                                you show statusbar

                                                                                                                                                                                                                                                                                mylast = Get Length of String/Variable/Array RT_GUI_Statusbar

                                                                                                                                                                                                                                                                                FOR LOOP ( From tempx = 1 To mylast Step 1)

                                                                                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                                                                                IF ( RT_GUI_Statusbar[tempx][1] == cwinname )

                                                                                                                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                                                                                                                Define New Statusbar

                                                                                                                                                                                                                                                                                                                                                                Items

                                                                                                                                                                                                                                                                                                                                                                                mylast2 = Get Length of String/Variable/Array RT_GUI_Statusbar[tempx][8]

                                                                                                                                                                                                                                                                                                                                                                                FOR LOOP ( From tempx2 = 1 To mylast2 Step 1)

                                                                                                                                                                                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                                                                                                                                                                                IF ( RT_GUI_Statusbar[tempx][8][tempx2][1] = 1 )

                                                                                                                                                                                                                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                                                                                                                                                                                                                tempcaption = RT_GUI_Statusbar[tempx][8][tempx2][2]

                                                                                                                                                                                                                                                                                                                                                                                                                                                Define New StatusItem ( (tempcaption) )

                                                                                                                                                                                                                                                                                                                                                                                                                                                                Events

                                                                                                                                                                                                                                                                                                                                                                                                                                                                Properties

                                                                                                                                                                                                                                                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                                                                                                                                                                                                                                                IF ( RT_GUI_Statusbar[tempx][8][tempx2][1] = 2 )

                                                                                                                                                                                                                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                                                                                                                                                                                                                Clock

                                                                                                                                                                                                                                                                                                                                                                                                                                                                Events

                                                                                                                                                                                                                                                                                                                                                                                                                                                                Properties

                                                                                                                                                                                                                                                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                                                                                                                                                                                                                                                IF ( RT_GUI_Statusbar[tempx][8][tempx2][1] = 3 )

                                                                                                                                                                                                                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                                                                                                                                                                                                                Date

                                                                                                                                                                                                                                                                                                                                                                                                                                                                Events

                                                                                                                                                                                                                                                                                                                                                                                                                                                                Properties

                                                                                                                                                                                                                                                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                                                                                                                                                                                                                                                IF ( RT_GUI_Statusbar[tempx][8][tempx2][1] = 4 )

                                                                                                                                                                                                                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                                                                                                                                                                                                                Keyboard

                                                                                                                                                                                                                                                                                                                                                                                                                                                                Events

                                                                                                                                                                                                                                                                                                                                                                                                                                                                Properties

                                                                                                                                                                                                                                                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                                                                                                                                                                                                                                End of For Loop

                                                                                                                                                                                                                                                                                                                                                                End Statusbar

                                                                                                                                                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                                                                                                                                End of For Loop

                                                                                                                                                                                                                                                End Of Window

                                                                                                                                                                                                                ELSE

                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                Define Window  ( &cwinname )

                                                                                                                                                                                                                                                                Window Events

                                                                                                                                                                                                                                                                Window Properties

                                                                                                                                                                                                                                                                Window Controls

                                                                                                                                                                                                                                                                                you show statusbar

                                                                                                                                                                                                                                                                                                mylast = Get Length of String/Variable/Array RT_GUI_Statusbar

                                                                                                                                                                                                                                                                                                FOR LOOP ( From tempx = 1 To mylast Step 1)

                                                                                                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                                                                                                IF ( RT_GUI_Statusbar[tempx][1] == cwinname )

                                                                                                                                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                                                                                                                                Define New Statusbar

                                                                                                                                                                                                                                                                                                                                                                                Items

                                                                                                                                                                                                                                                                                                                                                                                                mylast2 = Get Length of String/Variable/Array RT_GUI_Statusbar[tempx][8]

                                                                                                                                                                                                                                                                                                                                                                                                FOR LOOP ( From tempx2 = 1 To mylast2 Step 1)

                                                                                                                                                                                                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                                                                                                                                                                                                IF ( RT_GUI_Statusbar[tempx][8][tempx2][1] = 1 )

                                                                                                                                                                                                                                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                                                                                                                                                                                                                                tempcaption = RT_GUI_Statusbar[tempx][8][tempx2][2]

                                                                                                                                                                                                                                                                                                                                                                                                                                                                Define New StatusItem ( (tempcaption) )

                                                                                                                                                                                                                                                                                                                                                                                                                                                                                Events

                                                                                                                                                                                                                                                                                                                                                                                                                                                                                Properties

                                                                                                                                                                                                                                                                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                                                                                                                                                                                                                                                                IF ( RT_GUI_Statusbar[tempx][8][tempx2][1] = 2 )

                                                                                                                                                                                                                                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                                                                                                                                                                                                                                Clock

                                                                                                                                                                                                                                                                                                                                                                                                                                                                                Events

                                                                                                                                                                                                                                                                                                                                                                                                                                                                                Properties

                                                                                                                                                                                                                                                                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                                                                                                                                                                                                                                                                IF ( RT_GUI_Statusbar[tempx][8][tempx2][1] = 3 )

                                                                                                                                                                                                                                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                                                                                                                                                                                                                                Date

                                                                                                                                                                                                                                                                                                                                                                                                                                                                                Events

                                                                                                                                                                                                                                                                                                                                                                                                                                                                                Properties

                                                                                                                                                                                                                                                                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                                                                                                                                                                                                                                                                IF ( RT_GUI_Statusbar[tempx][8][tempx2][1] = 4 )

                                                                                                                                                                                                                                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                                                                                                                                                                                                                                Keyboard

                                                                                                                                                                                                                                                                                                                                                                                                                                                                                Events

                                                                                                                                                                                                                                                                                                                                                                                                                                                                                Properties

                                                                                                                                                                                                                                                                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                                                                                                                                                                                                                                                End of For Loop

                                                                                                                                                                                                                                                                                                                                                                                End Statusbar

                                                                                                                                                                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                                                                                                                                                End of For Loop

                                                                                                                                                                                                                                                                End Of Window

                                                                                                                                                                                                                                                winscount = winscount-1

                                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                ELSE

                                                                                                                                                Code Block

                                                                                                                                                                IF ( initpara2 = true )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                IF ( initpara3 = false )

                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                Define Window  ( &cwinname )

                                                                                                                                                                                                                                                Window Events

                                                                                                                                                                                                                                                                Event: ON RELEASE

                                                                                                                                                                                                                                                                Event: ON MOVE

                                                                                                                                                                                                                                                                Event: ON GOTFOCUS

                                                                                                                                                                                                                                                                Event: ON LOSTFOCUS

                                                                                                                                                                                                                                                                Event: ON MOUSECLICK

                                                                                                                                                                                                                                                                Event: ON MOUSEMOVE

                                                                                                                                                                                                                                                                Event: ON SIZE

                                                                                                                                                                                                                                                                Event: ON MAXIMIZE

                                                                                                                                                                                                                                                                Event: ON MINIMIZE

                                                                                                                                                                                                                                                Window Properties

                                                                                                                                                                                                                                                Window Controls

                                                                                                                                                                                                                                                                you show statusbar

                                                                                                                                                                                                                                                                                mylast = Get Length of String/Variable/Array RT_GUI_Statusbar

                                                                                                                                                                                                                                                                                FOR LOOP ( From tempx = 1 To mylast Step 1)

                                                                                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                                                                                IF ( RT_GUI_Statusbar[tempx][1] == cwinname )

                                                                                                                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                                                                                                                Define New Statusbar

                                                                                                                                                                                                                                                                                                                                                                Items

                                                                                                                                                                                                                                                                                                                                                                                mylast2 = Get Length of String/Variable/Array RT_GUI_Statusbar[tempx][8]

                                                                                                                                                                                                                                                                                                                                                                                FOR LOOP ( From tempx2 = 1 To mylast2 Step 1)

                                                                                                                                                                                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                                                                                                                                                                                IF ( RT_GUI_Statusbar[tempx][8][tempx2][1] = 1 )

                                                                                                                                                                                                                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                                                                                                                                                                                                                tempcaption = RT_GUI_Statusbar[tempx][8][tempx2][2]

                                                                                                                                                                                                                                                                                                                                                                                                                                                Define New StatusItem ( (tempcaption) )

                                                                                                                                                                                                                                                                                                                                                                                                                                                                Events

                                                                                                                                                                                                                                                                                                                                                                                                                                                                Properties

                                                                                                                                                                                                                                                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                                                                                                                                                                                                                                                IF ( RT_GUI_Statusbar[tempx][8][tempx2][1] = 2 )

                                                                                                                                                                                                                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                                                                                                                                                                                                                Clock

                                                                                                                                                                                                                                                                                                                                                                                                                                                                Events

                                                                                                                                                                                                                                                                                                                                                                                                                                                                Properties

                                                                                                                                                                                                                                                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                                                                                                                                                                                                                                                IF ( RT_GUI_Statusbar[tempx][8][tempx2][1] = 3 )

                                                                                                                                                                                                                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                                                                                                                                                                                                                Date

                                                                                                                                                                                                                                                                                                                                                                                                                                                                Events

                                                                                                                                                                                                                                                                                                                                                                                                                                                                Properties

                                                                                                                                                                                                                                                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                                                                                                                                                                                                                                                IF ( RT_GUI_Statusbar[tempx][8][tempx2][1] = 4 )

                                                                                                                                                                                                                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                                                                                                                                                                                                                Keyboard

                                                                                                                                                                                                                                                                                                                                                                                                                                                                Events

                                                                                                                                                                                                                                                                                                                                                                                                                                                                Properties

                                                                                                                                                                                                                                                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                                                                                                                                                                                                                                End of For Loop

                                                                                                                                                                                                                                                                                                                                                                End Statusbar

                                                                                                                                                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                                                                                                                                End of For Loop

                                                                                                                                                                                                                                                End Of Window

                                                                                                                                                                                                                ELSE

                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                Define Window  ( &cwinname )

                                                                                                                                                                                                                                                                Window Events

                                                                                                                                                                                                                                                                Window Properties

                                                                                                                                                                                                                                                                Window Controls

                                                                                                                                                                                                                                                                                you show statusbar

                                                                                                                                                                                                                                                                                                mylast = Get Length of String/Variable/Array RT_GUI_Statusbar

                                                                                                                                                                                                                                                                                                FOR LOOP ( From tempx = 1 To mylast Step 1)

                                                                                                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                                                                                                IF ( RT_GUI_Statusbar[tempx][1] == cwinname )

                                                                                                                                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                                                                                                                                Define New Statusbar

                                                                                                                                                                                                                                                                                                                                                                                Items

                                                                                                                                                                                                                                                                                                                                                                                                mylast2 = Get Length of String/Variable/Array RT_GUI_Statusbar[tempx][8]

                                                                                                                                                                                                                                                                                                                                                                                                FOR LOOP ( From tempx2 = 1 To mylast2 Step 1)

                                                                                                                                                                                                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                                                                                                                                                                                                IF ( RT_GUI_Statusbar[tempx][8][tempx2][1] = 1 )

                                                                                                                                                                                                                                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                                                                                                                                                                                                                                tempcaption = RT_GUI_Statusbar[tempx][8][tempx2][2]

                                                                                                                                                                                                                                                                                                                                                                                                                                                                Define New StatusItem ( (tempcaption) )

                                                                                                                                                                                                                                                                                                                                                                                                                                                                                Events

                                                                                                                                                                                                                                                                                                                                                                                                                                                                                Properties

                                                                                                                                                                                                                                                                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                                                                                                                                                                                                                                                                IF ( RT_GUI_Statusbar[tempx][8][tempx2][1] = 2 )

                                                                                                                                                                                                                                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                                                                                                                                                                                                                                Clock

                                                                                                                                                                                                                                                                                                                                                                                                                                                                                Events

                                                                                                                                                                                                                                                                                                                                                                                                                                                                                Properties

                                                                                                                                                                                                                                                                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                                                                                                                                                                                                                                                                IF ( RT_GUI_Statusbar[tempx][8][tempx2][1] = 3 )

                                                                                                                                                                                                                                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                                                                                                                                                                                                                                Date

                                                                                                                                                                                                                                                                                                                                                                                                                                                                                Events

                                                                                                                                                                                                                                                                                                                                                                                                                                                                                Properties

                                                                                                                                                                                                                                                                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                                                                                                                                                                                                                                                                IF ( RT_GUI_Statusbar[tempx][8][tempx2][1] = 4 )

                                                                                                                                                                                                                                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                                                                                                                                                                                                                                Keyboard

                                                                                                                                                                                                                                                                                                                                                                                                                                                                                Events

                                                                                                                                                                                                                                                                                                                                                                                                                                                                                Properties

                                                                                                                                                                                                                                                                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                                                                                                                                                                                                                                                End of For Loop

                                                                                                                                                                                                                                                                                                                                                                                End Statusbar

                                                                                                                                                                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                                                                                                                                                End of For Loop

                                                                                                                                                                                                                                                                End Of Window

                                                                                                                                                                                                                                                winscount = winscount-1

                                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                ELSE

                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                IF ( initpara3 = false )

                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                Define Window  ( &cwinname )

                                                                                                                                                                                                                                                                Window Events

                                                                                                                                                                                                                                                                                Event: ON RELEASE

                                                                                                                                                                                                                                                                                Event: ON MOVE

                                                                                                                                                                                                                                                                                Event: ON GOTFOCUS

                                                                                                                                                                                                                                                                                Event: ON LOSTFOCUS

                                                                                                                                                                                                                                                                                Event: ON MOUSECLICK

                                                                                                                                                                                                                                                                                Event: ON MOUSEMOVE

                                                                                                                                                                                                                                                                                Event: ON SIZE

                                                                                                                                                                                                                                                                                Event: ON MAXIMIZE

                                                                                                                                                                                                                                                                                Event: ON MINIMIZE

                                                                                                                                                                                                                                                                Window Properties

                                                                                                                                                                                                                                                                Window Controls

                                                                                                                                                                                                                                                                                you show statusbar

                                                                                                                                                                                                                                                                                                mylast = Get Length of String/Variable/Array RT_GUI_Statusbar

                                                                                                                                                                                                                                                                                                FOR LOOP ( From tempx = 1 To mylast Step 1)

                                                                                                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                                                                                                IF ( RT_GUI_Statusbar[tempx][1] == cwinname )

                                                                                                                                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                                                                                                                                Define New Statusbar

                                                                                                                                                                                                                                                                                                                                                                                Items

                                                                                                                                                                                                                                                                                                                                                                                                mylast2 = Get Length of String/Variable/Array RT_GUI_Statusbar[tempx][8]

                                                                                                                                                                                                                                                                                                                                                                                                FOR LOOP ( From tempx2 = 1 To mylast2 Step 1)

                                                                                                                                                                                                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                                                                                                                                                                                                IF ( RT_GUI_Statusbar[tempx][8][tempx2][1] = 1 )

                                                                                                                                                                                                                                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                                                                                                                                                                                                                                tempcaption = RT_GUI_Statusbar[tempx][8][tempx2][2]

                                                                                                                                                                                                                                                                                                                                                                                                                                                                Define New StatusItem ( (tempcaption) )

                                                                                                                                                                                                                                                                                                                                                                                                                                                                                Events

                                                                                                                                                                                                                                                                                                                                                                                                                                                                                Properties

                                                                                                                                                                                                                                                                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                                                                                                                                                                                                                                                                IF ( RT_GUI_Statusbar[tempx][8][tempx2][1] = 2 )

                                                                                                                                                                                                                                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                                                                                                                                                                                                                                Clock

                                                                                                                                                                                                                                                                                                                                                                                                                                                                                Events

                                                                                                                                                                                                                                                                                                                                                                                                                                                                                Properties

                                                                                                                                                                                                                                                                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                                                                                                                                                                                                                                                                IF ( RT_GUI_Statusbar[tempx][8][tempx2][1] = 3 )

                                                                                                                                                                                                                                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                                                                                                                                                                                                                                Date

                                                                                                                                                                                                                                                                                                                                                                                                                                                                                Events

                                                                                                                                                                                                                                                                                                                                                                                                                                                                                Properties

                                                                                                                                                                                                                                                                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                                                                                                                                                                                                                                                                IF ( RT_GUI_Statusbar[tempx][8][tempx2][1] = 4 )

                                                                                                                                                                                                                                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                                                                                                                                                                                                                                Keyboard

                                                                                                                                                                                                                                                                                                                                                                                                                                                                                Events

                                                                                                                                                                                                                                                                                                                                                                                                                                                                                Properties

                                                                                                                                                                                                                                                                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                                                                                                                                                                                                                                                End of For Loop

                                                                                                                                                                                                                                                                                                                                                                                End Statusbar

                                                                                                                                                                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                                                                                                                                                End of For Loop

                                                                                                                                                                                                                                                                End Of Window

                                                                                                                                                                                                                                ELSE

                                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                                Define Window  ( &cwinname )

                                                                                                                                                                                                                                                                                Window Events

                                                                                                                                                                                                                                                                                Window Properties

                                                                                                                                                                                                                                                                                Window Controls

                                                                                                                                                                                                                                                                                                you show statusbar

                                                                                                                                                                                                                                                                                                                mylast = Get Length of String/Variable/Array RT_GUI_Statusbar

                                                                                                                                                                                                                                                                                                                FOR LOOP ( From tempx = 1 To mylast Step 1)

                                                                                                                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                                                                                                                IF ( RT_GUI_Statusbar[tempx][1] == cwinname )

                                                                                                                                                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                                                                                                                                                Define New Statusbar

                                                                                                                                                                                                                                                                                                                                                                                                Items

                                                                                                                                                                                                                                                                                                                                                                                                                mylast2 = Get Length of String/Variable/Array RT_GUI_Statusbar[tempx][8]

                                                                                                                                                                                                                                                                                                                                                                                                                FOR LOOP ( From tempx2 = 1 To mylast2 Step 1)

                                                                                                                                                                                                                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                                                                                                                                                                                                                IF ( RT_GUI_Statusbar[tempx][8][tempx2][1] = 1 )

                                                                                                                                                                                                                                                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                                                                                                                                                                                                                                                tempcaption = RT_GUI_Statusbar[tempx][8][tempx2][2]

                                                                                                                                                                                                                                                                                                                                                                                                                                                                                Define New StatusItem ( (tempcaption) )

                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                Events

                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                Properties

                                                                                                                                                                                                                                                                                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                                                                                                                                                                                                                                                                                IF ( RT_GUI_Statusbar[tempx][8][tempx2][1] = 2 )

                                                                                                                                                                                                                                                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                                                                                                                                                                                                                                                Clock

                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                Events

                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                Properties

                                                                                                                                                                                                                                                                                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                                                                                                                                                                                                                                                                                IF ( RT_GUI_Statusbar[tempx][8][tempx2][1] = 3 )

                                                                                                                                                                                                                                                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                                                                                                                                                                                                                                                Date

                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                Events

                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                Properties

                                                                                                                                                                                                                                                                                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                                                                                                                                                                                                                                                                                IF ( RT_GUI_Statusbar[tempx][8][tempx2][1] = 4 )

                                                                                                                                                                                                                                                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                                                                                                                                                                                                                                                Keyboard

                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                Events

                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                Properties

                                                                                                                                                                                                                                                                                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                                                                                                                                                                                                                                                                End of For Loop

                                                                                                                                                                                                                                                                                                                                                                                                End Statusbar

                                                                                                                                                                                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                                                                                                                                                                End of For Loop

                                                                                                                                                                                                                                                                                End Of Window

                                                                                                                                                                                                                                                                winscount = winscount-1

                                                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                END OF IF STATEMENT

                                                                                                                IF ( initpara3 = false )

                                                                                                                                Code Block

                                                                                                                                                Activate Window/Form &cwinname No Wait

                                                                                                                                END OF IF STATEMENT

                                                                                                                Add item {"window",cwinname,"NULL","NOEVENTS","NOPARENT"} To Array MyOpObjsMap

                                                                                                                Return 0

                                                                                                END OF IF STATEMENT

                                                                Window Title Is

                                                                                IF ( myopcode = 2 )

                                                                                                Code Block

                                                                                                                Call Procedure setproperty Parameters MyOpWinName,"title",myopdata[1]

                                                                                                                Return 0

                                                                                                END OF IF STATEMENT

                                                                Window Direction Is

                                                                                IF ( myopcode = 3 )

                                                                                                Code Block

                                                                                                                avalue = myopdata[1]

                                                                                                                avalue = Sub String " " FROM avalue TRANSFORM TO ""

                                                                                                                IF ( avalue == "righttoleft" .or. avalue == "بدايةمناليمينلليسار" )

                                                                                                                                Code Block

                                                                                                                                                Right-To-Left, Window MyOpWinName

                                                                                                                                END OF IF STATEMENT

                                                                                                                Return 0

                                                                                                END OF IF STATEMENT

                                                                Window Backcolor is

                                                                                IF ( myopcode = 4 )

                                                                                                Code Block

                                                                                                                acolor = RT_CheckColor(myopdata[1])

                                                                                                                acolor = &acolor

                                                                                                                Call Procedure setproperty Parameters MyOpWinName,"backcolor",acolor

                                                                                                                Return 0

                                                                                                END OF IF STATEMENT

                                                                Window Top is

                                                                                IF ( myopcode = 5 )

                                                                                                Code Block

                                                                                                                Call Procedure setproperty Parameters MyOpWinName,"row",val(myopdata[1])

                                                                                                                Return 0

                                                                                                END OF IF STATEMENT

                                                                Window Left is

                                                                                IF ( myopcode = 6 )

                                                                                                Code Block

                                                                                                                Call Procedure setproperty Parameters MyOpWinName,"col",val(myopdata[1])

                                                                                                                Return 0

                                                                                                END OF IF STATEMENT

                                                                Window Width is

                                                                                IF ( myopcode = 7 )

                                                                                                Code Block

                                                                                                                Call Procedure setproperty Parameters MyOpWinName,"width",val(myopdata[1])

                                                                                                                Return 0

                                                                                                END OF IF STATEMENT

                                                                Window Height is

                                                                                IF ( myopcode = 8 )

                                                                                                Code Block

                                                                                                                Call Procedure setproperty Parameters MyOpWinName,"height",val(myopdata[1])

                                                                                                                Return 0

                                                                                                END OF IF STATEMENT

                                                                You Maximize Window

                                                                                IF ( myopcode = 9 )

                                                                                                Code Block

                                                                                                                Call Procedure domethod Parameters MyOpWinName,"maximize"

                                                                                                                Return 0

                                                                                                END OF IF STATEMENT

                                                                You Minimize Window

                                                                                IF ( myopcode = 10 )

                                                                                                Code Block

                                                                                                                Call Procedure domethod Parameters MyOpWinName,"minimize"

                                                                                                                Return 0

                                                                                                END OF IF STATEMENT

                                                                You Centre Window

                                                                                IF ( myopcode = 11 )

                                                                                                Code Block

                                                                                                                VTEMP3 = Call Function GetProperty ( myopwinname,"width" )

                                                                                                                VTEMP4 = Call Function GetProperty ( myopwinname,"height" )

                                                                                                                DesktopWidth = Get Desktop Width

                                                                                                                DesktopHeight = Get Desktop Height

                                                                                                                v1 = (desktopheight - vtemp4) / 2

                                                                                                                v2 = (desktopwidth - vtemp3) / 2

                                                                                                                Call Procedure setproperty Parameters MyOpWinName,"row",v1

                                                                                                                Call Procedure setproperty Parameters MyOpWinName,"col",v2

                                                                                                                Return 0

                                                                                                END OF IF STATEMENT

                                                                You Show Window

                                                                                IF ( myopcode = 12 )

                                                                                                Code Block

                                                                                                                Call Procedure domethod Parameters MyOpWinName,"show"

                                                                                                                Return 0

                                                                                                END OF IF STATEMENT

                                                                You Hide Window

                                                                                IF ( myopcode = 13 )

                                                                                                Code Block

                                                                                                                Call Procedure domethod Parameters MyOpWinName,"hide"

                                                                                                                Return 0

                                                                                                END OF IF STATEMENT

                                                                You Close Window

                                                                                IF ( myopcode = 14 )

                                                                                                Code Block

                                                                                                                Call Procedure domethod Parameters MyOpWinName,"release"

                                                                                                                Return 0

                                                                                                END OF IF STATEMENT

                                                                Window Name Is

                                                                                IF ( myopcode = 15 )

                                                                                                Code Block

                                                                                                                vmax = Get Length of String/Variable/Array MyOpObjsMap

                                                                                                                FOR LOOP ( From x = vmax To 1 Step -1)

                                                                                                                                Code Block

                                                                                                                                                IF ( MyOpObjsMap[x][1] = "window" )

                                                                                                                                                                Code Block

                                                                                                                                                                                IF ( lower(alltrim(MyOpObjsMap[x][2])) == lower(alltrim(MyOpWinName)) )

                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                MyOpObjsMap[x][3] = MyOpData[1]

                                                                                                                                                                                                                Exit

                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                End of For Loop

                                                                                                                Return 0

                                                                                                END OF IF STATEMENT

                                                                Window Selected

                                                                                IF ( myopcode = 16 )

                                                                                                Code Block

                                                                                                                MyOpWinName = "NULL"

                                                                                                                vmax = Get Length of String/Variable/Array MyOpObjsMap

                                                                                                                FOR LOOP ( From x = vmax To 1 Step -1)

                                                                                                                                Code Block

                                                                                                                                                IF ( MyOpObjsMap[x][1] = "window" )

                                                                                                                                                                Code Block

                                                                                                                                                                                IF ( lower(alltrim(MyOpObjsMap[x][3])) == lower(alltrim(MyOpData[1])) )

                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                MyOpWinName = MyOpObjsMap[x][2]

                                                                                                                                                                                                                Exit

                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                End of For Loop

                                                                                                                IF ( MyOpWinName = "NULL" )

                                                                                                                                Code Block

                                                                                                                                                Show Message "Window " + myopdata[1]+" is not found !!!" Title "Supernova - Runtime Error" Type: Mes

                                                                                                                                                MyActiveProc = "NULL"

                                                                                                                                END OF IF STATEMENT

                                                                                                                Return 0

                                                                                                END OF IF STATEMENT

                                                                You Close Application

                                                                                IF ( myopcode = 17 )

                                                                                                Code Block

                                                                                                                SysSwitch = False

                                                                                                                winscount = 0

                                                                                                                Return 0

                                                                                                END OF IF STATEMENT

                                                                Window Title from

                                                                                IF ( myopcode = 18 )

                                                                                                Code Block

                                                                                                                Call Procedure RT_ReadExpr Parameters myopdata[1],"RightSide"

                                                                                                                VARVALUE = Call Function RT_GetExprValue ( RT_RS_DATA )

                                                                                                                Call Procedure setproperty Parameters MyOpWinName,"title",varvalue

                                                                                                                Return 0

                                                                                                END OF IF STATEMENT

                                                                Window Title to

                                                                                IF ( myopcode = 19 )

                                                                                                Code Block

                                                                                                                myvalue = Call Function GetProperty ( myopwinname,"title" )

                                                                                                                Call Procedure RT_SetVarValue Parameters myopdata[1],myvalue

                                                                                                                Return 0

                                                                                                END OF IF STATEMENT

                                                                Window Parent is

                                                                                IF ( myopcode = 20 )

                                                                                                Code Block

                                                                                                                vmax = Get Length of String/Variable/Array MyOpObjsMap

                                                                                                                FOR LOOP ( From x = vmax To 1 Step -1)

                                                                                                                                Code Block

                                                                                                                                                IF ( MyOpObjsMap[x][1] = "window" )

                                                                                                                                                                Code Block

                                                                                                                                                                                IF ( lower(alltrim(MyOpObjsMap[x][3])) == lower(alltrim(MyOpData[1])) )

                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                Myparent = MyOpObjsMap[x][2]

                                                                                                                                                                                                                myhandle = Get Window (myopwinname) Handle

                                                                                                                                                                                                                myparenthandle = Get Window (myparent) Handle

                                                                                                                                                                                                                myout = Call DLL "user32.dll" , Function "SetParent" , Parameters myhandle,myparenthandle

                                                                                                                                                                                                                FOR LOOP ( From x2 = vmax To 1 Step -1)

                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                IF ( MyOpObjsMap[x2][1] = "window" )

                                                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                                                IF ( alltrim(myopobjsmap[x2][2]) == alltrim(myopwinname) )

                                                                                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                                                                                myopobjsmap[x2][5] = "CHILD"

                                                                                                                                                                                                                                                                                                                Exit

                                                                                                                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                                                                End of For Loop

                                                                                                                                                                                                                Exit

                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                End of For Loop

                                                                                                                Return 0

                                                                                                END OF IF STATEMENT

                                                                Application Title Is

                                                                                IF ( myopcode = 21 )

                                                                                                Code Block

                                                                                                                Call Procedure setproperty Parameters "win1","title",myopdata[1]

                                                                                                                Return 0

                                                                                                END OF IF STATEMENT

                                                                Window Top to

                                                                                IF ( myopcode = 29 )

                                                                                                Code Block

                                                                                                                myvalue = Call Function GetProperty ( myopwinname,"row" )

                                                                                                                Call Procedure RT_SetVarValue Parameters myopdata[1],alltrim(str(myvalue))

                                                                                                                Return 0

                                                                                                END OF IF STATEMENT

                                                                Window Left to

                                                                                IF ( myopcode = 30 )

                                                                                                Code Block

                                                                                                                myvalue = Call Function GetProperty ( myopwinname,"col" )

                                                                                                                Call Procedure RT_SetVarValue Parameters myopdata[1],alltrim(str(myvalue))

                                                                                                                Return 0

                                                                                                END OF IF STATEMENT

                                                                Window Width to

                                                                                IF ( myopcode = 31 )

                                                                                                Code Block

                                                                                                                myvalue = Call Function GetProperty ( myopwinname,"width" )

                                                                                                                Call Procedure RT_SetVarValue Parameters myopdata[1],alltrim(str(myvalue))

                                                                                                                Return 0

                                                                                                END OF IF STATEMENT

                                                                Window Height to

                                                                                IF ( myopcode = 32 )

                                                                                                Code Block

                                                                                                                myvalue = Call Function GetProperty ( myopwinname,"height" )

                                                                                                                Call Procedure RT_SetVarValue Parameters myopdata[1],alltrim(Str(myvalue))

                                                                                                                Return 0

                                                                                                END OF IF STATEMENT

                                                                Window Top from

                                                                                IF ( myopcode = 33 )

                                                                                                Code Block

                                                                                                                Call Procedure RT_ReadExpr Parameters myopdata[1],"RightSide"

                                                                                                                VARVALUE = Call Function RT_GetExprValue ( RT_RS_DATA )

                                                                                                                Call Procedure setproperty Parameters MyOpWinName,"row",val(varvalue)

                                                                                                                Return 0

                                                                                                END OF IF STATEMENT

                                                                Window Height from

                                                                                IF ( myopcode = 34 )

                                                                                                Code Block

                                                                                                                Call Procedure RT_ReadExpr Parameters myopdata[1],"RightSide"

                                                                                                                VARVALUE = Call Function RT_GetExprValue ( RT_RS_DATA )

                                                                                                                Call Procedure setproperty Parameters MyOpWinName,"col",val(varvalue)

                                                                                                                Return 0

                                                                                                END OF IF STATEMENT

                                                                Window Top from

                                                                                IF ( myopcode = 35 )

                                                                                                Code Block

                                                                                                                Call Procedure RT_ReadExpr Parameters myopdata[1],"RightSide"

                                                                                                                VARVALUE = Call Function RT_GetExprValue ( RT_RS_DATA )

                                                                                                                Call Procedure setproperty Parameters MyOpWinName,"width",val(varvalue)

                                                                                                                Return 0

                                                                                                END OF IF STATEMENT

                                                                Window Top from

                                                                                IF ( myopcode = 36 )

                                                                                                Code Block

                                                                                                                Call Procedure RT_ReadExpr Parameters myopdata[1],"RightSide"

                                                                                                                VARVALUE = Call Function RT_GetExprValue ( RT_RS_DATA )

                                                                                                                Call Procedure setproperty Parameters MyOpWinName,"height",val(varvalue)

                                                                                                                Return 0

                                                                                                END OF IF STATEMENT

                                                Controls

                                                                Set Selected Object

                                                                                Button

                                                                                                IF ( myopcode >= 50 .and. myopcode <= 76 )

                                                                                                                Code Block

                                                                                                                                oldvalue = MyOpObjectName

                                                                                                                                MyOpObjectName = ObjSelArray[1]

                                                                                                                                Check Errors

                                                                                                                                                IF ( myopcode != 50 )

                                                                                                                                                                Code Block

                                                                                                                                                                                IF ( myopwinname = "NULL" )

                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                Call Procedure RTE_AddError Parameters 11

                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                IF ( myopobjectname = "NULL" )

                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                Call Procedure RTE_AddError Parameters 12

                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                Call Procedure RTE_Check

                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                Button

                                                                                                                                                I want button

                                                                                                                                                                IF ( myopcode = 50 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                ObjsCount = ObjsCount+1

                                                                                                                                                                                                cobjscount = CONVERT Objscount TO STRING

                                                                                                                                                                                                cobjscount = All Trim cobjscount

                                                                                                                                                                                                cobjname = "obj_"+cobjscount

                                                                                                                                                                                                MyOpObjectName = cobjname

                                                                                                                                                                                                Event Blocks

                                                                                                                                                                                                                mymouseclickblock = "RT_DoEvent('button','" + cobjname+"','mouseclick')"

                                                                                                                                                                                                Define New Button ( &cobjname ) , Caption : "No Caption"

                                                                                                                                                                                                                Button Events

                                                                                                                                                                                                                                Event: ON CLICK

                                                                                                                                                                                                                Button Properties

                                                                                                                                                                                                Add item {"button",cobjname,"NULL","NOEVENTS",myopwinname} To Array MyOpObjsMap

                                                                                                                                                                                                ObjSelArray[1] = MyOpObjectName

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Button Caption is

                                                                                                                                                                IF ( myopcode = 51 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"caption",myopdata[1]

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Button Top is

                                                                                                                                                                IF ( myopcode = 52 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"row",val(myopdata[1])

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Button Left is

                                                                                                                                                                IF ( myopcode = 53 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"col",val(myopdata[1])

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Button Width is

                                                                                                                                                                IF ( myopcode = 54 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"width",val(myopdata[1])

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Button Height is

                                                                                                                                                                IF ( myopcode = 55 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"height",val(myopdata[1])

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Button Name Is

                                                                                                                                                                IF ( myopcode = 56 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                vmax = Get Length of String/Variable/Array MyOpObjsMap

                                                                                                                                                                                                FOR LOOP ( From x = vmax To 1 Step -1)

                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                IF ( MyOpObjsMap[x][1] = "button" )

                                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                                IF ( lower(alltrim(MyOpObjsMap[x][2])) == lower(alltrim(MyOpObjectName)) )

                                                                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                                                                MyOpObjsMap[x][3] = MyOpData[1]

                                                                                                                                                                                                                                                                                                Exit

                                                                                                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                                                End of For Loop

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Button Font Name is

                                                                                                                                                                IF ( myopcode = 57 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"fontname",myopdata[1]

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Button Font Size is

                                                                                                                                                                IF ( myopcode = 58 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"fontsize",val(myopdata[1])

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Button Fore Color is

                                                                                                                                                                IF ( myopcode = 59 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                acolor = RT_CheckColor(myopdata[1])

                                                                                                                                                                                                acolor = &acolor

                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"forecolor",acolor

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Button Back Color is

                                                                                                                                                                IF ( myopcode = 60 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                acolor = RT_CheckColor(myopdata[1])

                                                                                                                                                                                                acolor = &acolor

                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"backcolor",acolor

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Button Font Bold is

                                                                                                                                                                IF ( myopcode = 61 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                VarValue = lower(alltrim(myopdata[1]))

                                                                                                                                                                                                IF ( VarValue = "true" .or. VarValue = "1" )

                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"fontbold",.T.

                                                                                                                                                                                                                ELSE

                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"fontbold",.F.

                                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Button Font Italic is

                                                                                                                                                                IF ( myopcode = 62 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                VarValue = lower(alltrim(myopdata[1]))

                                                                                                                                                                                                IF ( VarValue = "true" .or. VarValue = "1" )

                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"fontitalic",.T.

                                                                                                                                                                                                                ELSE

                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"fontitalic",.F.

                                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Button Font Underline is

                                                                                                                                                                IF ( myopcode = 63 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                VarValue = lower(alltrim(myopdata[1]))

                                                                                                                                                                                                IF ( VarValue = "true" .or. VarValue = "1" )

                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"fontunderline",.T.

                                                                                                                                                                                                                ELSE

                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"fontunderline",.F.

                                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Button Font Strickout s

                                                                                                                                                                IF ( myopcode = 64 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                VarValue = lower(alltrim(myopdata[1]))

                                                                                                                                                                                                IF ( VarValue = "true" .or. VarValue = "1" )

                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"fontstrickout",.T.

                                                                                                                                                                                                                ELSE

                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"fontstrickout",.F.

                                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Button Picture is

                                                                                                                                                                IF ( myopcode = 65 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"picture",myopdata[1]

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Button Selected

                                                                                                                                                                IF ( myopcode = 66 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                Call Procedure RT_SelectObject Parameters 1,"button"

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Button Caption from

                                                                                                                                                                IF ( myopcode = 67 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                Call Procedure RT_ReadExpr Parameters myopdata[1],"RightSide"

                                                                                                                                                                                                VARVALUE = Call Function RT_GetExprValue ( RT_RS_DATA )

                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"caption",varvalue

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Button Caption to

                                                                                                                                                                IF ( myopcode = 68 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                myvalue = Call Function GetProperty ( myopwinname,myopobjectname,"caption" )

                                                                                                                                                                                                Call Procedure RT_SetVarValue Parameters myopdata[1],myvalue

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Object Dimension (69- 76)

                                                                                                                                                                Call Procedure RT_GUIDIM Parameters 69,MyOpObjectName

                                                                                                                END OF IF STATEMENT

                                                                                Label

                                                                                                IF ( myopcode >= 100 .and. myopcode <= 127 )

                                                                                                                Code Block

                                                                                                                                oldvalue = MyOpObjectName

                                                                                                                                MyOpObjectName = ObjSelArray[2]

                                                                                                                                Check Errors

                                                                                                                                                IF ( myopcode != 100 .and. myopcode != 115 .and. myopcode != 116 )

                                                                                                                                                                Code Block

                                                                                                                                                                                IF ( myopwinname = "NULL" )

                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                Call Procedure RTE_AddError Parameters 11

                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                IF ( myopobjectname = "NULL" )

                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                Call Procedure RTE_AddError Parameters 12

                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                Call Procedure RTE_Check

                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                Label

                                                                                                                                                I want label

                                                                                                                                                                IF ( myopcode = 100 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                ObjsCount = ObjsCount+1

                                                                                                                                                                                                cobjscount = CONVERT Objscount TO STRING

                                                                                                                                                                                                cobjscount = All Trim cobjscount

                                                                                                                                                                                                cobjname = "obj_"+cobjscount

                                                                                                                                                                                                MyOpObjectName = cobjname

                                                                                                                                                                                                Event Blocks

                                                                                                                                                                                                                mymouseclickblock = "RT_DoEvent('label','" + cobjname+"','mouseclick')"

                                                                                                                                                                                                IF ( initpara1 = "true" )

                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                Define Label ( &cobjname )

                                                                                                                                                                                                                                                Label Events

                                                                                                                                                                                                                                                                Event: ON CLICK

                                                                                                                                                                                                                                                Label Properties

                                                                                                                                                                                                                ELSE

                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                Define Label ( &cobjname )

                                                                                                                                                                                                                                                                Label Events

                                                                                                                                                                                                                                                                                Event: ON CLICK

                                                                                                                                                                                                                                                                Label Properties

                                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                                Add item {"label",cobjname,"NULL","NOEVENTS",myopwinname} To Array MyOpObjsMap

                                                                                                                                                                                                ObjSelArray[2] = MyOpObjectName

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Label Caption is

                                                                                                                                                                IF ( myopcode = 101 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"caption",myopdata[1]

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Label Top is

                                                                                                                                                                IF ( myopcode = 102 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"row",val(myopdata[1])

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Label Left is

                                                                                                                                                                IF ( myopcode = 103 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"col",val(myopdata[1])

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Label Width is

                                                                                                                                                                IF ( myopcode = 104 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"width",val(myopdata[1])

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Label Height is

                                                                                                                                                                IF ( myopcode = 105 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"height",val(myopdata[1])

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Label Name Is

                                                                                                                                                                IF ( myopcode = 106 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                vmax = Get Length of String/Variable/Array MyOpObjsMap

                                                                                                                                                                                                FOR LOOP ( From x = vmax To 1 Step -1)

                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                IF ( MyOpObjsMap[x][1] = "label" )

                                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                                IF ( lower(alltrim(MyOpObjsMap[x][2])) == lower(alltrim(MyOpObjectName)) )

                                                                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                                                                MyOpObjsMap[x][3] = MyOpData[1]

                                                                                                                                                                                                                                                                                                Exit

                                                                                                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                                                End of For Loop

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Label Font Name is

                                                                                                                                                                IF ( myopcode = 107 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"fontname",myopdata[1]

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Label Font Size is

                                                                                                                                                                IF ( myopcode = 108 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"fontsize",val(myopdata[1])

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Label Fore Color is

                                                                                                                                                                IF ( myopcode = 109 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                acolor = RT_CheckColor(myopdata[1])

                                                                                                                                                                                                acolor = &acolor

                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"forecolor",acolor

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Label Back Color is

                                                                                                                                                                IF ( myopcode = 110 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                acolor = RT_CheckColor(myopdata[1])

                                                                                                                                                                                                acolor = &acolor

                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"backcolor",acolor

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Label Font Bold is

                                                                                                                                                                IF ( myopcode = 111 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                VarValue = lower(alltrim(myopdata[1]))

                                                                                                                                                                                                IF ( VarValue = "true" .or. VarValue = "1" )

                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"fontbold",.T.

                                                                                                                                                                                                                ELSE

                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"fontbold",.F.

                                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Label Font Italic is

                                                                                                                                                                IF ( myopcode = 112 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                VarValue = lower(alltrim(myopdata[1]))

                                                                                                                                                                                                IF ( VarValue = "true" .or. VarValue = "1" )

                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"fontitalic",.T.

                                                                                                                                                                                                                ELSE

                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"fontitalic",.F.

                                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Label Font Underline is

                                                                                                                                                                IF ( myopcode = 113 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                VarValue = lower(alltrim(myopdata[1]))

                                                                                                                                                                                                IF ( VarValue = "true" .or. VarValue = "1" )

                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"fontunderline",.T.

                                                                                                                                                                                                                ELSE

                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"fontunderline",.F.

                                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Label Font Strickout s

                                                                                                                                                                IF ( myopcode = 114 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                VarValue = lower(alltrim(myopdata[1]))

                                                                                                                                                                                                IF ( VarValue = "true" .or. VarValue = "1" )

                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"fontstrickout",.T.

                                                                                                                                                                                                                ELSE

                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"fontstrickout",.F.

                                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Set Label Transparent ON

                                                                                                                                                                IF ( myopcode = 115 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                initpara1 = "true"

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Set Label Transparent OFF

                                                                                                                                                                IF ( myopcode = 116 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                initpara1 = "FALSE"

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Label Selected

                                                                                                                                                                IF ( myopcode = 117 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                Call Procedure RT_SelectObject Parameters 2,"label"

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Label Caption from

                                                                                                                                                                IF ( myopcode = 118 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                Call Procedure RT_ReadExpr Parameters myopdata[1],"RightSide"

                                                                                                                                                                                                VARVALUE = Call Function RT_GetExprValue ( RT_RS_DATA )

                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"caption",varvalue

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Label Caption to

                                                                                                                                                                IF ( myopcode = 119 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                myvalue = Call Function GetProperty ( myopwinname,myopobjectname,"caption" )

                                                                                                                                                                                                Call Procedure RT_SetVarValue Parameters myopdata[1],myvalue

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Object Dimension (268 - 275)

                                                                                                                                                                Call Procedure RT_GUIDIM Parameters 120,MyOpObjectName

                                                                                                                END OF IF STATEMENT

                                                                                Picture

                                                                                                IF ( myopcode >= 150 .and. myopcode <= 158 )

                                                                                                                Start Here

                                                                                                                                oldvalue = MyOpObjectName

                                                                                                                                MyOpObjectName = ObjSelArray[3]

                                                                                                                                Check Errors

                                                                                                                                                IF ( myopcode != 150 )

                                                                                                                                                                Code Block

                                                                                                                                                                                IF ( myopwinname = "NULL" )

                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                Call Procedure RTE_AddError Parameters 11

                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                IF ( myopobjectname = "NULL" )

                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                Call Procedure RTE_AddError Parameters 12

                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                Call Procedure RTE_Check

                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                Picture

                                                                                                                                                I want picture

                                                                                                                                                                IF ( myopcode = 150 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                ObjsCount = ObjsCount+1

                                                                                                                                                                                                cobjscount = CONVERT Objscount TO STRING

                                                                                                                                                                                                cobjscount = All Trim cobjscount

                                                                                                                                                                                                cobjname = "obj_"+cobjscount

                                                                                                                                                                                                MyOpObjectName = cobjname

                                                                                                                                                                                                Event Blocks

                                                                                                                                                                                                                mymouseclickblock = "RT_DoEvent('picture','" + cobjname+"','mouseclick')"

                                                                                                                                                                                                Define New Image ( &cobjname ) , Image : ""

                                                                                                                                                                                                                Events

                                                                                                                                                                                                                                Event: ON CLICK

                                                                                                                                                                                                                Properties

                                                                                                                                                                                                Add item {"picture",cobjname,"NULL","NOEVENTS",myopwinname} To Array MyOpObjsMap

                                                                                                                                                                                                ObjSelArray[3] = MyOpObjectName

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Picture file is

                                                                                                                                                                IF ( myopcode = 151 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"picture",myopdata[1]

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                PictureTop is

                                                                                                                                                                IF ( myopcode = 152 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"row",val(myopdata[1])

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Picture Left is

                                                                                                                                                                IF ( myopcode = 153 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"col",val(myopdata[1])

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Picture Width is

                                                                                                                                                                IF ( myopcode = 154 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"width",val(myopdata[1])

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Picture Height is

                                                                                                                                                                IF ( myopcode = 155 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"height",val(myopdata[1])

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Picture Name Is

                                                                                                                                                                IF ( myopcode = 156 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                vmax = Get Length of String/Variable/Array MyOpObjsMap

                                                                                                                                                                                                FOR LOOP ( From x = vmax To 1 Step -1)

                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                IF ( MyOpObjsMap[x][1] = "picture" )

                                                                                                                                                                                                                                                Start Here

                                                                                                                                                                                                                                                                IF ( lower(alltrim(MyOpObjsMap[x][2])) == lower(alltrim(MyOpObjectName)) )

                                                                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                                                                MyOpObjsMap[x][3] = MyOpData[1]

                                                                                                                                                                                                                                                                                                Exit

                                                                                                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                                                End of For Loop

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Picture Selected

                                                                                                                                                                IF ( myopcode = 157 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                Call Procedure RT_SelectObject Parameters 3,"picture"

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Picture file is

                                                                                                                                                                IF ( myopcode = 158 )

                                                                                                                                                                                Start Here

                                                                                                                                                                                                Call Procedure RT_ReadExpr Parameters myopdata[1],"RightSide"

                                                                                                                                                                                                VARVALUE = Call Function RT_GetExprValue ( RT_RS_DATA )

                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"picture",varvalue

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                END OF IF STATEMENT

                                                                                Textbox

                                                                                                IF ( myopcode >= 200 .and. myopcode <= 217 )

                                                                                                                Code Block

                                                                                                                                oldvalue = MyOpObjectName

                                                                                                                                MyOpObjectName = ObjSelArray[4]

                                                                                                                                Check Errors

                                                                                                                                                IF ( myopcode != 200 )

                                                                                                                                                                Code Block

                                                                                                                                                                                IF ( myopwinname = "NULL" )

                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                Call Procedure RTE_AddError Parameters 11

                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                IF ( myopobjectname = "NULL" )

                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                Call Procedure RTE_AddError Parameters 12

                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                Call Procedure RTE_Check

                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                Textbox

                                                                                                                                                I want textbox

                                                                                                                                                                IF ( myopcode = 200 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                ObjsCount = ObjsCount+1

                                                                                                                                                                                                cobjscount = CONVERT Objscount TO STRING

                                                                                                                                                                                                cobjscount = All Trim cobjscount

                                                                                                                                                                                                cobjname = "obj_"+cobjscount

                                                                                                                                                                                                MyOpObjectName = cobjname

                                                                                                                                                                                                Event Blocks

                                                                                                                                                                                                                mygotfocusblock = "RT_DoEvent('textbox','" + cobjname+"','gotfocus')"

                                                                                                                                                                                                                mylostfocusblock = "RT_DoEvent('textbox','" + cobjname+"','lostfocus')"

                                                                                                                                                                                                                mychangeblock = "RT_DoEvent('textbox','" + cobjname+"','change')"

                                                                                                                                                                                                                myenterblock = "RT_DoEvent('textbox','" + cobjname+"','enter')"

                                                                                                                                                                                                Define TextBox  ( &cobjname  )

                                                                                                                                                                                                                TextBox EVENTS

                                                                                                                                                                                                                                Event: ON GOTFOCUS

                                                                                                                                                                                                                                Event: ON LOSTFOCUS

                                                                                                                                                                                                                                Event: ON CHANGE

                                                                                                                                                                                                                                Event: ON ENTER

                                                                                                                                                                                                                TextBox Properties

                                                                                                                                                                                                Add item {"textbox",cobjname,"NULL","NOEVENTS",myopwinname} To Array MyOpObjsMap

                                                                                                                                                                                                ObjSelArray[4] = MyOpObjectName

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Textbox value is

                                                                                                                                                                IF ( myopcode = 201 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"value",myopdata[1]

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Textbox Top is

                                                                                                                                                                IF ( myopcode = 202 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"row",val(myopdata[1])

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Textbox Left is

                                                                                                                                                                IF ( myopcode = 203 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"col",val(myopdata[1])

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Textbox Width is

                                                                                                                                                                IF ( myopcode = 204 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"width",val(myopdata[1])

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Textbox Height is

                                                                                                                                                                IF ( myopcode = 205 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"height",val(myopdata[1])

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Textbox Name Is

                                                                                                                                                                IF ( myopcode = 206 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                vmax = Get Length of String/Variable/Array MyOpObjsMap

                                                                                                                                                                                                FOR LOOP ( From x = vmax To 1 Step -1)

                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                IF ( MyOpObjsMap[x][1] = "textbox" )

                                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                                IF ( lower(alltrim(MyOpObjsMap[x][2])) == lower(alltrim(MyOpObjectName)) )

                                                                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                                                                MyOpObjsMap[x][3] = MyOpData[1]

                                                                                                                                                                                                                                                                                                Exit

                                                                                                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                                                End of For Loop

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Textbox Font Name is

                                                                                                                                                                IF ( myopcode = 207 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"fontname",myopdata[1]

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Textbox Font Size is

                                                                                                                                                                IF ( myopcode = 208 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"fontsize",val(myopdata[1])

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Textbox Fore Color is

                                                                                                                                                                IF ( myopcode = 209 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                acolor = RT_CheckColor(myopdata[1])

                                                                                                                                                                                                acolor = &acolor

                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"forecolor",acolor

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Textbox Back Color is

                                                                                                                                                                IF ( myopcode = 210 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                acolor = RT_CheckColor(myopdata[1])

                                                                                                                                                                                                acolor = &acolor

                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"backcolor",acolor

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Textbox Font Bold is

                                                                                                                                                                IF ( myopcode = 211 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                VarValue = lower(alltrim(myopdata[1]))

                                                                                                                                                                                                IF ( VarValue = "true" .or. VarValue = "1" )

                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"fontbold",.T.

                                                                                                                                                                                                                ELSE

                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"fontbold",.F.

                                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Textbox Font Italic is

                                                                                                                                                                IF ( myopcode = 212 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                VarValue = lower(alltrim(myopdata[1]))

                                                                                                                                                                                                IF ( VarValue = "true" .or. VarValue = "1" )

                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"fontitalic",.T.

                                                                                                                                                                                                                ELSE

                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"fontitalic",.F.

                                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Textbox Font Underline is

                                                                                                                                                                IF ( myopcode = 213 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                VarValue = lower(alltrim(myopdata[1]))

                                                                                                                                                                                                IF ( VarValue = "true" .or. VarValue = "1" )

                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"fontunderline",.T.

                                                                                                                                                                                                                ELSE

                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"fontunderline",.F.

                                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Textbox Font Strickout s

                                                                                                                                                                IF ( myopcode = 214 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                VarValue = lower(alltrim(myopdata[1]))

                                                                                                                                                                                                IF ( VarValue = "true" .or. VarValue = "1" )

                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"fontstrickout",.T.

                                                                                                                                                                                                                ELSE

                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"fontstrickout",.F.

                                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Textbox Selected

                                                                                                                                                                IF ( myopcode = 215 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                Call Procedure RT_SelectObject Parameters 4,"textbox"

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Textbox value from

                                                                                                                                                                IF ( myopcode = 216 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                Call Procedure RT_ReadExpr Parameters myopdata[1],"RightSide"

                                                                                                                                                                                                VARVALUE = Call Function RT_GetExprValue ( RT_RS_DATA )

                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"value",varvalue

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Textbox value to

                                                                                                                                                                IF ( myopcode = 217 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                myvalue = Call Function GetProperty ( myopwinname,MyOpObjectName,"value" )

                                                                                                                                                                                                Call Procedure RT_SetVarValue Parameters myopdata[1],myvalue

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                END OF IF STATEMENT

                                                                                Editbox

                                                                                                IF ( myopcode >= 250 .and. myopcode <= 275 )

                                                                                                                Code Block

                                                                                                                                oldvalue = MyOpObjectName

                                                                                                                                MyOpObjectName = ObjSelArray[5]

                                                                                                                                Check Errors

                                                                                                                                                IF ( myopcode != 250 )

                                                                                                                                                                Code Block

                                                                                                                                                                                IF ( myopwinname = "NULL" )

                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                Call Procedure RTE_AddError Parameters 11

                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                IF ( myopobjectname = "NULL" )

                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                Call Procedure RTE_AddError Parameters 12

                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                Call Procedure RTE_Check

                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                Editbox

                                                                                                                                                I want editbox

                                                                                                                                                                IF ( myopcode = 250 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                ObjsCount = ObjsCount+1

                                                                                                                                                                                                cobjscount = CONVERT Objscount TO STRING

                                                                                                                                                                                                cobjscount = All Trim cobjscount

                                                                                                                                                                                                cobjname = "obj_"+cobjscount

                                                                                                                                                                                                MyOpObjectName = cobjname

                                                                                                                                                                                                Event Blocks

                                                                                                                                                                                                                mygotfocusblock = "RT_DoEvent('editbox','" + cobjname+"','gotfocus')"

                                                                                                                                                                                                                mylostfocusblock = "RT_DoEvent('editbox','" + cobjname+"','lostfocus')"

                                                                                                                                                                                                                mychangeblock = "RT_DoEvent('editbox','" + cobjname+"','change')"

                                                                                                                                                                                                Define New Editbox ( &cobjname )

                                                                                                                                                                                                                Editbox Events

                                                                                                                                                                                                                                Event: ON GOTFOCUS

                                                                                                                                                                                                                                Event: ON LOSTFOCUS

                                                                                                                                                                                                                                Event: ON CHANGE

                                                                                                                                                                                                                Editbox Properties

                                                                                                                                                                                                Add item {"editbox",cobjname,"NULL","NOEVENTS",myopwinname} To Array MyOpObjsMap

                                                                                                                                                                                                ObjSelArray[5] = MyOpObjectName

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Editbox value is

                                                                                                                                                                IF ( myopcode = 251 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"value",myopdata[1]

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Editbox Top is

                                                                                                                                                                IF ( myopcode = 252 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"row",val(myopdata[1])

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Editbox Left is

                                                                                                                                                                IF ( myopcode = 454 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"col",val(myopdata[1])

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Editbox Width is

                                                                                                                                                                IF ( myopcode = 254 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"width",val(myopdata[1])

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Editbox Height is

                                                                                                                                                                IF ( myopcode = 255 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"height",val(myopdata[1])

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Editbox Name Is

                                                                                                                                                                IF ( myopcode = 256 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                vmax = Get Length of String/Variable/Array MyOpObjsMap

                                                                                                                                                                                                FOR LOOP ( From x = vmax To 1 Step -1)

                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                IF ( MyOpObjsMap[x][1] = "editbox" )

                                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                                IF ( lower(alltrim(MyOpObjsMap[x][2])) == lower(alltrim(MyOpObjectName)) )

                                                                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                                                                MyOpObjsMap[x][3] = MyOpData[1]

                                                                                                                                                                                                                                                                                                Exit

                                                                                                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                                                End of For Loop

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Editbox Font Name is

                                                                                                                                                                IF ( myopcode = 257 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"fontname",myopdata[1]

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Editbox Font Size is

                                                                                                                                                                IF ( myopcode = 258 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"fontsize",val(myopdata[1])

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Editbox Fore Color is

                                                                                                                                                                IF ( myopcode = 259 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                acolor = RT_CheckColor(myopdata[1])

                                                                                                                                                                                                acolor = &acolor

                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"forecolor",acolor

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Editbox Back Color is

                                                                                                                                                                IF ( myopcode = 260 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                acolor = RT_CheckColor(myopdata[1])

                                                                                                                                                                                                acolor = &acolor

                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"backcolor",acolor

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Editbox Font Bold is

                                                                                                                                                                IF ( myopcode = 261 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                VarValue = lower(alltrim(myopdata[1]))

                                                                                                                                                                                                IF ( VarValue = "true" .or. VarValue = "1" )

                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"fontbold",.T.

                                                                                                                                                                                                                ELSE

                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"fontbold",.F.

                                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Editbox Font Italic is

                                                                                                                                                                IF ( myopcode = 262 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                VarValue = lower(alltrim(myopdata[1]))

                                                                                                                                                                                                IF ( VarValue = "true" .or. VarValue = "1" )

                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"fontitalic",.T.

                                                                                                                                                                                                                ELSE

                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"fontitalic",.F.

                                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Editbox Font Underline is

                                                                                                                                                                IF ( myopcode = 263 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                VarValue = lower(alltrim(myopdata[1]))

                                                                                                                                                                                                IF ( VarValue = "true" .or. VarValue = "1" )

                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"fontunderline",.T.

                                                                                                                                                                                                                ELSE

                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"fontunderline",.F.

                                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Editbox Font Strickout s

                                                                                                                                                                IF ( myopcode = 264 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                VarValue = lower(alltrim(myopdata[1]))

                                                                                                                                                                                                IF ( VarValue = "true" .or. VarValue = "1" )

                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"fontstrickout",.T.

                                                                                                                                                                                                                ELSE

                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"fontstrickout",.F.

                                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Editbox Selected

                                                                                                                                                                IF ( myopcode = 265 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                Call Procedure RT_SelectObject Parameters 5,"editbox"

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Editbox Value from

                                                                                                                                                                IF ( myopcode = 266 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                Call Procedure RT_ReadExpr Parameters myopdata[1],"RightSide"

                                                                                                                                                                                                VARVALUE = Call Function RT_GetExprValue ( RT_RS_DATA )

                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"value",varvalue

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Editbox Value to

                                                                                                                                                                IF ( myopcode = 267 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                myvalue = Call Function GetProperty ( myopwinname,MyOpObjectName,"value" )

                                                                                                                                                                                                Call Procedure RT_SetVarValue Parameters myopdata[1],myvalue

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Object Dimension (268 - 275)

                                                                                                                                                                Call Procedure RT_GUIDIM Parameters 268,MyOpObjectName

                                                                                                                END OF IF STATEMENT

                                                                                Listbox

                                                                                                IF ( myopcode >= 300 .and. myopcode <= 319 )

                                                                                                                Code Block

                                                                                                                                oldvalue = MyOpObjectName

                                                                                                                                MyOpObjectName = ObjSelArray[6]

                                                                                                                                Check Errors

                                                                                                                                                IF ( myopcode != 300 )

                                                                                                                                                                Code Block

                                                                                                                                                                                IF ( myopwinname = "NULL" )

                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                Call Procedure RTE_AddError Parameters 11

                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                IF ( myopobjectname = "NULL" )

                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                Call Procedure RTE_AddError Parameters 12

                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                Call Procedure RTE_Check

                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                Listbox

                                                                                                                                                I want listbox

                                                                                                                                                                IF ( myopcode = 300 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                ObjsCount = ObjsCount+1

                                                                                                                                                                                                cobjscount = CONVERT Objscount TO STRING

                                                                                                                                                                                                cobjscount = All Trim cobjscount

                                                                                                                                                                                                cobjname = "obj_"+cobjscount

                                                                                                                                                                                                MyOpObjectName = cobjname

                                                                                                                                                                                                Event Blocks

                                                                                                                                                                                                                mygotfocusblock = "RT_DoEvent('listbox','" + cobjname+"','gotfocus')"

                                                                                                                                                                                                                mylostfocusblock = "RT_DoEvent('listbox','" + cobjname+"','lostfocus')"

                                                                                                                                                                                                                mychangeblock = "RT_DoEvent('listbox','" + cobjname+"','change')"

                                                                                                                                                                                                                mydblclickblock = "RT_DoEvent('listbox','" + cobjname+"','doubleclick')"

                                                                                                                                                                                                Define New ListBox ( &cobjname )

                                                                                                                                                                                                                ListBox Event

                                                                                                                                                                                                                                Event: ON GOTFOCUS

                                                                                                                                                                                                                                Event: ON LOSTFOCUS

                                                                                                                                                                                                                                Event: ON CHANGE

                                                                                                                                                                                                                                Event: ON DBLCLICK

                                                                                                                                                                                                                ListBox Properties

                                                                                                                                                                                                Add item {"listbox",cobjname,"NULL","NOEVENTS",myopwinname} To Array MyOpObjsMap

                                                                                                                                                                                                ObjSelArray[6] = MyOpObjectName

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Listbox value is

                                                                                                                                                                IF ( myopcode = 301 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"value",val(myopdata[1])

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Listbox Top is

                                                                                                                                                                IF ( myopcode = 302 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"row",val(myopdata[1])

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Listbox Left is

                                                                                                                                                                IF ( myopcode = 303 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"col",val(myopdata[1])

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Listbox Width is

                                                                                                                                                                IF ( myopcode = 304 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"width",val(myopdata[1])

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Listbox Height is

                                                                                                                                                                IF ( myopcode = 305 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"height",val(myopdata[1])

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Listbox Name Is

                                                                                                                                                                IF ( myopcode = 306 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                vmax = Get Length of String/Variable/Array MyOpObjsMap

                                                                                                                                                                                                FOR LOOP ( From x = vmax To 1 Step -1)

                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                IF ( MyOpObjsMap[x][1] = "listbox" )

                                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                                IF ( lower(alltrim(MyOpObjsMap[x][2])) == lower(alltrim(MyOpObjectName)) )

                                                                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                                                                MyOpObjsMap[x][3] = MyOpData[1]

                                                                                                                                                                                                                                                                                                Exit

                                                                                                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                                                End of For Loop

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Listbox Font Name is

                                                                                                                                                                IF ( myopcode = 307 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"fontname",myopdata[1]

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Listbox Font Size is

                                                                                                                                                                IF ( myopcode = 308 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"fontsize",val(myopdata[1])

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Listbox Fore Color is

                                                                                                                                                                IF ( myopcode = 309 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                acolor = RT_CheckColor(myopdata[1])

                                                                                                                                                                                                acolor = &acolor

                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"forecolor",acolor

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Listbox Back Color is

                                                                                                                                                                IF ( myopcode = 310 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                acolor = RT_CheckColor(myopdata[1])

                                                                                                                                                                                                acolor = &acolor

                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"backcolor",acolor

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Listbox Font Bold is

                                                                                                                                                                IF ( myopcode = 311 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                VarValue = lower(alltrim(myopdata[1]))

                                                                                                                                                                                                IF ( VarValue = "true" .or. VarValue = "1" )

                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"fontbold",.T.

                                                                                                                                                                                                                ELSE

                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"fontbold",.F.

                                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Listbox Font Italic is

                                                                                                                                                                IF ( myopcode = 312 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                VarValue = lower(alltrim(myopdata[1]))

                                                                                                                                                                                                IF ( VarValue = "true" .or. VarValue = "1" )

                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"fontitalic",.T.

                                                                                                                                                                                                                ELSE

                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"fontitalic",.F.

                                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Listbox Font Underline is

                                                                                                                                                                IF ( myopcode = 313 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                VarValue = lower(alltrim(myopdata[1]))

                                                                                                                                                                                                IF ( VarValue = "true" .or. VarValue = "1" )

                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"fontunderline",.T.

                                                                                                                                                                                                                ELSE

                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"fontunderline",.F.

                                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Listbox Font Strickout s

                                                                                                                                                                IF ( myopcode = 314 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                VarValue = lower(alltrim(myopdata[1]))

                                                                                                                                                                                                IF ( VarValue = "true" .or. VarValue = "1" )

                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"fontstrickout",.T.

                                                                                                                                                                                                                ELSE

                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"fontstrickout",.F.

                                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Listbox Selected

                                                                                                                                                                IF ( myopcode = 315 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                Call Procedure RT_SelectObject Parameters 6,"listbox"

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Listbox must add item

                                                                                                                                                                IF ( myopcode = 316 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                Call Procedure domethod Parameters MyOpWinName,MyOpObjectName,"additem",myopdata[1]

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Listbox must add from

                                                                                                                                                                IF ( myopcode = 317 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                Call Procedure RT_ReadExpr Parameters myopdata[1],"RightSide"

                                                                                                                                                                                                VARVALUE = Call Function RT_GetExprValue ( RT_RS_DATA )

                                                                                                                                                                                                Call Procedure domethod Parameters MyOpWinName,MyOpObjectName,"additem",varvalue

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Listbox Value from

                                                                                                                                                                IF ( myopcode = 318 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                Call Procedure RT_ReadExpr Parameters myopdata[1],"RightSide"

                                                                                                                                                                                                VARVALUE = Call Function RT_GetExprValue ( RT_RS_DATA )

                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"value",val(varvalue)

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Listbox Value to

                                                                                                                                                                IF ( myopcode = 319 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                myvalue = Call Function GetProperty ( myopwinname,myopobjectname,"value" )

                                                                                                                                                                                                Call Procedure RT_SetVarValue Parameters myopdata[1],alltrim(str(myvalue))

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                END OF IF STATEMENT

                                                                                Combobox

                                                                                                IF ( myopcode >= 350 .and. myopcode <= 369 )

                                                                                                                Code Block

                                                                                                                                oldvalue = MyOpObjectName

                                                                                                                                MyOpObjectName = ObjSelArray[7]

                                                                                                                                Check Errors

                                                                                                                                                IF ( myopcode != 350 )

                                                                                                                                                                Code Block

                                                                                                                                                                                IF ( myopwinname = "NULL" )

                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                Call Procedure RTE_AddError Parameters 11

                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                IF ( myopobjectname = "NULL" )

                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                Call Procedure RTE_AddError Parameters 12

                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                Call Procedure RTE_Check

                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                Combobox

                                                                                                                                                I want combobox

                                                                                                                                                                IF ( myopcode = 350 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                ObjsCount = ObjsCount+1

                                                                                                                                                                                                cobjscount = CONVERT Objscount TO STRING

                                                                                                                                                                                                cobjscount = All Trim cobjscount

                                                                                                                                                                                                cobjname = "obj_"+cobjscount

                                                                                                                                                                                                MyOpObjectName = cobjname

                                                                                                                                                                                                Event Blocks

                                                                                                                                                                                                                mygotfocusblock = "RT_DoEvent('combobox','" + cobjname+"','gotfocus')"

                                                                                                                                                                                                                mylostfocusblock = "RT_DoEvent('combobox','" + cobjname+"','lostfocus')"

                                                                                                                                                                                                                mychangeblock = "RT_DoEvent('combobox','" + cobjname+"','change')"

                                                                                                                                                                                                Define Combobox ( &cobjname )

                                                                                                                                                                                                                Combobox Events

                                                                                                                                                                                                                                Event: ON GOTFOCUS

                                                                                                                                                                                                                                Event: ON LOSTFOCUS

                                                                                                                                                                                                                                Event: ON CHANGE

                                                                                                                                                                                                                Combobox Properties

                                                                                                                                                                                                Add item {"combobox",cobjname,"NULL","NOEVENTS",myopwinname} To Array MyOpObjsMap

                                                                                                                                                                                                ObjSelArray[7] = MyOpObjectName

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Combobox value is

                                                                                                                                                                IF ( myopcode = 351 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"value",val(myopdata[1])

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Combobox Top is

                                                                                                                                                                IF ( myopcode = 352 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"row",val(myopdata[1])

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Combobox Left is

                                                                                                                                                                IF ( myopcode = 353 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"col",val(myopdata[1])

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Combobox Width is

                                                                                                                                                                IF ( myopcode = 354 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"width",val(myopdata[1])

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Combobox Height is

                                                                                                                                                                IF ( myopcode = 355 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"height",val(myopdata[1])

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Combobox Name Is

                                                                                                                                                                IF ( myopcode = 356 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                vmax = Get Length of String/Variable/Array MyOpObjsMap

                                                                                                                                                                                                FOR LOOP ( From x = vmax To 1 Step -1)

                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                IF ( MyOpObjsMap[x][1] = "combobox" )

                                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                                IF ( lower(alltrim(MyOpObjsMap[x][2])) == lower(alltrim(MyOpObjectName)) )

                                                                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                                                                MyOpObjsMap[x][3] = MyOpData[1]

                                                                                                                                                                                                                                                                                                Exit

                                                                                                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                                                End of For Loop

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Combobox Font Name is

                                                                                                                                                                IF ( myopcode = 357 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"fontname",myopdata[1]

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Combobox Font Size is

                                                                                                                                                                IF ( myopcode = 358 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"fontsize",val(myopdata[1])

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Combobox Fore Color is

                                                                                                                                                                IF ( myopcode = 359 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                acolor = RT_CheckColor(myopdata[1])

                                                                                                                                                                                                acolor = &acolor

                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"forecolor",acolor

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Combobox Back Color is

                                                                                                                                                                IF ( myopcode = 360 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                acolor = RT_CheckColor(myopdata[1])

                                                                                                                                                                                                acolor = &acolor

                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"backcolor",acolor

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Combobox Font Bold is

                                                                                                                                                                IF ( myopcode = 361 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                VarValue = lower(alltrim(myopdata[1]))

                                                                                                                                                                                                IF ( VarValue = "true" .or. VarValue = "1" )

                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"fontbold",.T.

                                                                                                                                                                                                                ELSE

                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"fontbold",.F.

                                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Combobox Font Italic is

                                                                                                                                                                IF ( myopcode = 362 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                VarValue = lower(alltrim(myopdata[1]))

                                                                                                                                                                                                IF ( VarValue = "true" .or. VarValue = "1" )

                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"fontitalic",.T.

                                                                                                                                                                                                                ELSE

                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"fontitalic",.F.

                                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Combobox Font Underline is

                                                                                                                                                                IF ( myopcode = 363 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                VarValue = lower(alltrim(myopdata[1]))

                                                                                                                                                                                                IF ( VarValue = "true" .or. VarValue = "1" )

                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"fontunderline",.T.

                                                                                                                                                                                                                ELSE

                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"fontunderline",.F.

                                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Combobox Font Strickout s

                                                                                                                                                                IF ( myopcode = 364 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                VarValue = lower(alltrim(myopdata[1]))

                                                                                                                                                                                                IF ( VarValue = "true" .or. VarValue = "1" )

                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"fontstrickout",.T.

                                                                                                                                                                                                                ELSE

                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"fontstrickout",.F.

                                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Combobox Selected

                                                                                                                                                                IF ( myopcode = 365 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                Call Procedure RT_SelectObject Parameters 7,"combobox"

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Combobox must add item

                                                                                                                                                                IF ( myopcode = 366 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                Call Procedure domethod Parameters MyOpWinName,MyOpObjectName,"additem",myopdata[1]

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Combobox Value from

                                                                                                                                                                IF ( myopcode = 367 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                Call Procedure RT_ReadExpr Parameters myopdata[1],"RightSide"

                                                                                                                                                                                                VARVALUE = Call Function RT_GetExprValue ( RT_RS_DATA )

                                                                                                                                                                                                Call Procedure domethod Parameters MyOpWinName,MyOpObjectName,"additem",varvalue

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Listbox Value from

                                                                                                                                                                IF ( myopcode = 368 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                Call Procedure RT_ReadExpr Parameters myopdata[1],"RightSide"

                                                                                                                                                                                                VARVALUE = Call Function RT_GetExprValue ( RT_RS_DATA )

                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"value",val(varvalue)

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Combobox Value to

                                                                                                                                                                IF ( myopcode = 369 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                myvalue = Call Function GetProperty ( myopwinname,myopobjectname,"value" )

                                                                                                                                                                                                Call Procedure RT_SetVarValue Parameters myopdata[1],alltrim(str(myvalue))

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                END OF IF STATEMENT

                                                                                Checkbox

                                                                                                IF ( myopcode >= 400 .and. myopcode <= 416 )

                                                                                                                Code Block

                                                                                                                                oldvalue = MyOpObjectName

                                                                                                                                MyOpObjectName = ObjSelArray[8]

                                                                                                                                Check Errors

                                                                                                                                                IF ( myopcode != 400 )

                                                                                                                                                                Code Block

                                                                                                                                                                                IF ( myopwinname = "NULL" )

                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                Call Procedure RTE_AddError Parameters 11

                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                IF ( myopobjectname = "NULL" )

                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                Call Procedure RTE_AddError Parameters 12

                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                Call Procedure RTE_Check

                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                Checkbox

                                                                                                                                                I want checkbox

                                                                                                                                                                IF ( myopcode = 400 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                ObjsCount = ObjsCount+1

                                                                                                                                                                                                cobjscount = CONVERT Objscount TO STRING

                                                                                                                                                                                                cobjscount = All Trim cobjscount

                                                                                                                                                                                                cobjname = "obj_"+cobjscount

                                                                                                                                                                                                MyOpObjectName = cobjname

                                                                                                                                                                                                Event Blocks

                                                                                                                                                                                                                mygotfocusblock = "RT_DoEvent('checkbox','" + cobjname+"','gotfocus')"

                                                                                                                                                                                                                mylostfocusblock = "RT_DoEvent('checkbox','" + cobjname+"','lostfocus')"

                                                                                                                                                                                                                mychangeblock = "RT_DoEvent('checkbox','" + cobjname+"','change')"

                                                                                                                                                                                                Define CheckBox ( &cobjname )

                                                                                                                                                                                                                CheckBox Events

                                                                                                                                                                                                                                Event: ON GOTFOCUS

                                                                                                                                                                                                                                Event: ON LOSTFOCUS

                                                                                                                                                                                                                                Event: ON CHANGE

                                                                                                                                                                                                                CheckBox Properties

                                                                                                                                                                                                Add item {"checkbox",cobjname,"NULL","NOEVENTS",myopwinname} To Array MyOpObjsMap

                                                                                                                                                                                                ObjSelArray[8] = MyOpObjectName

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Checkbox value is

                                                                                                                                                                IF ( myopcode = 401 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                avalue = myopdata[1]

                                                                                                                                                                                                IF ( lower(alltrim(avalue)) == "true" .or. alltrim(avalue) == "1" )

                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"value",true

                                                                                                                                                                                                                ELSE

                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"value",false

                                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Checkbox Top is

                                                                                                                                                                IF ( myopcode = 402 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"row",val(myopdata[1])

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Checkbox Left is

                                                                                                                                                                IF ( myopcode = 403 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"col",val(myopdata[1])

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Checkbox Width is

                                                                                                                                                                IF ( myopcode = 404 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"width",val(myopdata[1])

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Checkbox Height is

                                                                                                                                                                IF ( myopcode = 405 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"height",val(myopdata[1])

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Checkbox Name Is

                                                                                                                                                                IF ( myopcode = 406 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                vmax = Get Length of String/Variable/Array MyOpObjsMap

                                                                                                                                                                                                FOR LOOP ( From x = vmax To 1 Step -1)

                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                IF ( MyOpObjsMap[x][1] = "checkbox" )

                                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                                IF ( lower(alltrim(MyOpObjsMap[x][2])) == lower(alltrim(MyOpObjectName)) )

                                                                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                                                                MyOpObjsMap[x][3] = MyOpData[1]

                                                                                                                                                                                                                                                                                                Exit

                                                                                                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                                                End of For Loop

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Checkbox Font Name is

                                                                                                                                                                IF ( myopcode = 407 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"fontname",myopdata[1]

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Checkbox Font Size is

                                                                                                                                                                IF ( myopcode = 408 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"fontsize",val(myopdata[1])

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Checkbox Fore Color is

                                                                                                                                                                IF ( myopcode = 409 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                acolor = RT_CheckColor(myopdata[1])

                                                                                                                                                                                                acolor = &acolor

                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"forecolor",acolor

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Checkbox Back Color is

                                                                                                                                                                IF ( myopcode = 410 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                acolor = RT_CheckColor(myopdata[1])

                                                                                                                                                                                                acolor = &acolor

                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"backcolor",acolor

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Checkbox Font Bold is

                                                                                                                                                                IF ( myopcode = 411 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                VarValue = lower(alltrim(myopdata[1]))

                                                                                                                                                                                                IF ( VarValue = "true" .or. VarValue = "1" )

                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"fontbold",.T.

                                                                                                                                                                                                                ELSE

                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"fontbold",.F.

                                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Checkbox Font Italic is

                                                                                                                                                                IF ( myopcode = 412 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                VarValue = lower(alltrim(myopdata[1]))

                                                                                                                                                                                                IF ( VarValue = "true" .or. VarValue = "1" )

                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"fontitalic",.T.

                                                                                                                                                                                                                ELSE

                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"fontitalic",.F.

                                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Checkbox Font Underline is

                                                                                                                                                                IF ( myopcode = 413 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                VarValue = lower(alltrim(myopdata[1]))

                                                                                                                                                                                                IF ( VarValue = "true" .or. VarValue = "1" )

                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"fontunderline",.T.

                                                                                                                                                                                                                ELSE

                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"fontunderline",.F.

                                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Checkbox Font Strickout s

                                                                                                                                                                IF ( myopcode = 414 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                VarValue = lower(alltrim(myopdata[1]))

                                                                                                                                                                                                IF ( VarValue = "true" .or. VarValue = "1" )

                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"fontstrickout",.T.

                                                                                                                                                                                                                ELSE

                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"fontstrickout",.F.

                                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Checkbox Selected

                                                                                                                                                                IF ( myopcode = 415 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                Call Procedure RT_SelectObject Parameters 8,"checkbox"

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Checkbox Caption is

                                                                                                                                                                IF ( myopcode = 416 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"caption",myopdata[1]

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                END OF IF STATEMENT

                                                                                Progressbar

                                                                                                IF ( myopcode >= 450 .and. myopcode <= 461 )

                                                                                                                Code Block

                                                                                                                                oldvalue = MyOpObjectName

                                                                                                                                MyOpObjectName = ObjSelArray[9]

                                                                                                                                Check Errors

                                                                                                                                                IF ( myopcode != 450 )

                                                                                                                                                                Code Block

                                                                                                                                                                                IF ( myopwinname = "NULL" )

                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                Call Procedure RTE_AddError Parameters 11

                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                IF ( myopobjectname = "NULL" )

                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                Call Procedure RTE_AddError Parameters 12

                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                Call Procedure RTE_Check

                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                Progressbar

                                                                                                                                                I want progressbar

                                                                                                                                                                IF ( myopcode = 450 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                ObjsCount = ObjsCount+1

                                                                                                                                                                                                cobjscount = CONVERT Objscount TO STRING

                                                                                                                                                                                                cobjscount = All Trim cobjscount

                                                                                                                                                                                                cobjname = "obj_"+cobjscount

                                                                                                                                                                                                MyOpObjectName = cobjname

                                                                                                                                                                                                Event Blocks

                                                                                                                                                                                                Define New ProgressBar (&cobjname)

                                                                                                                                                                                                                Events

                                                                                                                                                                                                                Properties

                                                                                                                                                                                                Add item {"progressbar",cobjname,"NULL","NOEVENTS",myopwinname} To Array MyOpObjsMap

                                                                                                                                                                                                ObjSelArray[9] = MyOpObjectName

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                progressbar value is

                                                                                                                                                                IF ( myopcode = 451 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                avalue = myopdata[1]

                                                                                                                                                                                                avalue = &avalue

                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"value",avalue

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                progressbar Top is

                                                                                                                                                                IF ( myopcode = 452 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"row",val(myopdata[1])

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                progressbar Left is

                                                                                                                                                                IF ( myopcode = 453 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"col",val(myopdata[1])

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                progressbar Width is

                                                                                                                                                                IF ( myopcode = 454 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"width",val(myopdata[1])

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                progressbar Height is

                                                                                                                                                                IF ( myopcode = 455 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"height",val(myopdata[1])

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                progressbar Name Is

                                                                                                                                                                IF ( myopcode = 456 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                vmax = Get Length of String/Variable/Array MyOpObjsMap

                                                                                                                                                                                                FOR LOOP ( From x = vmax To 1 Step -1)

                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                IF ( MyOpObjsMap[x][1] = "progressbar" )

                                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                                IF ( lower(alltrim(MyOpObjsMap[x][2])) == lower(alltrim(MyOpObjectName)) )

                                                                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                                                                MyOpObjsMap[x][3] = MyOpData[1]

                                                                                                                                                                                                                                                                                                Exit

                                                                                                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                                                End of For Loop

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                progressbar Selected

                                                                                                                                                                IF ( myopcode = 457 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                Call Procedure RT_SelectObject Parameters 9,"progressbar"

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                progressbar range minimum is

                                                                                                                                                                IF ( myopcode = 458 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"rangemin",val(myopdata[1])

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                progressbar range maximum is

                                                                                                                                                                IF ( myopcode = 459 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"rangemax",val(myopdata[1])

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                progressbar Fore Color is

                                                                                                                                                                IF ( myopcode = 460 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                acolor = RT_CheckColor(myopdata[1])

                                                                                                                                                                                                acolor = &acolor

                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"forecolor",acolor

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                progressbar Back Color is

                                                                                                                                                                IF ( myopcode = 461 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                acolor = RT_CheckColor(myopdata[1])

                                                                                                                                                                                                acolor = &acolor

                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"backcolor",acolor

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                END OF IF STATEMENT

                                                                                Slider

                                                                                                IF ( myopcode >= 500 .and. myopcode <= 510 )

                                                                                                                Code Block

                                                                                                                                oldvalue = MyOpObjectName

                                                                                                                                MyOpObjectName = ObjSelArray[10]

                                                                                                                                Check Errors

                                                                                                                                                IF ( myopcode != 500 )

                                                                                                                                                                Code Block

                                                                                                                                                                                IF ( myopwinname = "NULL" )

                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                Call Procedure RTE_AddError Parameters 11

                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                IF ( myopobjectname = "NULL" )

                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                Call Procedure RTE_AddError Parameters 12

                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                Call Procedure RTE_Check

                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                Slider

                                                                                                                                                I want slider

                                                                                                                                                                IF ( myopcode = 500 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                ObjsCount = ObjsCount+1

                                                                                                                                                                                                cobjscount = CONVERT Objscount TO STRING

                                                                                                                                                                                                cobjscount = All Trim cobjscount

                                                                                                                                                                                                cobjname = "obj_"+cobjscount

                                                                                                                                                                                                MyOpObjectName = cobjname

                                                                                                                                                                                                Event Blocks

                                                                                                                                                                                                                mychangeblock = "RT_DoEvent('slider','" + cobjname+"','change')"

                                                                                                                                                                                                                myscrollblock = "RT_DoEvent('slider','" + cobjname+"','scroll')"

                                                                                                                                                                                                Define New Slider ( &cobjname )

                                                                                                                                                                                                                Slider Events

                                                                                                                                                                                                                                Event: ON Change

                                                                                                                                                                                                                                Event: ON Scroll

                                                                                                                                                                                                                Slider Properties

                                                                                                                                                                                                Add item {"slider",cobjname,"NULL","NOEVENTS",myopwinname} To Array MyOpObjsMap

                                                                                                                                                                                                ObjSelArray[10] = MyOpObjectName

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                slider value is

                                                                                                                                                                IF ( myopcode = 501 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                avalue = myopdata[1]

                                                                                                                                                                                                avalue = &avalue

                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"value",avalue

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                slider Top is

                                                                                                                                                                IF ( myopcode = 502 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"row",val(myopdata[1])

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                slider left is

                                                                                                                                                                IF ( myopcode = 503 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"col",val(myopdata[1])

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                slider Width is

                                                                                                                                                                IF ( myopcode = 504 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"width",val(myopdata[1])

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                slider Height is

                                                                                                                                                                IF ( myopcode = 505 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"height",val(myopdata[1])

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                slider Name Is

                                                                                                                                                                IF ( myopcode = 454 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                vmax = Get Length of String/Variable/Array MyOpObjsMap

                                                                                                                                                                                                FOR LOOP ( From x = vmax To 1 Step -1)

                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                IF ( MyOpObjsMap[x][1] = "slider" )

                                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                                IF ( lower(alltrim(MyOpObjsMap[x][2])) == lower(alltrim(MyOpObjectName)) )

                                                                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                                                                MyOpObjsMap[x][3] = MyOpData[1]

                                                                                                                                                                                                                                                                                                Exit

                                                                                                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                                                End of For Loop

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                slider Selected

                                                                                                                                                                IF ( myopcode = 507 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                Call Procedure RT_SelectObject Parameters 10,"slider"

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                slider range minimum is

                                                                                                                                                                IF ( myopcode = 508 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"rangemin",val(myopdata[1])

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                slider range maximum is

                                                                                                                                                                IF ( myopcode = 509 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"rangemax",val(myopdata[1])

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                slider Back Color is

                                                                                                                                                                IF ( myopcode = 510 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                acolor = RT_CheckColor(myopdata[1])

                                                                                                                                                                                                acolor = &acolor

                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"backcolor",acolor

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                END OF IF STATEMENT

                                                                                Datepicker

                                                                                                IF ( myopcode >= 550 .and. myopcode <= 565 )

                                                                                                                Code Block

                                                                                                                                oldvalue = MyOpObjectName

                                                                                                                                MyOpObjectName = ObjSelArray[11]

                                                                                                                                Check Errors

                                                                                                                                                IF ( myopcode != 550 )

                                                                                                                                                                Code Block

                                                                                                                                                                                IF ( myopwinname = "NULL" )

                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                Call Procedure RTE_AddError Parameters 11

                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                IF ( myopobjectname = "NULL" )

                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                Call Procedure RTE_AddError Parameters 12

                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                Call Procedure RTE_Check

                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                Datepicker

                                                                                                                                                I want datepicker

                                                                                                                                                                IF ( myopcode = 550 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                ObjsCount = ObjsCount+1

                                                                                                                                                                                                cobjscount = CONVERT Objscount TO STRING

                                                                                                                                                                                                cobjscount = All Trim cobjscount

                                                                                                                                                                                                cobjname = "obj_"+cobjscount

                                                                                                                                                                                                MyOpObjectName = cobjname

                                                                                                                                                                                                Event Blocks

                                                                                                                                                                                                                mygotfocusblock = "RT_DoEvent('datepicker','" + cobjname+"','gotfocus')"

                                                                                                                                                                                                                mylostfocusblock = "RT_DoEvent('datepicker','" + cobjname+"','lostfocus')"

                                                                                                                                                                                                                mychangeblock = "RT_DoEvent('datepicker','" + cobjname+"','change')"

                                                                                                                                                                                                                myenterblock = "RT_DoEvent('datepicker','" + cobjname+"','enter')"

                                                                                                                                                                                                Define New DatePicker ( &cobjname )

                                                                                                                                                                                                                Events

                                                                                                                                                                                                                                Event: ON GOTFOCUS

                                                                                                                                                                                                                                Event: ON CHANGE

                                                                                                                                                                                                                                Event: ON LOSTFOCUS

                                                                                                                                                                                                                                Event: ON Enter

                                                                                                                                                                                                                Properties

                                                                                                                                                                                                Add item {"datepicker",cobjname,"NULL","NOEVENTS",myopwinname} To Array MyOpObjsMap

                                                                                                                                                                                                ObjSelArray[11] = MyOpObjectName

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                datepicker value is

                                                                                                                                                                IF ( myopcode = 551 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                avalue = myopdata[1]

                                                                                                                                                                                                avalue = ctod(avalue)

                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"value",avalue

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                datepicker Top is

                                                                                                                                                                IF ( myopcode = 552 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"row",val(myopdata[1])

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                datepicker left is

                                                                                                                                                                IF ( myopcode = 553 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"col",val(myopdata[1])

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                datepicker Width is

                                                                                                                                                                IF ( myopcode = 554 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"width",val(myopdata[1])

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                datepicker Height is

                                                                                                                                                                IF ( myopcode = 555 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"height",val(myopdata[1])

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                datepicker Name Is

                                                                                                                                                                IF ( myopcode = 556 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                vmax = Get Length of String/Variable/Array MyOpObjsMap

                                                                                                                                                                                                FOR LOOP ( From x = vmax To 1 Step -1)

                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                IF ( MyOpObjsMap[x][1] = "datepicker" )

                                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                                IF ( lower(alltrim(MyOpObjsMap[x][2])) == lower(alltrim(MyOpObjectName)) )

                                                                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                                                                MyOpObjsMap[x][3] = MyOpData[1]

                                                                                                                                                                                                                                                                                                Exit

                                                                                                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                                                End of For Loop

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                datepicker Selected

                                                                                                                                                                IF ( myopcode = 557 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                Call Procedure RT_SelectObject Parameters 11,"datepicker"

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                datepicker Fore Color is

                                                                                                                                                                IF ( myopcode = 558 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                acolor = RT_CheckColor(myopdata[1])

                                                                                                                                                                                                acolor = &acolor

                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"forecolor",acolor

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                datepicker Back Color is

                                                                                                                                                                IF ( myopcode = 559 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                acolor = RT_CheckColor(myopdata[1])

                                                                                                                                                                                                acolor = &acolor

                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"backcolor",acolor

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                datepicker Font Name is

                                                                                                                                                                IF ( myopcode = 560 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"fontname",myopdata[1]

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                datepicker Font Size is

                                                                                                                                                                IF ( myopcode = 561 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"fontsize",val(myopdata[1])

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                datepicker Font Bold is

                                                                                                                                                                IF ( myopcode = 562 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                VarValue = lower(alltrim(myopdata[1]))

                                                                                                                                                                                                IF ( VarValue = "true" .or. VarValue = "1" )

                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"fontbold",.T.

                                                                                                                                                                                                                ELSE

                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"fontbold",.F.

                                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                datepicker Font Italic is

                                                                                                                                                                IF ( myopcode = 563 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                VarValue = lower(alltrim(myopdata[1]))

                                                                                                                                                                                                IF ( VarValue = "true" .or. VarValue = "1" )

                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"fontitalic",.T.

                                                                                                                                                                                                                ELSE

                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"fontitalic",.F.

                                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                datepicker Font Underline is

                                                                                                                                                                IF ( myopcode = 564 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                VarValue = lower(alltrim(myopdata[1]))

                                                                                                                                                                                                IF ( VarValue = "true" .or. VarValue = "1" )

                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"fontunderline",.T.

                                                                                                                                                                                                                ELSE

                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"fontunderline",.F.

                                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                datepicker Font Strickout s

                                                                                                                                                                IF ( myopcode = 565 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                VarValue = lower(alltrim(myopdata[1]))

                                                                                                                                                                                                IF ( VarValue = "true" .or. VarValue = "1" )

                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"fontstrickout",.T.

                                                                                                                                                                                                                ELSE

                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"fontstrickout",.F.

                                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                END OF IF STATEMENT

                                                                                Spinner

                                                                                                IF ( myopcode >= 600 .and. myopcode <= 617 )

                                                                                                                Code Block

                                                                                                                                oldvalue = MyOpObjectName

                                                                                                                                MyOpObjectName = ObjSelArray[12]

                                                                                                                                Check Errors

                                                                                                                                                IF ( myopcode != 600 )

                                                                                                                                                                Code Block

                                                                                                                                                                                IF ( myopwinname = "NULL" )

                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                Call Procedure RTE_AddError Parameters 11

                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                IF ( myopobjectname = "NULL" )

                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                Call Procedure RTE_AddError Parameters 12

                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                Call Procedure RTE_Check

                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                Spinner

                                                                                                                                                I want spinner

                                                                                                                                                                IF ( myopcode = 600 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                ObjsCount = ObjsCount+1

                                                                                                                                                                                                cobjscount = CONVERT Objscount TO STRING

                                                                                                                                                                                                cobjscount = All Trim cobjscount

                                                                                                                                                                                                cobjname = "obj_"+cobjscount

                                                                                                                                                                                                MyOpObjectName = cobjname

                                                                                                                                                                                                Event Blocks

                                                                                                                                                                                                                mygotfocusblock = "RT_DoEvent('spinner','" + cobjname+"','gotfocus')"

                                                                                                                                                                                                                mylostfocusblock = "RT_DoEvent('spinner','" + cobjname+"','lostfocus')"

                                                                                                                                                                                                                mychangeblock = "RT_DoEvent('spinner','" + cobjname+"','change')"

                                                                                                                                                                                                Define New Spinner ( &cobjname )

                                                                                                                                                                                                                Events

                                                                                                                                                                                                                                Event: ON GOTFOCUS

                                                                                                                                                                                                                                Event: ON LOSTFOCUS

                                                                                                                                                                                                                                Event: ON CHANGE

                                                                                                                                                                                                                Properties

                                                                                                                                                                                                Add item {"spinner",cobjname,"NULL","NOEVENTS",myopwinname} To Array MyOpObjsMap

                                                                                                                                                                                                ObjSelArray[12] = MyOpObjectName

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                spinner value is

                                                                                                                                                                IF ( myopcode = 601 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                avalue = myopdata[1]

                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"value",val(avalue)

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                spinner Top is

                                                                                                                                                                IF ( myopcode = 602 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"row",val(myopdata[1])

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                spinner left is

                                                                                                                                                                IF ( myopcode = 603 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"col",val(myopdata[1])

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                spinner Width is

                                                                                                                                                                IF ( myopcode = 604 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"width",val(myopdata[1])

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                spinner Height is

                                                                                                                                                                IF ( myopcode = 605 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"height",val(myopdata[1])

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                spinner Name Is

                                                                                                                                                                IF ( myopcode = 606 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                vmax = Get Length of String/Variable/Array MyOpObjsMap

                                                                                                                                                                                                FOR LOOP ( From x = vmax To 1 Step -1)

                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                IF ( MyOpObjsMap[x][1] = "spinner" )

                                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                                IF ( lower(alltrim(MyOpObjsMap[x][2])) == lower(alltrim(MyOpObjectName)) )

                                                                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                                                                MyOpObjsMap[x][3] = MyOpData[1]

                                                                                                                                                                                                                                                                                                Exit

                                                                                                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                                                End of For Loop

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                spinner Selected

                                                                                                                                                                IF ( myopcode = 607 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                Call Procedure RT_SelectObject Parameters 12,"spinner"

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                spinner Fore Color is

                                                                                                                                                                IF ( myopcode = 608 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                acolor = RT_CheckColor(myopdata[1])

                                                                                                                                                                                                acolor = &acolor

                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"forecolor",acolor

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                spinner Back Color is

                                                                                                                                                                IF ( myopcode = 609 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                acolor = RT_CheckColor(myopdata[1])

                                                                                                                                                                                                acolor = &acolor

                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"backcolor",acolor

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                spinner Font Name is

                                                                                                                                                                IF ( myopcode = 610 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"fontname",myopdata[1]

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                spinner Font Size is

                                                                                                                                                                IF ( myopcode = 611 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"fontsize",val(myopdata[1])

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                spinner Font Bold is

                                                                                                                                                                IF ( myopcode = 612 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                VarValue = lower(alltrim(myopdata[1]))

                                                                                                                                                                                                IF ( VarValue = "true" .or. VarValue = "1" )

                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"fontbold",.T.

                                                                                                                                                                                                                ELSE

                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"fontbold",.F.

                                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                spinner Font Italic is

                                                                                                                                                                IF ( myopcode = 613 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                VarValue = lower(alltrim(myopdata[1]))

                                                                                                                                                                                                IF ( VarValue = "true" .or. VarValue = "1" )

                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"fontitalic",.T.

                                                                                                                                                                                                                ELSE

                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"fontitalic",.F.

                                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                spinner Font Underline is

                                                                                                                                                                IF ( myopcode = 614 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                VarValue = lower(alltrim(myopdata[1]))

                                                                                                                                                                                                IF ( VarValue = "true" .or. VarValue = "1" )

                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"fontunderline",.T.

                                                                                                                                                                                                                ELSE

                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"fontunderline",.F.

                                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                spinner Font Strickout s

                                                                                                                                                                IF ( myopcode = 615 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                VarValue = lower(alltrim(myopdata[1]))

                                                                                                                                                                                                IF ( VarValue = "true" .or. VarValue = "1" )

                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"fontstrickout",.T.

                                                                                                                                                                                                                ELSE

                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"fontstrickout",.F.

                                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                spinner range minimum is

                                                                                                                                                                IF ( myopcode = 616 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"rangemin",val(myopdata[1])

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                spinner range maximum is

                                                                                                                                                                IF ( myopcode = 617 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"rangemax",val(myopdata[1])

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                END OF IF STATEMENT

                                                                                Hyperlink

                                                                                                IF ( myopcode >= 650 .and. myopcode <= 668 )

                                                                                                                Code Block

                                                                                                                                oldvalue = MyOpObjectName

                                                                                                                                MyOpObjectName = ObjSelArray[13]

                                                                                                                                Check Errors

                                                                                                                                                IF ( myopcode != 650 .and. myopcode != 665 .and. myopcode != 666 )

                                                                                                                                                                Code Block

                                                                                                                                                                                IF ( myopwinname = "NULL" )

                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                Call Procedure RTE_AddError Parameters 11

                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                IF ( myopobjectname = "NULL" )

                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                Call Procedure RTE_AddError Parameters 12

                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                Call Procedure RTE_Check

                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                Hyperlink

                                                                                                                                                I want hyperlink

                                                                                                                                                                IF ( myopcode = 650 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                ObjsCount = ObjsCount+1

                                                                                                                                                                                                cobjscount = CONVERT Objscount TO STRING

                                                                                                                                                                                                cobjscount = All Trim cobjscount

                                                                                                                                                                                                cobjname = "obj_"+cobjscount

                                                                                                                                                                                                MyOpObjectName = cobjname

                                                                                                                                                                                                IF ( initpara1 = "true" )

                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                Define HyperLink ( &cobjname )

                                                                                                                                                                                                                ELSE

                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                Define HyperLink ( &cobjname )

                                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                                Add item {"hyperlink",cobjname,"NULL","NOEVENTS",myopwinname} To Array MyOpObjsMap

                                                                                                                                                                                                ObjSelArray[13] = MyOpObjectName

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Hyperlink Caption is

                                                                                                                                                                IF ( myopcode = 651 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"caption",myopdata[1]

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Hyperlink Top is

                                                                                                                                                                IF ( myopcode = 652 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"row",val(myopdata[1])

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Hyperlink Left is

                                                                                                                                                                IF ( myopcode = 653 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"col",val(myopdata[1])

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Hyperlink Width is

                                                                                                                                                                IF ( myopcode = 654 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"width",val(myopdata[1])

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Hyperlink Height is

                                                                                                                                                                IF ( myopcode = 655 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"height",val(myopdata[1])

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Hyperlink Name Is

                                                                                                                                                                IF ( myopcode = 656 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                vmax = Get Length of String/Variable/Array MyOpObjsMap

                                                                                                                                                                                                FOR LOOP ( From x = vmax To 1 Step -1)

                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                IF ( MyOpObjsMap[x][1] = "hyperlink" )

                                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                                IF ( lower(alltrim(MyOpObjsMap[x][2])) == lower(alltrim(MyOpObjectName)) )

                                                                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                                                                MyOpObjsMap[x][3] = MyOpData[1]

                                                                                                                                                                                                                                                                                                Exit

                                                                                                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                                                End of For Loop

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Hyperlink Font Name is

                                                                                                                                                                IF ( myopcode = 657 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"fontname",myopdata[1]

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Hyperlink Font Size is

                                                                                                                                                                IF ( myopcode = 658 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"fontsize",val(myopdata[1])

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Hyperlink Fore Color is

                                                                                                                                                                IF ( myopcode = 659 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                acolor = RT_CheckColor(myopdata[1])

                                                                                                                                                                                                acolor = &acolor

                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"forecolor",acolor

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Hyperlink Back Color is

                                                                                                                                                                IF ( myopcode = 660 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                acolor = RT_CheckColor(myopdata[1])

                                                                                                                                                                                                acolor = &acolor

                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"backcolor",acolor

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Hyperlink Font Bold is

                                                                                                                                                                IF ( myopcode = 661 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                VarValue = lower(alltrim(myopdata[1]))

                                                                                                                                                                                                IF ( VarValue = "true" .or. VarValue = "1" )

                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"fontbold",.T.

                                                                                                                                                                                                                ELSE

                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"fontbold",.F.

                                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Hyperlink Font Italic is

                                                                                                                                                                IF ( myopcode = 662 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                VarValue = lower(alltrim(myopdata[1]))

                                                                                                                                                                                                IF ( VarValue = "true" .or. VarValue = "1" )

                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"fontitalic",.T.

                                                                                                                                                                                                                ELSE

                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"fontitalic",.F.

                                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Hyperlink Font Underline is

                                                                                                                                                                IF ( myopcode = 663 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                VarValue = lower(alltrim(myopdata[1]))

                                                                                                                                                                                                IF ( VarValue = "true" .or. VarValue = "1" )

                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"fontunderline",.T.

                                                                                                                                                                                                                ELSE

                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"fontunderline",.F.

                                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Hyperlink Font Strickout s

                                                                                                                                                                IF ( myopcode = 664 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                VarValue = lower(alltrim(myopdata[1]))

                                                                                                                                                                                                IF ( VarValue = "true" .or. VarValue = "1" )

                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"fontstrickout",.T.

                                                                                                                                                                                                                ELSE

                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"fontstrickout",.F.

                                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Set Hyperlink Transparent ON

                                                                                                                                                                IF ( myopcode = 665 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                initpara1 = "true"

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Set Hyperlink Transparent OFF

                                                                                                                                                                IF ( myopcode = 666 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                initpara1 = "FALSE"

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Hyperlink Selected

                                                                                                                                                                IF ( myopcode = 667 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                Call Procedure RT_SelectObject Parameters 13,"hyperlink"

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                Hyperlink address is

                                                                                                                                                                IF ( myopcode = 668 )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                avalue = myopdata[1]

                                                                                                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"address",avalue

                                                                                                                                                                                                Return 0

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                END OF IF STATEMENT

                                                                Statusbar

                                                                                You show statusbar   : Doesn't work

                                                                                                IF ( myopcode = 713 )

                                                                                                                Code Block

                                                                                                                                mylast = Get Length of String/Variable/Array RT_GUI_Statusbar

                                                                                                                                FOR LOOP ( From tempx = 1 To mylast Step 1)

                                                                                                                                                Code Block

                                                                                                                                                                IF ( alltrim(RT_GUI_Statusbar[tempx][1]) == alltrim(myopwinname) )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                Define New Statusbar

                                                                                                                                                                                                                Items

                                                                                                                                                                                                                                mylast2 = Get Length of String/Variable/Array RT_GUI_Statusbar[tempx][8]

                                                                                                                                                                                                                                FOR LOOP ( From tempx2 = 1 To mylast2 Step 1)

                                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                                IF ( RT_GUI_Statusbar[tempx][8][tempx2][1] = 1 )

                                                                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                                                                tempcaption = RT_GUI_Statusbar[tempx][8][tempx2][2]

                                                                                                                                                                                                                                                                                                Define New StatusItem ( (tempcaption) )

                                                                                                                                                                                                                                                                                                                Events

                                                                                                                                                                                                                                                                                                                Properties

                                                                                                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                                                                                                IF ( RT_GUI_Statusbar[tempx][8][tempx2][1] = 2 )

                                                                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                                                                Clock

                                                                                                                                                                                                                                                                                                                Events

                                                                                                                                                                                                                                                                                                                Properties

                                                                                                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                                                                                                IF ( RT_GUI_Statusbar[tempx][8][tempx2][1] = 3 )

                                                                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                                                                Date

                                                                                                                                                                                                                                                                                                                Events

                                                                                                                                                                                                                                                                                                                Properties

                                                                                                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                                                                                                IF ( RT_GUI_Statusbar[tempx][8][tempx2][1] = 4 )

                                                                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                                                                Keyboard

                                                                                                                                                                                                                                                                                                                Events

                                                                                                                                                                                                                                                                                                                Properties

                                                                                                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                                                                                End of For Loop

                                                                                                                                                                                                                End Statusbar

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                End of For Loop

                                                                                                                                Return 0

                                                                                                                END OF IF STATEMENT

                                                                Menubar

                                                                                i want menubar

                                                                                                IF ( myopcode = 750 )

                                                                                                                Code Block

                                                                                                                                mylast = Get Length of String/Variable/Array RT_GUI_Menubar

                                                                                                                                FOR LOOP ( From tempx = 1 To mylast Step 1)

                                                                                                                                                Code Block

                                                                                                                                                                IF ( RT_GUI_Menubar[tempx][1] == myopwinname )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                START OF MAIN MENU : WINDOW (&myopwinname)

                                                                                                                                                                                                                MENU POPUPS

                                                                                                                                                                                                                                mylast2 = Get Length of String/Variable/Array RT_GUI_Menubar[tempx][2]

                                                                                                                                                                                                                                IF ( mylast2 > 0 )

                                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                                FOR LOOP ( From tempx2 = 1 To mylast2 Step 1)

                                                                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                                                                DEFINE POPUP RT_GUI_Menubar[tempx][2][tempx2][1]

                                                                                                                                                                                                                                                                                                                POPUP ITEMS

                                                                                                                                                                                                                                                                                                                                mylast3 = Get Length of String/Variable/Array RT_GUI_Menubar[tempx][2][tempx2][2]

                                                                                                                                                                                                                                                                                                                                IF ( mylast3 > 0 )

                                                                                                                                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                                                                                                                                FOR LOOP ( From tempx3 = 1 To mylast3 Step 1)

                                                                                                                                                                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                                                                                                                                                                myitemevent = "RT_DoEvent('menuitem','" + alltrim(RT_GUI_Menubar[tempx][2][tempx2][2][tempx3][2])+"'

                                                                                                                                                                                                                                                                                                                                                                                                Define ITEM ( RT_GUI_Menubar[tempx][2][tempx2][2][tempx3][1] )

                                                                                                                                                                                                                                                                                                                                                                                                Add item {"menuitem",RT_GUI_Menubar[tempx][2][tempx2][2][tempx3][2],RT_GUI_Menubar[tempx][2][tempx2]

                                                                                                                                                                                                                                                                                                                                                                                End of For Loop

                                                                                                                                                                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                                                                                                                                                END OF POPUP

                                                                                                                                                                                                                                                                                End of For Loop

                                                                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                                                END OF MAIN MENU

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                End of For Loop

                                                                                                                                Return 0

                                                                                                                END OF IF STATEMENT

                                End of Procedure

                Define Procedure RT_CloseWin

                                Code Block

                                                winscount = winscount - 1

                                                vmax = Get Length of String/Variable/Array MyOpObjsMap

                                                IF ( vmax > 0 )

                                                                Start Here

                                                                                FOR LOOP ( From x = vmax To 1 Step -1)

                                                                                                Code Block

                                                                                                                IF ( valtype(MyOpObjsMap[x]) == "A" )

                                                                                                                                Start Here

                                                                                                                                                IF ( MyOpObjsMap[x][1] = "window" )

                                                                                                                                                                Code Block

                                                                                                                                                                                IF ( alltrim(myopobjsmap[x][2]) == alltrim(myopwinname) )

                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                Delete item x from Array myopobjsmap

                                                                                                                                                                                                                Exit

                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                END OF IF STATEMENT

                                                                                                End of For Loop

                                                                END OF IF STATEMENT

                                                IF ( RT_Checkwins() = False .or. winscount = 0 )

                                                                Code Block

                                                                                SysSwitch = False

                                                                                winscount = 0

                                                                END OF IF STATEMENT

                                End of Procedure

                Define Procedure RT_CallInstructions( P1 )

                                Code Block

                                                Local OldProc,OldLevel

                                                prepare p1

                                                                p1 = Sub String " " FROM p1 TRANSFORM TO ""

                                                                p1 = CONVERT String p1 To LOWER CASE

                                                                Arabic Events Support

                                                                                p1 = Sub String "النقربالفارة" FROM p1 TRANSFORM TO "mouseclick"

                                                                                p1 = Sub String "التغير" FROM p1 TRANSFORM TO "change"

                                                                                p1 = Sub String "امتلاكالبؤرة" FROM p1 TRANSFORM TO "gotfocus"

                                                                                p1 = Sub String "فقدانالبؤرة" FROM p1 TRANSFORM TO "lostfocus"

                                                                                p1 = Sub String "التحركبالفارة" FROM p1 TRANSFORM TO "mousemove"

                                                                                p1 = Sub String "التحرك" FROM p1 TRANSFORM TO "move"

                                                                                p1 = Sub String "اعادةالتحجيم" FROM p1 TRANSFORM TO "resize"

                                                                                p1 = Sub String "التكبير" FROM p1 TRANSFORM TO "maximize"

                                                                                p1 = Sub String "التصغير" FROM p1 TRANSFORM TO "minimize"

                                                                                p1 = Sub String "النقرمرتين" FROM p1 TRANSFORM TO "doubleclick"

                                                                                p1 = Sub String "الإنهاء" FROM p1 TRANSFORM TO "release"

                                                                                p1 = Sub String "الانهاء" FROM p1 TRANSFORM TO "release"

                                                IF ( myactiveproc == p1 )

                                                                Code Block

                                                                                RT_LoopSwitch = True

                                                                                Return 0

                                                                END OF IF STATEMENT

                                                OldProc = MyActiveProc

                                                OldLevel = MyActiveLevel

                                                MyActiveProc = P1

                                                MyActiveLevel = 0

                                                Call Procedure MyRuntimeUrgent

                                                Call Procedure MyRuntime

                                                MyActiveProc = OldProc

                                                MyActiveLevel = OldLevel

                                End of Procedure

                Define Procedure RT_SetEvents

                                Code Block

                                                Local vmax,x

                                                Windows Events

                                                                vmax = Get Length of String/Variable/Array MyOpObjsMap

                                                                IF ( vmax > 0 )

                                                                                Start Here

                                                                                                FOR LOOP ( From x = vmax To 1 Step -1)

                                                                                                                Code Block

                                                                                                                                IF ( valtype(MyOpObjsMap[x]) == "A" )

                                                                                                                                                Start Here

                                                                                                                                                                MyOpObjsMap[x][4] = "READY"

                                                                                                                                                END OF IF STATEMENT

                                                                                                                End of For Loop

                                                                                END OF IF STATEMENT

                                End of Procedure

                Define Procedure RT_DoEvent( P1,P2,P3 )

                                Code Block

                                                Local vmax,x,vready

                                                vready = false

                                                IF ( p1 = "window" )

                                                                Code Block

                                                                                Call Procedure RT_SelectWindow Parameters p2

                                                                                vready = True

                                                                END OF IF STATEMENT

                                                Set Active GUI Control

                                                                IF ( p1 = "button" )

                                                                                Code Block

                                                                                                Call Procedure RT_SelectObjectGeneral Parameters 1,"button",p2

                                                                                                ELSEIF ( p1 = "label" )

                                                                                                                Start Here

                                                                                                                                Call Procedure RT_SelectObjectGeneral Parameters 2,"label",p2

                                                                                                                                vready = True

                                                                                                ELSEIF ( p1 = "picture" )

                                                                                                                Start Here

                                                                                                                                Call Procedure RT_SelectObjectGeneral Parameters 3,"picture",p2

                                                                                                                                vready = True

                                                                                                ELSEIF ( p1 = "textbox" )

                                                                                                                Start Here

                                                                                                                                Call Procedure RT_SelectObjectGeneral Parameters 4,"textbox",p2

                                                                                                                                vready = True

                                                                                                ELSEIF ( p1 = "editbox" )

                                                                                                                Start Here

                                                                                                                                Call Procedure RT_SelectObjectGeneral Parameters 5,"editbox",p2

                                                                                                                                vready = True

                                                                                                ELSEIF ( p1 = "listbox" )

                                                                                                                Start Here

                                                                                                                                Call Procedure RT_SelectObjectGeneral Parameters 6,"listbox",p2

                                                                                                                                vready = True

                                                                                                ELSEIF ( p1 = "combobox" )

                                                                                                                Start Here

                                                                                                                                Call Procedure RT_SelectObjectGeneral Parameters 7,"combobox",p2

                                                                                                                                vready = True

                                                                                                ELSEIF ( p1 = "checkbox" )

                                                                                                                Start Here

                                                                                                                                Call Procedure RT_SelectObjectGeneral Parameters 8,"checkbox",p2

                                                                                                                                vready = True

                                                                                                ELSEIF ( p1 = "progressbar" )

                                                                                                                Start Here

                                                                                                                                Call Procedure RT_SelectObjectGeneral Parameters 9,"progressbar",p2

                                                                                                                                vready = True

                                                                                                ELSEIF ( p1 = "slider" )

                                                                                                                Start Here

                                                                                                                                Call Procedure RT_SelectObjectGeneral Parameters 10,"slider",p2

                                                                                                                                vready = True

                                                                                                ELSEIF ( p1 = "datepicker" )

                                                                                                                Start Here

                                                                                                                                Call Procedure RT_SelectObjectGeneral Parameters 11,"datepicker",p2

                                                                                                                                vready = True

                                                                                                ELSEIF ( p1 = "spinner" )

                                                                                                                Start Here

                                                                                                                                Call Procedure RT_SelectObjectGeneral Parameters 12,"spinner",p2

                                                                                                                                vready = True

                                                                                                ELSEIF ( p1 = "hyperlink" )

                                                                                                                Start Here

                                                                                                                                Call Procedure RT_SelectObjectGeneral Parameters 13,"hyperlink",p2

                                                                                                                                vready = True

                                                                                                ELSEIF ( p1 = "statusbar" )

                                                                                                                Start Here

                                                                                                                                Call Procedure RT_SelectObjectGeneral Parameters 14,"statusbar",p2

                                                                                                                                vready = True

                                                                                END OF IF STATEMENT

                                                Windows Events

                                                                vmax = Get Length of String/Variable/Array MyOpObjsMap

                                                                IF ( vmax > 0 )

                                                                                Start Here

                                                                                                FOR LOOP ( From x = vmax To 1 Step -1)

                                                                                                                Code Block

                                                                                                                                IF ( valtype(MyOpObjsMap[x]) == "A" )

                                                                                                                                                Start Here

                                                                                                                                                                IF ( lower(alltrim(MyOpObjsMap[x][1])) == lower(alltrim(P1)) )

                                                                                                                                                                                Code Block

                                                                                                                                                                                                IF ( vready = True .and. lower(alltrim(MyOpObjsMap[x][4])) != "ready" )

                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                Loop

                                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                                IF ( lower(alltrim(MyOpObjsMap[x][2])) == lower(alltrim(P2)) )

                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                Call Procedure RT_CallInstructions Parameters LOWER(ALLTRIM(MyOpObjsMap[x][3]))+" " + Lower(Alltrim(

                                                                                                                                                                                                                                Call Procedure RT_SetEvents

                                                                                                                                                                                                                                IF ( p3 = "release" )

                                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                                Delete item x from Array MyOpObjsMap

                                                                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                END OF IF STATEMENT

                                                                                                                End of For Loop

                                                                                END OF IF STATEMENT

                                                                IF ( p1 = "window" .and. p3 = "release" )

                                                                                Code Block

                                                                                                Call Procedure RT_CloseWin

                                                                                END OF IF STATEMENT

                                                                IF ( p1 = "window" .and. p3 = "gotfocus" )

                                                                                Code Block

                                                                                                MyOpWinName = lower(alltrim(p2))

                                                                                END OF IF STATEMENT

                                End of Procedure

                Define Procedure RT_SelectObject( p1,p2 )

                                Code Block

                                                ObjSelArray[P1] = "NULL"

                                                vmax = Get Length of String/Variable/Array MyOpObjsMap

                                                Prepare myopdata[1]

                                                                myopdata[1] = Sub String " " FROM myopdata[1] TRANSFORM TO ""

                                                                myopdata[1] = Sub String chr(13) + chr(10) FROM myopdata[1] TRANSFORM TO ""

                                                                myopdata[1] = All Trim myopdata[1]

                                                FOR LOOP ( From x = vmax To 1 Step -1)

                                                                Code Block

                                                                                IF ( lower(alltrim(MyOpObjsMap[x][1])) == lower(alltrim(p2)) .and. MyOpObjsMap[x][5] == myopwinname

                                                                                                Code Block

                                                                                                                IF ( lower(alltrim(MyOpObjsMap[x][3])) == lower(alltrim(MyOpData[1])) )

                                                                                                                                Code Block

                                                                                                                                                ObjSelArray[P1] = MyOpObjsMap[x][2]

                                                                                                                                                MyOpObjectName = ObjSelArray[p1]

                                                                                                                                                Exit

                                                                                                                                END OF IF STATEMENT

                                                                                                END OF IF STATEMENT

                                                                End of For Loop

                                                IF ( ObjSelArray[P1] = "NULL" )

                                                                Code Block

                                                                                Show Message p2 + " " + myopdata[1]+" is not found !!!" Title "Supernova - Runtime Error" Type: Mess

                                                                                MyActiveProc = "NULL"

                                                                END OF IF STATEMENT

                                End of Procedure

                Define Procedure RT_SelectObjectGeneral( p1,p2,p3 )

                                Code Block

                                                ObjSelArray[P1] = "NULL"

                                                vmax = Get Length of String/Variable/Array MyOpObjsMap

                                                FOR LOOP ( From x = vmax To 1 Step -1)

                                                                Code Block

                                                                                IF ( lower(alltrim(MyOpObjsMap[x][1])) == lower(alltrim(p2)) .and. MyOpObjsMap[x][5] == myopwinname

                                                                                                Code Block

                                                                                                                IF ( lower(alltrim(MyOpObjsMap[x][2])) == lower(alltrim(p3)) )

                                                                                                                                Code Block

                                                                                                                                                ObjSelArray[P1] = MyOpObjsMap[x][2]

                                                                                                                                                MyOpObjectName = ObjSelArray[p1]

                                                                                                                                                Exit

                                                                                                                                END OF IF STATEMENT

                                                                                                END OF IF STATEMENT

                                                                End of For Loop

                                End of Procedure

                Define Procedure RT_SelectWindow( p1 )

                                Code Block

                                                Local x,vmax

                                                vmax = Get Length of String/Variable/Array MyOpObjsMap

                                                IF ( vmax > 0 )

                                                                Start Here

                                                                                FOR LOOP ( From x = vmax To 1 Step -1)

                                                                                                Code Block

                                                                                                                IF ( valtype(MyOpObjsMap[x]) == "A" )

                                                                                                                                Start Here

                                                                                                                                                IF ( len(MyOpObjsMap[x]) > 0 )

                                                                                                                                                                Start Here

                                                                                                                                                                                IF ( MyOpObjsMap[x][1] = "window" )

                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                IF ( lower(alltrim(MyOpObjsMap[x][2])) == lower(alltrim(p1)) )

                                                                                                                                                                                                                                Code Block

                                                                                                                                                                                                                                                MyOpWinName = MyOpObjsMap[x][2]

                                                                                                                                                                                                                                                Exit

                                                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                END OF IF STATEMENT

                                                                                                End of For Loop

                                                                END OF IF STATEMENT

                                End of Procedure

                Define Procedure RT_CheckWins

                                Code Block

                                                Local myret

                                                myret = False

                                                vmax = Get Length of String/Variable/Array MyOpObjsMap

                                                IF ( vmax > 0 )

                                                                Start Here

                                                                                FOR LOOP ( From x = vmax To 1 Step -1)

                                                                                                Code Block

                                                                                                                IF ( valtype(MyOpObjsMap[x]) == "A" )

                                                                                                                                Start Here

                                                                                                                                                IF ( MyOpObjsMap[x][1] = "window" .and. MyOpObjsMap[x][5] = "NOPARENT" )

                                                                                                                                                                Code Block

                                                                                                                                                                                myret = True

                                                                                                                                                                END OF IF STATEMENT

                                                                                                                                END OF IF STATEMENT

                                                                                                End of For Loop

                                                                END OF IF STATEMENT

                                                Return myret

                                End of Procedure

                Define Procedure RT_CheckColor( p1 )

                                Code Block

                                                myret = true

                                                Do Job

                                                                p1 = All Trim p1

                                                                p1 = Sub String " " FROM p1 TRANSFORM TO ""

                                                                IF ( len(p1) > 13 )

                                                                                Code Block

                                                                                                myret = false

                                                                                END OF IF STATEMENT

                                                                tempvar =  Get SubString from left, String: p1 Count: 1

                                                                IF ( tempvar != "{" )

                                                                                Code Block

                                                                                                myret = false

                                                                                END OF IF STATEMENT

                                                                tempvar =  Get SubString from right, String: p1 Count: 1

                                                                IF ( tempvar != "}" )

                                                                                Code Block

                                                                                                myret = false

                                                                                END OF IF STATEMENT

                                                                IF ( NUMTOKEN(p1, ", ", 1) != 3 )

                                                                                Code Block

                                                                                                myret = false

                                                                                END OF IF STATEMENT

                                                                FOR LOOP ( From x = 2 To len(p1)-1 Step 1)

                                                                                Code Block

                                                                                                tv = Sub String of p1 From x Count 1

                                                                                                IF ( tv = "0" .or. tv = "1" .or. tv = "2" .or. tv = "3" .or. tv = "4" .or. tv = "5" .or. tv = "6" .or. tv = "7" .or. tv = "8" .or. tv = "9" .or. tv = "," )

                                                                                                                Code Block

                                                                                                                ELSE

                                                                                                                                Code Block

                                                                                                                                                myret = false

                                                                                                                                                Exit

                                                                                                                END OF IF STATEMENT

                                                                                End of For Loop

                                                IF ( myret = true )

                                                                Code Block

                                                                                Return p1

                                                                ELSE

                                                                                Code Block

                                                                                                p1 = CONVERT String p1 To LOWER CASE

                                                                                                Predefined Colors

                                                                                                                IF ( p1 == "aqua" .or. p1 == "مائى" )

                                                                                                                                Code Block

                                                                                                                                                Return "{0,255,255}"

                                                                                                                                END OF IF STATEMENT

                                                                                                                IF ( p1 == "black" .or. p1 == "اسود" )

                                                                                                                                Code Block

                                                                                                                                                Return "{0,0,0}"

                                                                                                                                END OF IF STATEMENT

                                                                                                                IF ( p1 == "blue" .or. p1 == "ازرق" )

                                                                                                                                Code Block

                                                                                                                                                Return "{0,0,255}"

                                                                                                                                END OF IF STATEMENT

                                                                                                                IF ( p1 == "darkgray" .or. p1 == "رمادىغامق" )

                                                                                                                                Code Block

                                                                                                                                                Return "{128,128,128}"

                                                                                                                                END OF IF STATEMENT

                                                                                                                IF ( p1 == "fuchsia" .or. p1 == "فوشيا" )

                                                                                                                                Code Block

                                                                                                                                                Return "{255,0,255}"

                                                                                                                                END OF IF STATEMENT

                                                                                                                IF ( p1 == "gray" .or. p1 == "رمادى" )

                                                                                                                                Code Block

                                                                                                                                                Return "{128,128,128}"

                                                                                                                                END OF IF STATEMENT

                                                                                                                IF ( p1 == "green" .or. p1 == "اخضر" )

                                                                                                                                Code Block

                                                                                                                                                Return "{0,128,0}"

                                                                                                                                END OF IF STATEMENT

                                                                                                                IF ( p1 == "lime" .or. p1 == "كلس" )

                                                                                                                                Code Block

                                                                                                                                                Return "{0,255,0}"

                                                                                                                                END OF IF STATEMENT

                                                                                                                IF ( p1 == "lightgray" .or. p1 == "رمادىفاتح" )

                                                                                                                                Code Block

                                                                                                                                                Return "{192,192,192}"

                                                                                                                                END OF IF STATEMENT

                                                                                                                IF ( p1 == "maroon" .or. p1 == "بنى" )

                                                                                                                                Code Block

                                                                                                                                                Return "{128,0,0}"

                                                                                                                                END OF IF STATEMENT

                                                                                                                IF ( p1 == "navy" .or. p1 == "ازرقداكن" )

                                                                                                                                Code Block

                                                                                                                                                Return "{0,0,128}"

                                                                                                                                END OF IF STATEMENT

                                                                                                                IF ( p1 = "purple" .or. p1 = "الارجوان" )

                                                                                                                                Code Block

                                                                                                                                                Return "{128,0,128}"

                                                                                                                                END OF IF STATEMENT

                                                                                                                IF ( p1 == "red" .or. p1 == "احمر" )

                                                                                                                                Code Block

                                                                                                                                                Return "{255,0,0}"

                                                                                                                                END OF IF STATEMENT

                                                                                                                IF ( p1 == "silver" .or. p1 == "فضة" )

                                                                                                                                Code Block

                                                                                                                                                Return "{192,192,192}"

                                                                                                                                END OF IF STATEMENT

                                                                                                                IF ( p1 == "teal" .or. p1 == "بطبرى" )

                                                                                                                                Code Block

                                                                                                                                                Return "{128,128,0}"

                                                                                                                                END OF IF STATEMENT

                                                                                                                IF ( p1 == "white" .or. p1 == "ابيض" )

                                                                                                                                Code Block

                                                                                                                                                Return "{255,255,255}"

                                                                                                                                END OF IF STATEMENT

                                                                                                                IF ( p1 == "yellow" .or. p1 == "اصفر" )

                                                                                                                                Code Block

                                                                                                                                                Return "{255,255,0}"

                                                                                                                                END OF IF STATEMENT

                                                                                                Return "{0,0,0}"

                                                                END OF IF STATEMENT

                                End of Procedure

                Define Procedure RT_GUIDIM( TEMP_DIM,MyOpObjectName )

                                Code Block

                                                Object Dim.

                                                                Object Top to

                                                                                IF ( myopcode = temp_dim )

                                                                                                Code Block

                                                                                                                myvalue = Call Function GetProperty ( myopwinname,MyOpObjectName,"row" )

                                                                                                                Call Procedure RT_SetVarValue Parameters myopdata[1],alltrim(str(myvalue))

                                                                                                                Return 0

                                                                                                END OF IF STATEMENT

                                                                Object Left to

                                                                                IF ( myopcode = temp_dim  + 1 )

                                                                                                Code Block

                                                                                                                myvalue = Call Function GetProperty ( myopwinname,MyOpObjectName,"col" )

                                                                                                                Call Procedure RT_SetVarValue Parameters myopdata[1],alltrim(str(myvalue))

                                                                                                                Return 0

                                                                                                END OF IF STATEMENT

                                                                Object Width to

                                                                                IF ( myopcode = temp_dim  + 2 )

                                                                                                Code Block

                                                                                                                myvalue = Call Function GetProperty ( myopwinname,MyOpObjectName,"width" )

                                                                                                                Call Procedure RT_SetVarValue Parameters myopdata[1],alltrim(str(myvalue))

                                                                                                                Return 0

                                                                                                END OF IF STATEMENT

                                                                Object Height to

                                                                                IF ( myopcode = temp_dim  + 3 )

                                                                                                Code Block

                                                                                                                myvalue = Call Function GetProperty ( myopwinname,MyOpObjectName,"height" )

                                                                                                                Call Procedure RT_SetVarValue Parameters myopdata[1],alltrim(str(myvalue))

                                                                                                                Return 0

                                                                                                END OF IF STATEMENT

                                                                Object Top from

                                                                                IF ( myopcode = temp_dim  + 4 )

                                                                                                Code Block

                                                                                                                Call Procedure RT_ReadExpr Parameters myopdata[1],"RightSide"

                                                                                                                VARVALUE = Call Function RT_GetExprValue ( RT_RS_DATA )

                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"row",val(varvalue)

                                                                                                                Return 0

                                                                                                END OF IF STATEMENT

                                                                Object Width from

                                                                                IF ( myopcode = temp_dim  + 5 )

                                                                                                Code Block

                                                                                                                Call Procedure RT_ReadExpr Parameters myopdata[1],"RightSide"

                                                                                                                VARVALUE = Call Function RT_GetExprValue ( RT_RS_DATA )

                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"col",val(varvalue)

                                                                                                                Return 0

                                                                                                END OF IF STATEMENT

                                                                Editbox Value from

                                                                                IF ( myopcode = temp_dim  + 6 )

                                                                                                Code Block

                                                                                                                Call Procedure RT_ReadExpr Parameters myopdata[1],"RightSide"

                                                                                                                VARVALUE = Call Function RT_GetExprValue ( RT_RS_DATA )

                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"width",val(varvalue)

                                                                                                                Return 0

                                                                                                END OF IF STATEMENT

                                                                Object Height from

                                                                                IF ( myopcode = temp_dim  + 7 )

                                                                                                Code Block

                                                                                                                Call Procedure RT_ReadExpr Parameters myopdata[1],"RightSide"

                                                                                                                VARVALUE = Call Function RT_GetExprValue ( RT_RS_DATA )

                                                                                                                Call Procedure setproperty Parameters MyOpWinName,MyOpObjectName,"height",val(varvalue)

                                                                                                                Return 0

                                                                                                END OF IF STATEMENT

                                End of Procedure