Перейти к содержанию
  • Регистрация
  • 0
apromix

Перенос старого кода на FMX

Вопрос

Собственно во всем разобрался, заминка только с этим:

1. Залить канву одним цветом:

  BG.Canvas.Brush.Color := clBlack;
  BG.Canvas.FillRect(Rect(0, 0, fMain.ClientRect.Right, fMain.ClientRect.Bottom));

2. Отрисовать на канве изображение .png с прозрачностью:

fMain.Canvas.Draw(0, 0, BG);

 

3. Текст на канве:

procedure TextOut(const AX, AY: Integer; const AText: string; AColor: Integer);
begin
  BG.Canvas.Font.Color := AColor;
  BG.Canvas.TextOut(AX * CharWidth, AY * CharHeight, AText);
end;

Есть решения? Спасибо за ответы :)

Поделиться сообщением


Ссылка на сообщение
Поделиться на другие сайты

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

  • 0

Вообще не понял вопрос

http://docwiki.embarcadero.com/Libraries/Tokyo/en/FMX.Graphics.TCanvas_Methods

что из этого вызывает затруднения?

Поделиться сообщением


Ссылка на сообщение
Поделиться на другие сайты

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

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

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

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

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

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

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

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


  • Последние посетители   0 пользователей онлайн

    Ни одного зарегистрированного пользователя не просматривает данную страницу

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