Fórum Como colocar uma imagem de fundo num Panel? #340500
17/04/2007
0
Já fiz das seguintes maneiras:
Primeira maneira:
Panel1.Brush.Bitmap := TBitmap.Create;
Panel1.Brush.Bitmap.LoadFromFile(´c:\temp\imagem.bmp´);
Segunda maneira:
var
xCanvas : TCanvas;
begin
xCanvas := TCanvas.Create;
xCanvas.handle := GetDC(Panel1.Handle);
ImageList1.Draw(xCanvas, 10, 10, 0);
ReleaseDC(Panel1.Handle, xCanvas.Handle);
Da segunda maneira até funciona, só que não consigo exibir uma imagem grande.
Alguém pode dar uma ajuda?
Valeu.
Rtava
Curtir tópico
+ 0Posts
17/04/2007
Eurismar
Gostei + 0
17/04/2007
Rtava
Gostei + 0
18/04/2007
Cabelo
Utilize a propriedade Bitmap do TPanel...
Para deixar a imagem do tamanho do Panel você pode tratá-la com o canvas..
um abraço..
Gostei + 0
18/04/2007
Rtava
Você já tentou usar isso? Conseguiu que aparecesse?
Gostei + 0
18/04/2007
Carlosib
var Canvas : TCanvas; BitMap : TBitMap; begin BitMap := TBitmap.Create; BitMap.LoadFromFile(´c:\imagem.bmp´); Canvas := TCanvas.Create; Canvas.handle := GetDC(Panel1.Handle); BitBlt(Canvas.Handle,0,0, BitMap.Height, BitMap.Width, BitMap.Canvas.Handle,0,0,SRCCOPY); ReleaseDC(Panel1.Handle, Canvas.Handle); end;
Gostei + 0
18/04/2007
Rtava
Agora sim!
Uma única coisa que tive que implementar é fazer a chamada dessa rotina também no evento OnPaint do formulário Parent do Panel1, pois quando a tela aplicação é sobreposta por uma tela qualquer de outro aplicativo a imagem some do Panel. Mas fora esse detalhe, funcionou blz.
Obrigado.
Gostei + 0
18/04/2007
Cabelo
Já usei sim...
mas no início do post, você indica o método Brush..
O panel tem uma propriedade Bitmap que permite inserir um bitmap até em design time..
Mas pelo jeito você já resolveu o problema..
um abraço..
Gostei + 0
19/04/2007
Rtava
Gostei + 0
19/04/2007
Cabelo
Então devemos estar falando mesmo.. pois trabalho com Delphi 7 em .CLX e uso TPanel... acho que por ser .CLX muda em alguma coisa.. acredito que na classe TControl não existe TBitmap
Realmente TCanvas não existe, pois herda de TBitmap e realmente não poderia existir num TWidgetControl.. mas o TBitmap herda de TWidgetControl, portanto existe no TPanel, que é um TWidgetControl
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)