Visual Basic, .NET, ASP, VBScript
 

   
   
     

Форум - Общий форум

Страница: 1 |

 

  Вопрос: Технология 'Отмены' Добавлено: 17.12.03 11:26  

Автор вопроса:  freze
Если кто решал проблему программирования команды отмена, подскажите. У меня есть таблица VSFlexGrid 8 с большим количеством строк >1000, необходимо реализовать отмену желательно на несколько ходов редактирования назат. Таблица может редактироваться как с клавиатуры так и с мыши (Copy, Paste). Всем Спасибо.

Ответить

  Ответы Всего ответов: 5  

Номер ответа: 1
Автор ответа:
 Morpheus



Вопросов: 224
Ответов: 3777
 Web-сайт: xury.zx6.ru
 Профиль | | #1
Добавлено: 17.12.03 11:45

Чесно говоря, не пробовал я такой метод, но попробуй, мож пригодится.

Короче просто посылаешь сообщение WM_CANCEL с помощью SendMessage

Ответить

Номер ответа: 2
Автор ответа:
 StrikeR



ICQ: 151819 

Вопросов: 32
Ответов: 110
 Web-сайт: www.highlight.ee
 Профиль | | #2
Добавлено: 17.12.03 19:01
Poprobui posle koda dobavlenija v toblicu postavit "DoEvents" (esli ja vsjo pravilno ponjal)

Ответить

Номер ответа: 3
Автор ответа:
 freze



Вопросов: 7
Ответов: 1
 Профиль | | #3 Добавлено: 22.12.03 15:53

Спасибо за ответы, но они не помогли, В первом случае такой константы WM_CANCEL для такой функции SendMessage нет. Во втором случае, как я понимаю, "DoEvents", просто передает управление другим процессам. Странно, я думал, хотя задача Undo и Redo и не тривиальная, но уже кем то решалась. 

Ответить

Номер ответа: 4
Автор ответа:
 StrikeR



ICQ: 151819 

Вопросов: 32
Ответов: 110
 Web-сайт: www.highlight.ee
 Профиль | | #4
Добавлено: 23.12.03 01:53

koroche, vrode kak eto dolzno rabotat:

dobav dve knopki (cmd1 i cmd2) i listbox (lst1)

"cmd1"- dobavlenie v lst1

"cmd2"-knopka otmenq

"lst1"- dumaju i tak vsjo jasno

-----------------------------------------

General (Declarations):

Dim a

------------------------------------------

private sub cmd1_click ()

  For i = 0 To 100000
        If a <> "1" Then
            List1.AddItem i
            DoEvents
        End If
    Next i

end sub

Private sub cmd2_click()

a = 1

end sub

 

u menja rabotalo, esli che ne tak, pishi

Ответить

Номер ответа: 5
Автор ответа:
 StrikeR



ICQ: 151819 

Вопросов: 32
Ответов: 110
 Web-сайт: www.highlight.ee
 Профиль | | #5
Добавлено: 23.12.03 01:57
tak, pardon, vidimo ja ne tak ponjal vopros...mne pokazalos, chto te nuzno tolko ostanovit process...

Ответить

Страница: 1 |

Поиск по форуму



© Copyright 2002-2011 VBNet.RU | Пишите нам