|
-
Jul 1st, 2013, 10:02 AM
#1
Thread Starter
Junior Member
Re: how to read things inside any window
Thanks for your help.
I'm still trying to solve the loss of the cut/copy/paste when using code like .calculate or .calculation
There are already some options, but they all have there restrictions. Most only keep the values to copy. Others use pasting the copied range to extract the address from the formula, but that doesn't work with "cut"!
Using the previous selection as the cut/copy range together with GetClipboardSequenceNumber to know there is an new cut/copy is the best way, but that doesn't work when using undo/redo. Because last selection isn't the cut/copy range!
So I was thinking on checking and counting undo.redo and hold the according cut/copy range in memory. I could just count the differences with the previous amount of unod/redo's but this doesn't work when redo the last one. Because the undo/redo amount is the same as typing in something new and thereby adding an undo and deleting the last redo.
Now I'm trying to read the office-clipboard ("bosa_sdm_XL9", "Collect and Paste 2.0") it's there but I can't seen to get the data from the screen in the code. So where can I find out how to read these "windowless label controls" ?
thanks
-
Jul 1st, 2013, 01:50 PM
#2
Re: how to read things inside any window
 Originally Posted by onidarbe
Now I'm trying to read the office-clipboard ("bosa_sdm_XL9", "Collect and Paste 2.0") it's there but I can't seen to get the data from the screen in the code.
If Spy++ cannot highlight any of the controls inside that Clipboard window anymore, then they most likely are windowless controls.
 Originally Posted by onidarbe
So where can I find out how to read these "windowless label controls" ?
I don't know if there's any API that can manipulate windowless controls. Sorry.
You may want to try searching MSDN though. On the first page of the search results, I found this pretty short description of Windowless Controls.
On Local Error Resume Next: If Not Empty Is Nothing Then Do While Null: ReDim i(True To False) As Currency: Loop: Else Debug.Assert CCur(CLng(CInt(CBool(False Imp True Xor False Eqv True)))): Stop: On Local Error GoTo 0
Declare Sub CrashVB Lib "msvbvm60" (Optional DontPassMe As Any)
Tags for this Thread
Posting Permissions
- You may not post new threads
- You may not post replies
- You may not post attachments
- You may not edit your posts
-
Forum Rules
|
Click Here to Expand Forum to Full Width
|