Const EM_SETMARGINS = &HD3
Сообщение EM_SETMARGINS задаёт ширину левого и правого отступов в текстовом поле
Сообщение не возвращает значимых значений
EC_LEFTMARGIN = &H1 | Ширина левого отступа |
EC_RIGHTMARGIN = &H2 | Ширина правого отступа |
EC_USEFONTINFO = &HFFFF | Ширина отступов задается на основании данных шрифта текстового поля (для Rich edit control) |
' Установим отступ в текстовом поле
' Установите на форме TextBox
SendMessage Text1.hwnd, EM_SETMARGINS, EC_LEFTMARGIN, 80