1. RE: Ready Only MLE
What version of Win32Lib are you using? I stuck a
setEnable(Mle1,False)
in the onOpen() routine of my previous example and I can't edit, tab to,
nor give it focus with mouse...
-- Brian
Chris wrote:
> Another Q...
>
> I know how to make the MLE read_only, and non-TABable, but but the
> MLE can still be selected with the mouse. Focus is then given to the
> MLE, and it displays the caret position. I don't want the MLE to be able
>
> to receive focus at all.
>
> I've tried trapping onGotFocus, and setting the focus to the default
> ctrl, but it doesn't work. In fact, as a result of setting the focus to
> the default ctrl, I'm not able to select that control anymore.
>
> I've also tried trapping the onMouse event, and Left button events
> aren't reported to the handler. And even so, I'm still not able to set
> the focus to the other ctrl.
>
> TIA
> Chris
>
>
2. RE: Ready Only MLE
- Posted by bensler at mail.com
Jan 17, 2002
The vscrollbar is also disabled.
Chris
Brian Broker wrote:
> What version of Win32Lib are you using? I stuck a
> setEnable(Mle1,False)
> in the onOpen() routine of my previous example and I can't edit, tab to,
>
> nor give it focus with mouse...
>
> -- Brian
>
>
> Chris wrote:
> > Another Q...
> >
> > I know how to make the MLE read_only, and non-TABable, but but the
> > MLE can still be selected with the mouse. Focus is then given to the
> > MLE, and it displays the caret position. I don't want the MLE to be able
> >
> >
> > to receive focus at all.
> >
> > I've tried trapping onGotFocus, and setting the focus to the default
> > ctrl, but it doesn't work. In fact, as a result of setting the focus to
> > the default ctrl, I'm not able to select that control anymore.
> >
> > I've also tried trapping the onMouse event, and Left button events
> > aren't reported to the handler. And even so, I'm still not able to set
> > the focus to the other ctrl.
> >
> > TIA
> > Chris
> >
> >
3. RE: Ready Only MLE
- Posted by bensler at mail.com
Jan 18, 2002
Bingo, I want the MLE to be display only, but I still want to be able to
scroll, and copy from it.
I have solved this though, thank you.
What I had to do was make an event handler for onEvent, and trap the
LeftDown, LeftUp and RightDown events. The LeftDown event sets a toggle
which allows copying selections from the MLE. The other two unset the
toggle and setFocus to the default control.
I made another event handler for KeyDown to trap ctrl-C when the toggle
is true.
Here is my code snippet for the archives, if anyone is interested.
< CODE >
integer WM_MLE_Main_editable WM_MLE_Main_editable=0
procedure WM_MLE_Main_onEvent(integer event, atom wParam, atom lParam)
if event = LeftDown then
WM_MLE_Main_editable=1
elsif event = LeftUp or event = RightDown then
WM_MLE_Main_editable=0
setFocus(WM_MLE_Edit)
end if
end procedure
onEvent[WM_MLE_Main] = routine_id("WM_MLE_Main_onEvent")
procedure WM_MLE_Main_onKeyDown(integer keycode, integer sflag)
if WM_MLE_Main_editable then
if and_bits(sflag,ControlMask) then
if keycode = 'C' then copy(WM_MLE_Main) end if
end if
end if
end procedure
onKeyDown[WM_MLE_Main] = routine_id("WM_MLE_Main_onKeyDown")
< END OF CODE >
Chris
Thomas Parslow (PatRat) wrote:
> > Another Q...
>
> > I know how to make the MLE read_only, and non-TABable, but but the
> > MLE can still be selected with the mouse. Focus is then given to the
> > MLE, and it displays the caret position. I don't want the MLE to be able
> >
> > to receive focus at all.
>
> > I've tried trapping onGotFocus, and setting the focus to the default
> > ctrl, but it doesn't work. In fact, as a result of setting the focus to
> > the default ctrl, I'm not able to select that control anymore.
>
> > I've also tried trapping the onMouse event, and Left button events
> > aren't reported to the handler. And even so, I'm still not able to set
> > the focus to the other ctrl.
>
> > TIA
> > Chris
>
> Wouldn't a LText control be better here or did you want the user
> to still be able to copy text from it?
>
> Thomas Parslow (PatRat) ICQ #:26359483
> Rat Software
> http://www.rat-software.com/
> Please leave quoted text in place when replying
>
>
