CREATE CONTAINER Example

Example:

 

*

 

 

.Define the CONTAINER object and other variables

.

 

 

PAINT

CONTAINER

 

BUTTON

BUTTON

 

RESULT

INTEGER

1

*

 

 

.Create the CONTAINER object

.

 

 

  

CREATE

PAINT=3:12:5:45,CLASS="Paint.Picture":

  

  

 STYLE=1

*

 

 

.Create and Activate the Quit Button

.

 

 

  

CREATE

BUTTON=14:15:22:28,"Quit",DEFAULT

  

ACTIVATE

BUTTON,END,RESULT

*

 

 

.Wait for an Event to Occur

.

 

 

  

LOOP

 

  

EVENTWAIT

 

  

REPEAT

 

*

 

 

.Terminate Execution

.

 

 

END

 

 

  

STOP

 

 

This example creates an CONTAINER object using the Microsoft Paint application. The user may interact with the Paint application after double-clicking the CONTAINER. Clicking the Quit button terminates the program.

 

 


PL/B Language Reference CREATE COMBOBOX Example CREATE CONTROL Example