"!paste" sometimes go to wrong texteditor

[tsh73]

It looks like in LB 4.5.1 "!paste" sometimes go to wrong texteditor
actually in active one

Workaround:
you can manually setfocus before paste and return focus back.
Possible way of knowing where "back" (active control) is could be got by API call.

Instructions:
put the program in LB
copy to clipboard single word
run program
After timer fires, clipboard text should appear in lower textbox
Now click in that textbox
PASTE that should work on upper textbox somehow adds text to lower one



   'nomainwin

   WindowWidth = 550
   WindowHeight = 410

   UpperLeftX=int((DisplayWidth-WindowWidth)/2)
   UpperLeftY=int((DisplayHeight-WindowHeight)/2)

   button #main.button1, "readClipboard", [button1Click], UL, 26, 116, 122, 25
   texteditor #main.hiddenOffScreenTxt, 0, 0, 500, 100
   texteditor #main.log, 22, 151, 500, 300
   menu #main, "Edit"    '<--- Texteditor Menu can be moved but not removed.

   open "read Clipboard demo" for window as #main
   print #main, "trapclose [quit.main]"

   print #main, "font ms_sans_serif 10"
   '#main.hiddenOffScreenTxt "!setfocus"
   '#main.log "!setfocus"

   timer 1500, [readClip]
   'goto [button1Click]

   wait

[quit.main]
   Close #main
   END


[button1Click]    'Perform action for the button named 'button1'
update=1    'force adding to the log even if clipboard not changed
[readClip] 'entry point by timer
   'get the data from hidden texteditor
   oldString$= string$
   print  update, oldString$,  string$
   #main.hiddenOffScreenTxt "!cls"
   #main.hiddenOffScreenTxt "!paste"
   #main.hiddenOffScreenTxt "!contents? string$"
   if (update=1) or (oldString$ <> string$ and  string$<>"") then
       'add it to the logs
       #main.log time$(); " From clipboard ";len(string$);" bytes"
       #main.log ">";string$;"<"
   end if
   update=0
   wait



[Chris Iverson]

I don't think I see this behavior, but I do see the cursor not getting drawn properly in the bottom textbox.

The cursor will start blinking at the position it would be at if it HAD pasted in that textbox, even if it's overlapping existing text.

There's something weird going on there, definitely.

[tsh73]

I see it on two different machines, JB2 and LB 4.5.1
Windows 10 32 bit and windows 10 64 bit.
Interesting but JB 1.01 does not show this - probably LB 4.04 do not either.