The Clipboard Program

Эта программа показывает вам использование clipboard (буфер обмена) в Gambas.

Вам нужно 2 commandbuttons (клавиши) и 2 textareas (текстовые области) для работы программы.

Код:

' Gambas class file
PUBLIC SUB Button1_Click()
Clipboard.Copy (Textarea1.Text)
'Copy Text into the Clipboard
END
PUBLIC SUB Button2_Click()
Textarea2.Text = Clipboard.Paste ()
'get the text out of the clipboard
END

-- ReinerHoffmann - 18 Sep 2004