Наши проекты:
Журнал · Discuz!ML · Wiki · DRKB · Помощь проекту |
||
ПРАВИЛА | FAQ | Помощь | Поиск | Участники | Календарь | Избранное | RSS |
[52.14.165.43] |
|
Сообщ.
#1
,
|
|
|
Private Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, _ ByVal wParam As Long, lParam As Any) As Long Private Const EM_UNDO = &HC7 Private Sub Command1_Click() Call SendMessage(Text1.hwnd, EM_UNDO, 0, 0) End Sub |