# Editable

This class includes EditText (a single editable field) or MultiEditText (a mulit-line edit field - basically a mini editor). Be very careful if you trap any events destined for these controls as the resulting behaviour is likely to be highly esoteric. Please examine the control styles for this class in the Win32 API documentation for behavioural possibilities. Perversely, an EditText is always left-justified and can never be right or center justified even though the style constants ES_RIGHT & ES_CENTER exist and apparently work for MultiEditText controls. Text can be read/written using getText()& setText().
It is possible to change the background colour of these controls by including this code in the handler:
Copy

    atom hBrush = c_func(xCreateSolidBrush, {Parchment})

    procedure handler_EDIT(integer id, integer msg, atom wParam, object lParam)
        if msg=WM_CTLCOLOREDIT then
            void = c_func(xSetBkColor, {wParam, Parchment})
            return hBrush
        elsif msg=WM_DESTROY then
            void = deleteObject(hBrush)
        end if
    end procedure