home *** CD-ROM | disk | FTP | other *** search
/ Linux Cubed Series 3: Developer Tools / Linux Cubed Series 3 - Developer Tools.iso / devel / lang / c / xw2.000 / xw2 / xw / x / objectbuilder / windows / lstselect.mta < prev    next >
Encoding:
Text File  |  1994-10-08  |  2.0 KB  |  53 lines

  1.  
  2. wdw(XXWL 1 6 10 15 ("helpfile.inf") 1 StandardWDW);
  3.  
  4. o(XXWL00  S .  0  0 36 1 Extra 1); bg(XXWL00 . (" Select")); eg();
  5. o(XXWL01  S .  0  1 36 1 Extra 1); bg(XXWL01 . (" List:") ); eg();
  6.  
  7. o(XXWL90  I I  5  3  4 1 Standard 1);
  8.  :XXWL92  S .  1  3  4 1 Standard 1);
  9.  :XXWL93  S .  1  4  4 1 Standard 1);
  10.  :XXWL94  S .  1 13  4 1 Standard 1);
  11.   bg(XXWL90 . 0);    eg();
  12.   bg(XXWL92 . Home);   cn(raK("(int)OBJ:XXWL90.V:=0;")); eg();
  13.   bg(XXWL93 . (" Up"));cn(raK("(int)OBJ:XXWL90.V-=6[0];")); eg();
  14.   bg(XXWL94 . Down);   cn(raK("(int)OBJ:XXWL90.V-=(-6);")); eg();
  15.  
  16. o(XXWL9A N N  1  5  4 1 Secure 1);
  17.  :XXWL9B N N  1  6  4 1 Secure 1);
  18.  :XXWL9C N N  1  7  4 1 Secure 1);
  19.  :XXWL9D N N  1  8  4 1 Secure 1);
  20.  :XXWL9E N N  1  9  4 1 Secure 1);
  21.  :XXWL9F N N  1 10  4 1 Secure 1);
  22.  :XXWL9G N N  1 11  4 1 Secure 1);
  23.  :XXWL9H N N  1 12  4 1 Secure 1);
  24.   bg(XXWL9A . ("    ")); i( ao 2); pn( an (ptr)OBJ:XXWL90.V);
  25.     cn(raK("(str)OBX:act.aln:=((str)OBJ:XXWL9A.V);"));cn(aW XXWS);
  26.     eg();
  27.   bg(XXWL9B . ("    ")); i( ao 3); pn( an (ptr)OBJ:XXWL90.V);
  28.     cn(raK("(str)OBX:act.aln:=((str)OBJ:XXWL9B.V);"));cn(aW XXWS);
  29.     eg();
  30.   bg(XXWL9C . ("    ")); i( ao 4); pn( an (ptr)OBJ:XXWL90.V);
  31.     cn(raK("(str)OBX:act.aln:=((str)OBJ:XXWL9C.V);"));cn(aW XXWS);
  32.     eg();
  33.   bg(XXWL9D . ("    ")); i( ao 5); pn( an (ptr)OBJ:XXWL90.V);
  34.     cn(raK("(str)OBX:act.aln:=((str)OBJ:XXWL9D.V);"));cn(aW XXWS);
  35.     eg();
  36.   bg(XXWL9E . ("    ")); i( ao 6); pn( an (ptr)OBJ:XXWL90.V);
  37.     cn(raK("(str)OBX:act.aln:=((str)OBJ:XXWL9E.V);"));cn(aW XXWS);
  38.     eg();
  39.   bg(XXWL9F . ("    ")); i( ao 7); pn( an (ptr)OBJ:XXWL90.V);
  40.     cn(raK("(str)OBX:act.aln:=((str)OBJ:XXWL9F.V);"));cn(aW XXWS);
  41.     eg();
  42.   bg(XXWL9G . ("    ")); i( ao 8); pn( an (ptr)OBJ:XXWL90.V);
  43.     cn(raK("(str)OBX:act.aln:=((str)OBJ:XXWL9G.V);"));cn(aW XXWS);
  44.     eg();
  45.   bg(XXWL9H . ("    ")); i( ao 9); pn( an (ptr)OBJ:XXWL90.V);
  46.     cn(raK("(str)OBX:act.aln:=((str)OBJ:XXWL9H.V);"));cn(aW XXWS);
  47.     eg();
  48.  
  49. ng( KEY ("XXWL:27.0")); c( W XXWS); eg(); /* ESC:Zurueck */
  50.  
  51. End();
  52.  
  53.