Я пишу приложение с графикой на чистом 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'ы), а мне нужно, чтобы они были поверх фона. Как это сделать? Прозрачность в нужных местах не подходит, т.к. некрасиво.