Предыдущая тема :: Следующая тема |
Автор |
Сообщение |
Баландин Денис

Зарегистрирован: 15.08.2006 Сообщения: 44 Откуда: Екатеринбург
|
Добавлено: Пт 20 Апр 2007 13:22 Заголовок сообщения: Как задать "подложку" у текстового метода отображе |
|
|
Не получается задать подложку у текстового метода отображения,
код следующий:
anIngeoPainter:=anIngeoStyle.Painters.Add(inptText) as IIngeoTextPainter;
anIngeoPainter.Font.Style:=frmAddonSettings.StyleToInt(frmAddonSettings.edtInmeta.Font.Style);
anIngeoPainter.Font.Name:=frmAddonSettings.edtInmeta.Font.Name;
anIngeoPainter.Font.Size:=frmAddonSettings.edtInmeta.Font.Size;
anIngeoPainter.Font.Color:=frmAddonSettings.edtInmeta.Font.Color;
anIngeoPainter.Font.ForZoomScale:=1/StrToInt(frmAddonSettings.edtScaleInm.Text);
anIngeoPainter.Text:='{'+SemTableName+'.Num'+'}';
anIngeoPainter.Comment:=gInmPainterName;
далее пытаюсь задать подложку, но не срабатывает
anIngeoPainter.Flags:=intpfOpaque;
anIngeoPainter.BackColor:=$FFFFFF;
anIngeoStyle.Update;
что я делаю не так ? |
|
Вернуться к началу |
|
 |
RuslanG

Зарегистрирован: 10.07.2005 Сообщения: 171 Откуда: ИНТЕГРО
|
|
Вернуться к началу |
|
 |
|