Sub SetClipBoardText(ByRef Text As String)
Посылает текст в буфер обмена
Text - любой текст
Windows , Linux
#Include "window9.bi"
SetClipBoardText("Hello")
#ifdef UNICODE
? Trim(GetClipBoardText,WChr(0))
#else
? Trim(GetClipBoardText,Chr(0))
#EndIf
Sleep
Hello
Created with the Personal Edition of HelpNDoc: Easily create EBooks