Новые книги
 Автор книги доступно рассказывает, что такое причинно-следственная связь, объясняет, почему мы часто ошибаемся в ее определении, на основе каких данных можно делать правильные выводы и принимать эффективные решения. Прочитав книгу, вы научитесь анализировать информацию и выявлять причинно-следственные связи, объяснять прошлое и предсказывать будущее.Книга будет интересна аналитикам, философам, исследователям, медикам, экономистам, юристам, начинающим ученым, всем, кто имеет дело с массивами данных и хочет научиться критическому мышлению. На русском языке публикуется впервые. |
 Самоучитель UMLПервое издание. В книге рассматриваются основы UML – унифицированного языка моделирования для описания, визуализации и документирования объектно-ориентированных систем и бизнес-процессов в ходе разработки программных приложений. Подробно описываются базовые понятия UML, необходимые для построения объектно-ориентированной модели системы с использованием графической нотации. Изложение сопровождается примерами разработки отдельных диаграмм, которые необходимы для представления информационной модели системы. Цель книги – помочь программистам освоить новую методологию разработки корпоративных программных приложений для последующего применения полученных знаний с использованием соответствующих CASE-инструментов. |
Вопрос и Ответ 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
...предыдущая страница следующая...
оглавление