Funny phenomenon in get-fields

[gkuhnert]

Hello,

if the first character of a get-field is a "(" followed by any other characters, it isn't possible, to mark the contents of that get-field using the mouse. Also the cursor always jumps just after the "("-character, if you enter that particular get-field by left-clicking into it.
You can test and see for yourself in samples\testget2.prg.

is there a work-around possible?

[Antonio Linares]

Gilbert,

This change is required in Class TGet Method LButtonUp():

Code: Select all  Expand view

      if ! Empty( ::cPicture ) .and. Left( ::cPicture, 1 ) == "(" .and. Left( cText, 1 ) == "("


Many thanks for your feedback!