Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Editbox scrollable AND read-only
Message
Information générale
Forum:
Visual FoxPro
Catégorie:
Gestionnaire d'écran & Écrans
Divers
Thread ID:
00890638
Message ID:
00890761
Vues:
19
>>>I'd like to use an editbox to display progress information in an application. It should probably be read-only, but I want the information to scroll as needed and I want users to be able to scroll up and down as expected...
>>>
>>>So I think I need to keep the box editable, but make it impossible for people to click within the text area (or at least to add information). I found the thread which shos how to make the box scroll with this REFRESH method:
>>>
>>>DODEFAULT()
>>>THIS.SelStart = LEN(THIS.Value)
>>>NODEFAULT
>>>THIS.SetFocus()
>>>
>>>So I need to add a way to keep the mouse out of the text area (but allow it to manipulate the scroll-bars...
>>>
>>>Ideas?
>>>
>>>TIA
>>>Michael
>>
>>I think making it read-only is the best idea but if you truely only want to have then access the scrollbars you can set the tabstop to false and put a shape object over the editbox. That way when they click they are clicking on the shape object and they can't tab to it. To allow access to the scroll bars you may need to use SYSMETRIC(14) and SYSMETRIC(15) to know how much room to leave for the scroll bars.
>
>Yes, I think that may be the way to go - or have the keypress event return .f.

Just an FYI the readonly setting on my editboxes doesn't make the scrollbars disabled for me.
Charles

"The code knows no master." - Chuck Mautz
"Everybody is ignorant, only on different subjects." - Will Rogers
Précédent
Répondre
Fil
Voir

Click here to load this message in the networking platform