Работа с буфером обмена

Буфер обмена Windows – специальная область оперативной памяти, которая используется для переноса данных из одних программ в другие.

При разработке программ на Visual Basic программист может использовать специальный системный объект Clipboard для доступа к буферу обмена.

Объект поддерживает методы:

Метод	Назначение
Clear()	Очистка буфера обмена.
GetText()	Получение текста.
GetData()	Получение растровой графики.
SetText()	Запись текста.
SetData()	Запись растрового изображения.
GetFormat(typeFormat)	Проверка содержимого буфера. vbCFText,vbCFBitmap

Пример.

‘Загрузка изображения

Private Sub imgPic_Click()

imgPic.Picture = LoadPicture()

End Sub

‘Копирование текста

Private Sub mnuCopy_Click()

'Очистить буфер обмена

Clipboard.Clear

'Скопировать в буфер обмена выделенный текст

'из текстового поля

Clipboard.SetText txtUserArea.SelText

End Sub

‘Вырезание текста

Private Sub mnuCut_Click()

'Очистить буфер обмена

Clipboard.Clear

'Скопировать в буфер обмена выделенный текст

'из текстового поля

Clipboard.SetText txtUserArea.SelText

'удалить выделенный текст

txtUserArea.SelText = ""

End Sub

‘Завершение работы

Private Sub mnuExit_Click()

End

End Sub

‘Вставка графики или текста

Private Sub mnuPaste_Click()

If Clipboard.GetFormat(vbCFText) Then

'заменить выделенный текст либо

'вставить текст в текущую позицию курсора

txtUserArea.SelText = Clipboard.GetText()

End If

‘Заменить графическое изображение

If Clipboard.GetFormat(vbCFBitmap) Then

imgPic.Picture = Clipboard.GetData()

End If

End Sub