home *** CD-ROM | disk | FTP | other *** search
/ ANews 3 / AnewsCD3.iso / DP / Programmation / PureBasic_Demo / Examples / Sources / Clipboard.pb < prev    next >
Text File  |  1999-10-10  |  498b  |  20 lines
  1. ;
  2. ; *************************************
  3. ;
  4. ; Clipboard example file for Pure Basic
  5. ;
  6. ;    © 1999 - Fantaisie Software -
  7. ;
  8. ; *************************************
  9. ;
  10. ;
  11.  
  12. SetClipboardText("Hello world - Amiga is Back")    ; Fill the clipboard with our text
  13.  
  14. a$ = GetClipboardText()                            ; Get the Clipboard content
  15.  
  16. NPrint("Clipboard content: "+a$)                   ; Display the content. Is it working ?
  17. NPrint("Test it by just press 'Right Amiga + V'")  ; Check yourself
  18.  
  19. End
  20.