In keeping with my last tip, about how to overide the "Select Field on Entry", I have another helpful tip for use with edit regions, and combo boxes. I find it often hard to read Drop Downs, and Edit regions when you show a field as "DISABLE". They grey text in the white boxes is not easy to read, and color selection for disabled pairs on these items is difficult to control. What I do instead, is in my SHOW GETS routine, I always show these fields ENABLE, and place the following little bit of code in the WHEN clause:
=NOEDI()
This calls the code below, which I put in the procedure file set with the SET PROCEDURE TO command elsewhere in my application. Note that the item in the OBJNUM() clause is just a common set of control buttons that I point the output to any time you try to enter one of those fields. The great thing is that on EDIT regions, the scorll bar is not considered part of the field itself, and so they remain enabled, and the text is allowed to scoll without any adverse effects.
PROCEDURE NOEDIT
IF NOT M.EDITING AND NOT M.ADDING
_CUROBJ = OBJNUM(M.QUITSCREEN)
ENDIF
*
RETURN
Hope you find this useful. If you do, please cast a vote for it!
Thanks,
-Scott
=NOEDI()
This calls the code below, which I put in the procedure file set with the SET PROCEDURE TO command elsewhere in my application. Note that the item in the OBJNUM() clause is just a common set of control buttons that I point the output to any time you try to enter one of those fields. The great thing is that on EDIT regions, the scorll bar is not considered part of the field itself, and so they remain enabled, and the text is allowed to scoll without any adverse effects.
PROCEDURE NOEDIT
IF NOT M.EDITING AND NOT M.ADDING
_CUROBJ = OBJNUM(M.QUITSCREEN)
ENDIF
*
RETURN
Hope you find this useful. If you do, please cast a vote for it!
Thanks,
-Scott
