Перейти к содержанию
Fire Monkey от А до Я
  • 0

Не отображается текст


giveaway

Вопрос

Формирую документ для печати и хочу в него добавить программно некий текст, фигуры и изображение. Вот кусок кода:

TRectF RectF(10, 10, 30, 30);
BitmapTmp->Canvas->DrawRect(RectF, 0, 0, AllCorners, 100);
BitmapTmp->Canvas->FillText(RectF, ImageSel->Name, false, 1,
TFillTextFlags() << TFillTextFlag::RightToLeft,
// TFillTextFlags(),
TTextAlign::Center, TTextAlign::Center);

Прямоугольник отрисовывается нормально, а текст не отображается. Что я делаю не так?

Изменено пользователем giveaway
Ссылка на комментарий

Рекомендуемые сообщения

  • 0

С нижеследующим кодом под Windows все работает нормально (при печати добавляю на канву принтера номер страницы)

А вот в Маке вместо номера, получаю залитый черным прямоугольник. В чем ошибка?

TRectF pgRect;
	String numPagebuf;
	int x1, y1, x2, y2;
	x1 = 60;
	y1 = Printer->PageHeight - 220;
	x2 = Printer->PageWidth - 60;
	y2 = Printer->PageHeight - 170;
	pgRect.init(x1, y1, x2, y2);
	numPagebuf = IntToStr(numPage);
	TCanvas * canvas = Printer->Canvas;
	canvas->BeginScene();
	canvas->Font->Size = 90;
	canvas->Fill->Kind = TBrushKind::Solid;
	canvas->Stroke->Thickness = 1;
	canvas->FillText(pgRect, numPagebuf, false, 0, TFillTextFlags(),
	TTextAlign::Center, TTextAlign::Center);
	canvas->EndScene();

 

Изменено пользователем giveaway
Ссылка на комментарий

Присоединяйтесь к обсуждению

Вы можете написать сейчас и зарегистрироваться позже. Если у вас есть аккаунт, авторизуйтесь, чтобы опубликовать от имени своего аккаунта.

Гость
Ответить на вопрос...

×   Вставлено с форматированием.   Вставить как обычный текст

  Разрешено использовать не более 75 эмодзи.

×   Ваша ссылка была автоматически встроена.   Отображать как обычную ссылку

×   Ваш предыдущий контент был восстановлен.   Очистить редактор

×   Вы не можете вставлять изображения напрямую. Загружайте или вставляйте изображения по ссылке.

×
×
  • Создать...