Новые книги
 Есть только один способ проделать большую работу — полюбить ее. Если вы к этому не пришли, подождите. Не спешите браться сразу за дело. Как и во многом другом, сердце подскажет вам интересное дело и поможет его завершить. |
 В этой книге системно представлена методология разработки и проведения блестящего тренинга, основная цель которого – стать эффективным инструментом развития бизнеса. Автор подробно рассказывает о том, что для этого необходимо, и дает ценные рекомендации для того, чтобы тренинг произвел на слушателей самое благоприятное впечатление, гарантировал развитие их деятельности и достиг максимального практического результата.Читатели найдут в книге ответы на все вопросы, связанные с бизнес-тренингом, начиная от общих технологических схем до детального рассмотрения методов обучения и примеров игр. |
Вопрос и Ответ 42
Вопросы и Ответы
42. Можно ли изменить величину табуляции в TMemo?
Можно. Для этого надо послать сообщение EM_SetTabStops компоненте TMemo, в котором необходимо указать два параметра. Количество передаваемых значений и величины табуляций.
Если первый параметр равняется нулю, то второй параметр игнорируется и величина табуляции сбрасывается в значение по умолчанию (32). Иначе, устанавливается величина указанная во втором параметре, причем, при единичном значении все величины табуляций будут равны, а при большем значении величины берутся из переданного массива.
Пример:
............
{Установка
одной величины табуляции} TabInc:
LongInt = 40; begin SendMessage(Memo1.Handle,
EM_SetTabStops, 1, Longint(@TabInc)); end; ............ {Установка
двух величин табуляции} TabInc:
Array [1..2] of LongInt = (10, 30); begin SendMessage(Memo1.Handle,
EM_SetTabStops, 2, Longint(@TabInc)); end; ............
procedure TForm1.FormCreate(Sender: TObject);
CONST
procedure TForm1.FormCreate(Sender: TObject);
CONST
...предыдущая страница следующая...
оглавление