Вопрос № 52536: Здравствуйте!!! У меня проблема, может вы помните как я спрашивал как приписать кнопкам «Вырезать», «Копировать», «Вставить» приписать им их прямые функции, ну и мне посоветовали сделать это так как написано в коде. Но допустим есть такая ситуация: я...
Вопрос № 52.536
Здравствуйте!!! У меня проблема, может вы помните как я спрашивал как приписать кнопкам «Вырезать», «Копировать», «Вставить» приписать им их прямые функции, ну и мне посоветовали сделать это так как написано в коде. Но допустим есть такая ситуация: я уже скопировал где то рядок и мне надо вставить в мою прогу. Как это сделать? Как сделать что бы кнопки работали например как в Microsoft World?
Private Sub Toolbar1_ButtonClick(ByVal Button As MSComctlLib.Button)
On Error Resume Next
Select Case Button.Key
Case "Copy"
If Text1.Text = "" Then
MsgBox ("Ну это ты загнул(а)!!! Поле чистое как белый лист!!! Нехорошо однако, нехорошо..."), vbCritical
Else
tBufer = Text1.Text
Text1.Text = tBufer
End If
Case "Cut"
If Text1.Text = "" Then
MsgBox ("Ну так вообще нельзя. Это же не возможно. Тут же чисто!!!"), vbCritical
Else
tBufer = Text1.Text
Text1.Text = ""
End If
Case "Paste"
If tBufer = "" Then
MsgBox ("Ну ты хоть понял(а) что ты сделал(а), тут же нечего вставлять. Приходите в другой раз!"), vbCritical
Else
Text1.Text = tBufer
End If
End Select
End Sub
Отправлен: 18.08.2006, 21:46
Вопрос задал: ataman (статус: 2-ой класс)
Всего ответов: 2 Мини-форум вопроса >>> (сообщений: 1)
Отвечает: Bonapart
Здравствуйте, ataman!
Я не вижу их действий из вашего кода (кроме окошечек с сообщениями)
А вам надо пользоватся
примерно таким кодом
Приложение:
Ответ отправил: Bonapart (статус: 1-ый класс)
Ответ отправлен: 19.08.2006, 07:46
Тот совет, который был дан мной в прошлый раз, представляет собой что-то вроде локального (данной программы) буфера обмена. Естественно, используя тот код, Вы не получите данные, помещенные другим приложением в буфер обмена Windows. Для того, чтобы Ваша программа могла считать данные, скопированные, скажем, из Word в буфер обмена, Вам придется обратиться к Win32API функциям для работы с буфером обмена. В приложении - декларации необходимых функций и констант, которые должны быть помещены в модуль и примерный
код функций копирования-вставки текста из буфера обмена. Вызов функции в нужном месте программы Вы наверняка сможете осуществить сами.
Приложение:
--------- Труд сделал обезьяну человеком, а лень человека - программистом !
Ответ отправил: Кокорич Вадим Леонидович (статус: 4-ый класс)
Ответ отправлен: 20.08.2006, 16:22
