| ET_AHSCROLL | allow horizontal scrolling |
| ET_AVSCROLL | allow vertical scrolling |
| ET_ALIGN_CENTER | center alignement |
| ET_ALIGN_LEFT | left alignement |
| ET_ALIGN_RIGHT | right alignement |
| ET_BORDER | display a border |
| ET_HSCROLL | display horizontal scroll box |
| ET_VSCROLL | display vertical scroll box |
| ET_HIDE | do not display text |
| ET_TABFOCUS | if parent window is a dialog box, manage TAB key |
| ET_DOWN | display 3d border |
| ET_HIDDEN | the control is hidden |
| ET_LOWERCASE | lower case content |
| ET_NOEDIT | the control is not editable |
| ET_SIZEBOX | the control can be resized typeof Win = ObjWin;;
typeof Text = ObjText;;
fun cbWin (obj, user_parameter)=
_closemachine;;
fun main ()=
_showconsole;
set Win = _CRwindow _channel nil 0 0 300 200 WN_NORMAL "Test text size window";
_CBwinDestroy Win @cbWin 0;
set Text = _CReditText _channel Win 5 5 200 50 ET_DOWN|ET_SIZEBOX "Resize this control";
0;;
|
| ET_TRANSPARENT | the background control is transparent |
| ET_UPBORDER | style border
set win = _CRwindow _channel nil 0 0 300 200 WN_NORMAL "Test Text Flags";
set text = _CRtext _channel win 0 25 300 50 ET_LOWERCASE|ET_SIZEBOX "Bob and Alice are married !";
|
| ET_DRAGDROP | allow drag and drop inside the control |
Previous
Up