Get - Cut/Paste/Delete problem

[Randal]

All,

Last month I posted a problem using the copy/cut/paste menu when right clicking on a get. This problem was fixed but we have a similar problem when using Delete.

If you double click on a get to highlight the text, right click, and select Delete the contents of the get is deleted. However, when you tab or click out of the get the Deleted text is put back in the get!

Thanks,
Randal Ferguson

[Antonio Linares]

Randal,

Please add these changes to Class TGet:

Code: Select all  Expand view

#define WM_CLEAR           771
...
      case nMsg == WM_PASTE
           ...

      case nMsg == WM_CLEAR
           CallWindowProc( ::nOldProc, ::hWnd, WM_CLEAR, 0, 0 )
           ::oGet:buffer = Space( Len( ::oGet:buffer ) )
           ::SetPos( 1 )
           ::oGet:Assign()
           return 0


[Randal]

Thanks!
Randal