home *** CD-ROM | disk | FTP | other *** search
/ Programming Tool Box / SIMS_2.iso / code / various / undo / undo.bas next >
Encoding:
BASIC Source File  |  1995-02-27  |  300 b   |  9 lines
  1. Declare Function SendMessage& Lib "User" (ByVal hWnd%, ByVal wMsg%, ByVal wParam%, lParam As Any)
  2. Declare Function GetFocus% Lib "User" ()
  3.  
  4. Global Const WM_USER = &H400
  5. Global Const EM_UNDO = WM_USER + 23
  6. Global Const EM_CANUNDO = WM_USER + 22
  7. Global Const EM_EMPTYUNDOBUFFER = WM_USER + 29
  8.  
  9.