Форум веб-мастеров  /  Статьи веб-мастера  /  WHOIS-сервис  /  Услуги веб-мастера  /  RSS 
Разделы сайта




Полезные ссылки

wm-help.net -> Электронная библиотека -> Delphi -> Вопросы и Ответы по Delphi -> Вопрос и Ответ 42

Вопрос и Ответ 42



Вопрос и Ответ 42

Вопросы и Ответы


      42. Можно ли изменить величину табуляции в TMemo?

      Можно. Для этого надо послать сообщение EM_SetTabStops компоненте TMemo, в котором необходимо указать два параметра. Количество передаваемых значений и величины табуляций.

      Если первый параметр равняется нулю, то второй параметр игнорируется и величина табуляции сбрасывается в значение по умолчанию (32). Иначе, устанавливается величина указанная во втором параметре, причем, при единичном значении все величины табуляций будут равны, а при большем значении величины берутся из переданного массива.

      Пример:

      ............

      {Установка одной величины табуляции}
      procedure TForm1.FormCreate(Sender: TObject);
      CONST

        TabInc: LongInt = 40;

      begin

        SendMessage(Memo1.Handle, EM_SetTabStops, 1, Longint(@TabInc));

      end;

      ............

      {Установка двух величин табуляции}
      procedure TForm1.FormCreate(Sender: TObject);
      CONST

        TabInc: Array [1..2] of LongInt = (10, 30);

      begin

        SendMessage(Memo1.Handle, EM_SetTabStops, 2, Longint(@TabInc));

      end;

      ............


...предыдущая страница следующая...
оглавление



[ Вверх ]

Rambler's Top100

Другие наши проекты:
бодибилдинг | Строим Домик | RU-домены за 170 рублей |
"Вопрос и Ответ 42"
Copyright © "В помощь Веб-Мастеру" (Alexander D. Belyaev) 2005-2008.
При перепечатке любого материала видимая ссылка на источник "В помощь Веб-Мастеру" и все имена, ссылки авторов обязательны!
Время генерации страницы: 0.028