Оптимизация рисования в Delphi 10.1 Berlin с использованием GDI+ и постоянного экземпляра TGPGraphics

Delphi , Графика и Игры , Canvas

Ответ на ваш запрос:

Перед написанием статьи, важно отметить, что проблема, описанная в контексте, связана с использованием постоянного экземпляра TGPGraphics для рисования в Delphi 10.1 Berlin. Проблема заключается в том, что при попытке использовать один и тот же экземпляр TGPGraphics, рисование не отображается на холсте. Это связано с тем, что каждый раз, когда происходит рисование, изменяется дескриптор устройства контекста (HDC), что приводит к необходимости создания нового экземпляра TGPGraphics с каждым обращением к рисованию.

Подтвержденный ответ:

Для решения данной проблемы необходимо убедиться, что дескриптор устройства контекста (HDC) не изменяется между операциями рисования. В примере кода, предоставленном в контексте, HDC получается из TBitmap.Canvas.Handle, который изменяется при каждом вызове FormPaint. Вместо этого, HDC должен быть получен один раз, например, в обработчике события FormCreate, и использоваться для создания TGPGraphics, который затем может быть использован многократно без необходимости создания нового экземпляра.

Пример кода для создания TGPGraphics с использованием HDC, полученного в FormCreate:

procedure TForm1.FormCreate(Sender: TObject);
begin
  FBmp:= TBitmap.Create;
  FBmp.Width:= ClientWidth;
  FBmp.Height:= ClientHeight;
  FCan:= TGPGraphics.Create(FBmp.Canvas.Handle);
  // Дополнительная настройка TGPGraphics
  {$IFDEF GLOBAL_CANVAS}
  FCan.SetInterpolationMode(InterpolationMode.InterpolationModeHighQuality);
  FCan.SetSmoothingMode(SmoothingMode.SmoothingModeHighQuality);
  FCan.SetCompositingQuality(CompositingQuality.CompositingQualityHighQuality);
  {$ENDIF}
  // Создание и настройка других объектов
end;

После этого, FCan можно использовать в FormPaint для рисования, не создавая новый экземпляр TGPGraphics каждый раз.

Альтернативный ответ:

Альтернативный ответ может заключаться в использовании дополнительных функций для управления контекстом GDI+, таких как Flush, с различными параметрами (FlushIntentionSync и FlushIntentionFlush), но исходя из контекста, это не решает проблему изменения HDC.

Статья:

В современном программировании на Delphi, где используются продвинутые технологии рисования, как GDI+ (Graphics Device Interface Plus), разработчики часто сталкиваются с необходимостью оптимизации процессов, связанных с рисованием. Одной из таких задач является использование постоянного экземпляра TGPGraphics для улучшения производительности приложений, работающих в многопоточных режимах или при интенсивном рисовании.

Проблема: При работе с TGPGraphics в Delphi 10.1 Berlin, возникает проблема, когда попытки использовать один и тот же экземпляр TGPGraphics для многократного рисования не приводят к ожидаемому результату. Вместо того, чтобы увидеть рисунок на холсте, разработчики сталкиваются с пустым непainted canvas. Причина заключается в том, что HDC, используемый для создания TGPGraphics, меняется, что приводит к необходимости инициализации экземпляра TGPGraphics непосредственно перед рисованием и его уничтожения сразу после.

Решение: Для сохранения состояния TGPGraphics, важно, чтобы HDC, на который он основан, оставался неизменным. В примере, который демонстрировал проблему, HDC получался из TBitmap.Canvas.Handle, который изменяется при каждом вызове FormPaint или при изменении размеров формы. Вместо этого, HDC должен быть получен один раз для всего жизненного цикла приложения, например, в FormCreate, и использован для создания TGPGraphics, который затем должен использоваться многократно для различных операций рисования.

// Создание объекта TGPGraphics в FormCreate, который используется для создания константных настроек, необходимых для большинства интерфейсов рисования.
procedure TForm1.FormCreate(Sender: TObject);
begin
  FBmp:= TBitmap.Create;
  FBmp.Width:= ClientWidth;
  FBmp.Height:= ClientHeight;
  FCan:= TGPGraphics.Create(FBmp.Canvas.Handle);
  FCan.SetInterpolationMode(InterpolationMode.InterpolationModeHighQuality);
  FCan.SetSmoothingMode(SmoothingMode.SmoothingModeHighQuality);
  FCan.SetCompositingQuality(CompositingQuality.CompositingQualityHighQuality);
end;

// Затем, в обработчике события FormPaint, можно использовать FCan для рисования без создания нового экземпляра GDI+ графики каждый раз.
procedure TForm1.FormPaint(Sender: TObject);
begin
  FCan.DrawEllipse(FPen, 5, 5, 50, 50);
  // Вызов метода Flush для обеспечения окончательной обработки рисунка
  FCan.Flush(FlushIntention.FlushIntentionSync);
  // Вывод рисунка из буфера GDI+ на экран
  Canvas.Draw(0, 0, FBmp);
end;

Важно: Избегайте изменения размеров TBitmap после создания экземпляра TGPGraphics, так как это может привести к изменению HDC и, как следствие, к необходимости создания нового экземпляра TGPGraphics.

Заключение

Использование постоянного экземпляра TGPGraphics может значительно улучшить производительность и упростить логику приложения, связанную с рисованием. Однако, важно тщательно управлять HDC, чтобы избежать потери состояния рисунка. Следуя приведенным выше рекомендациям, разработчики смогут успешно интегрировать TGPGraphics в свои приложения на Delphi, обеспечивая при этом высокий уровень производительности и надежности.

Создано по материалам из источника по ссылке.

Обсуждается проблема использования постоянного экземпляра `TGPGraphics` для рисования в Delphi 10.1 Berlin, при которой рисование не отображается на холсте из-за изменения дескриптора устройства контекста (HDC) и необходимости создания нового экземпляра

Комментарии и вопросы

Получайте свежие новости и обновления по Object Pascal, Delphi и Lazarus прямо в свой смартфон. Подпишитесь на наш Telegram-канал delphi_kansoftware и будьте в курсе последних тенденций в разработке под Linux, Windows, Android и iOS

:: Главная :: Canvas ::