home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 5 Edit / 05-Edit.zip / texed133.zip / Deutsch.zip / Makro2.cmd < prev    next >
OS/2 REXX Batch file  |  1995-07-09  |  1KB  |  26 lines
  1. /***************************************************************************/
  2. /* Einfügen von Text an die aktuelle Cursor-Position                       */
  3. /* a) direkt ( D2C(13) = ENTER )                                           */
  4. /* b) über die Zwischenablage                                              */
  5.  
  6.    ok = VRMethod( "MLE_1", "Insert", D2C(13)||"Ich wurde direkt eingefügt"||D2C(13) )
  7.  
  8.    ok = VRMethod( "Application", "PutClipboard", "Ich komme aus der Zwischenablage")
  9.    ok = VRMethod( "MLE_1", "Paste" )
  10.  
  11. /***************************************************************************/
  12. /* Senden einer Taste                                                      */
  13. /* {Up}, {Down}, {Left}, {Right}, {Enter}, {Tab}, {Shift}, {Space},        */
  14. /* {Home}, {Backspace} usw., sowie Kombinationen wie {Ctrl}s oder          */
  15. /* {Alt}{F7} usw. sind möglich                                             */
  16.  
  17.    ok = VRMethod( "Application", "SendKeyString", MLE_1, '{Enter}' )
  18.  
  19. /***************************************************************************/
  20. /* a) Auslesen Fensterinhaltes in die Variable Inhalt                      */
  21. /* b) Fensterinhalt mit der Variable Inhalt füllen                         */
  22.  
  23.    Inhalt = VRGet( "MLE_1", "Value" )
  24.    ok = VRSet( "MLE_1", "Value", Inhalt)
  25.  
  26.