clipboard.rex 310 Bytes
Edit Raw Blame History



1

2

3

4

5

6

7

8

9

10

11

12

13

14

15

16

17

18

19

20

21

22

23

24

25


/*
 * Sample rexx code to justified paste the clipboard contents.
 *
 * Autor: Perry Werneck <perry.werneck@gmail.com>
 *
 */

 host = .rx3270~new("")

 text = host~GetClipboard()
 if text = "" then
 do
    say "Clipboard is empty"
    return 0
 end

 say "["||text||"]"


return 0

::requires "rx3270.cls"