На главную Наши проекты:
Журнал   ·   Discuz!ML   ·   Wiki   ·   DRKB   ·   Помощь проекту
ПРАВИЛА FAQ Помощь Участники Календарь Избранное RSS
Дорогие друзья! Поздравляем вас с днём Победы!
msm.ru
Модераторы: SCINER, B.V.
  
    > Как работать с буфером обмена , Clipboard
      Чтобы получить текст из буфера:
      ExpandedWrap disabled
        Text = Clipboard.GetText

      Чтобы получить картинку:
      ExpandedWrap disabled
        Picture1.Picture = Clipboard.GetData

      Чтобы записать текст или картинку нужно вначале очистить буфер:
      ExpandedWrap disabled
        Clipboard.Clear
        Clipboard.SetText Text

      Аналогично для картинки:
      ExpandedWrap disabled
        Clipboard.Clear
        Clipboard.SetData Picture1.Picture

      Немного иначе работа с буфером происходит в VBA:
      ExpandedWrap disabled
        Dim Clipboard As New DataObject, Text As String
         
        ' Чтобы считать текст
        Clipboard.GetFromClipboard
        Text = Clipboard.GetText
         
        ' Чтобы записать текст
        Text = "hello"
        Clipboard.SetText Text
        Clipboard.PutInClipboard
      Сообщение отредактировано: SCINER -
      0 пользователей читают эту тему (0 гостей и 0 скрытых пользователей)
      0 пользователей:


      Рейтинг@Mail.ru
      [ Script execution time: 0,0214 ]   [ 16 queries used ]   [ Generated: 10.05.24, 15:08 GMT ]