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

"Ластик" для TImage


Botov Nikita

Вопрос

Добрый день Уважаемые!

Подскажите каким образом можно реализовать функцию ластика в XE 10.3?
Например на форме лежит 2 TImage один над другим, и когда мышкой проводим по верхней картинке, остается "след" и видно нижнюю картинку?

С Уважением!

Ссылка на комментарий

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

  • 0

Отвечу сам на свой вопрос:

  if Sender is TImage then
  with TImage(Sender).Bitmap.Canvas do
  if BeginScene then
    try
      ClearRect(TRectF.Create(x-10, y-10, x+10, y),1);
    finally
      EndScene;
    end;

Единственное, стирает прямоугольной формой, как сделать круглой не нашел. 

Тему можно закрывать

Ссылка на комментарий

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

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

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

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

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

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

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

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

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