home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 5 Edit / 05-Edit.zip / texed133.zip / English.zip / Macro2.cmd < prev    next >
OS/2 REXX Batch file  |  1995-09-19  |  1KB  |  26 lines
  1. /***************************************************************************/
  2. /* Two ways to insert text                                                 */
  3. /* a) directly ( D2C(13) = ENTER )                                         */
  4. /* b) with the clipboard                                                   */
  5.  
  6.    ok = VRMethod( "MLE_1", "Insert", D2C(13)||"I was insert directly"||D2C(13) )
  7.  
  8.    ok = VRMethod( "Application", "PutClipboard", "I have visited the clipboard")
  9.    ok = VRMethod( "MLE_1", "Paste" )
  10.  
  11. /***************************************************************************/
  12. /* Send a key                                                              */
  13. /* {Up}, {Down}, {Left}, {Right}, {Enter}, {Tab}, {Shift}, {Space},        */
  14. /* {Home}, {Backspace} etc., and combinations like {Ctrl}s or              */
  15. /* {Alt}{F7} etc. are availible                                            */
  16.  
  17.    ok = VRMethod( "Application", "SendKeyString", MLE_1, '{Enter}' )
  18.  
  19. /***************************************************************************/
  20. /* a) Read the context of the editor window                                */
  21. /* b) Set the context of the editor window                                 */
  22.  
  23.    Inhalt = VRGet( "MLE_1", "Value" )
  24.    ok = VRSet( "MLE_1", "Value", Inhalt)
  25.  
  26.