Показать сообщение отдельно
  #1  
Старый 12.05.2014, 21:41
serega6531 serega6531 вне форума
Начинающий
 
Регистрация: 03.03.2013
Сообщения: 106
Версия Delphi: Delphi 7, XE5
Репутация: 10
Вопрос Фон позади элементов

Я пишу приложение с графикой на чистом WinAPI и мне нужно рисовать фон окна. Я делаю это так:
Код:
procedure DrawBG;
var
  Bitmap: TBitmap;
  DC: HDC;
  Canvas: TCanvas;
begin
  Canvas := TCanvas.Create;
  DC := GetWindowDC(wnd0);
  Canvas.Handle := DC;
  Bitmap := TBitmap.Create();
  Bitmap.PixelFormat := pf24bit;
  Bitmap.LoadFromResourceName(instance, 'BACKGROUND');
  Canvas.Draw(0, 0, Bitmap);
  Bitmap.Free;
  ReleaseDC(wnd0, DC);
  Canvas.Free;
end;
Но рисунок перекрывает элементы управления (кнопки, edit'ы), а мне нужно, чтобы они были поверх фона. Как это сделать? Прозрачность в нужных местах не подходит, т.к. некрасиво.
Ответить с цитированием