Intercept Undo Redo in MobileTextArea

[Mark_Sweeney]

OK, I found this from jim_mckay, but I have no idea how to update it for iOS in 2022. It kills all undos, so I can roll my own. Does anyone know how to update this Declare?

jim_mckay

Declare Function undoManager lib “Cocoa” selector “undoManager” (obj_ref as ptr) as ptr
Declare Sub removeAllActionsWithTarget lib “Cocoa” selector “removeAllActionsWithTarget:” (obj_ref as ptr,target as Ptr)
Declare Function documentView lib “Cocoa” selector “documentView” (obj_ref as ptr) as Ptr
Declare Function textStorage lib “Cocoa” selector “textStorage” (obj_ref as ptr) as Ptr

dim docView As ptr=documentView(ptr(TextArea1.Handle))
dim textStor As ptr=textStorage(docView)
dim undoMgr as ptr=undoManager(docview)
removeAllActionsWithTarget(undoMgr,textStor)

From this old thread here:

Undo Confusion

The first issue could be handled by registering for notifications with the NSUndoManager for Mac (sorry, I don’t have example code). Not sure about win32/linux The second could be handled with NSUndoManager declares (removeAllActionsWithTarget:), or by using a control array and creating a new textarea before you populate the text (but that seems like a major hack…) It sounds like you’re running into some of the issues that prompted me to write TheBigUndo… it’s a commercial solution that I offer…