Tło formy

0

Witam, powiedzcie czy jest możliwe ustawienie formie zamiast koloru - widoku jakiejś bitmapy (tak jak tło w pulpicie Win) ale bez komponentu TImage i czy jeżeli jest to możliwe to czy jest rozsądne robienie czegoś takiego? - chodzi mi o zasoby systemu. A może istnieje jakaś inna metoda na osiągnięcie celu?

z góry spasiba i pozdro.

0

canvas

0

czy jest możliwe ustawienie formie zamiast koloru - widoku jakiejś bitmapy

Jest. Np.:

procedure TForm1.FormPaint(Sender: TObject);
var
  bmp: TBitmap;
  SrcRect: TRect;
begin
  bmp := TBitmap.Create;
  try
    bmp.LoadFromFile('bg.bmp');
    SrcRect := bmp.Canvas.ClipRect;
    Form1.Canvas.CopyRect(ClientRect, bmp.Canvas, SrcRect);
  finally
    bmp.Free;
  end;
end;

czy jest rozsądne robienie czegoś takiego?

NIE

1 użytkowników online, w tym zalogowanych: 0, gości: 1