FWD » Core Development » User Interface

def var ch1 as char.

def var ch2 as char.

def var ch3 as char.

def var ch4 as char.

def var ch5 as char.

def var ch6 as char.

def var ch7 as char.

def var ch8 as char.

def var ch9 as char.

def var ch10 as char.

def var ch11 as char.

def var ch12 as char.

def var ch13 as char.

def var ch14 as char.

def var ch15 as char.

def var ch16 as char.

def var ch17 as char.

display "1 1234567890 2 1234567890 3 1234567890 4 1234567890 5 1234567890 6 1234567890 7 1234567890 8 1234567890 9 1234567890 10 1234567890 11 1234567890 12 1234567890 13 1234567890 14 1234567890 15 1234567890" skip

   ch1 skip

   ch2 skip 

   ch3 skip 

   ch4 skip 

   ch5 skip

   ch6 skip

   ch7 skip

   ch8 skip

   ch9 skip

   ch10 skip

   with with frame f1 size-pixels 300 by 200 no-labels.

ch1:width-pixels = 50.   

ch2:width-pixels = 100.

ch3:width-pixels = 150.

ch4:width-pixels = 200.

ch5:width-pixels = 250.

ch6:width-pixels = 300.

ch7:width-pixels = 350.

ch8:width-pixels = 400.

ch9:width-pixels = 450.

ch10:width-pixels = 500.

enable 

   ch1 

   ch2 

   ch3 

   ch4 

   ch5 

   ch6 

   ch7 

   ch8 

   ch9 

   ch10

with frame f1.   

wait-for close of current-window.