Desenhar imagem como fundo de formulário

[lazarusportu...@gmail.com]

Ol�.
Estou a portar o c�digo que retirei de
http://www.codefoot.com/delphi/form_background_image.shtml para o
Lazarus. Neste momento meu c�digo est� assim:
background := TBitmap.Create;
background.LoadFromFile({Cadeia+'\180px-Grid.bmp}'C:\Documents and
Settings\Daniel\Ambiente de trabalho\qqwing\180px-Grid.bmp');
Form1.Canvas.Draw(0,0,background); .
supostamente no fundo do form devia aparecer uma imagem que n�o aparece.
Como fa�o para ela aparecer?

--
#lazarus-br em irc.freenode.org
#lazarusportugal em irc.ptnet.org(Cloud IRC em lazarusportugal.org/doku.php/irc)
Em caso de d�vida sobre o cliente a usar clique em http://lazarusportugal.org/doku.php/duvidas_irc
Juntem-se a estes fant�sticos IRC's sobre Lazarus

[manuel]

O teu código parece bem excepto algo que não percebo muito bem porque
lá está ({Cadeia+'\180px-Grid.bmp}?????) , o código deveria estar:

procedure desenha_bitmap;
var
background: TBitmap;
begin
background:=TBitmap.create;
background.LoadFromFile('C:\Documents and Settings\Daniel\Ambiente

de trabalho\qqwing\180px-Grid.bmp');
Form1.Canvas.Draw(0,0,background);

end;


Deixo-te aqui um outro aviso, e também causa de problemas, o lazarus
não gosta de paths com espaços, costuma dar problemas e no passado eu
aprendi isso da pior forma. logo "C:\Documents and Settings" não é
muito boa ideia de localização de ficheiro. mesmo o projecto tenta
coloca-lo numa pasta que desde a raiz não tenha espaços no path.

Boa Sorte e espero ter ajudado

On Jun 6, 1:05 pm, "lazarusportugalwebmast...@gmail.com"
<lazarusportugalwebmast...@gmail.com> wrote:
> Ol .
> Estou a portar o c digo que retirei dehttp://www.codefoot.com/delphi/form_background_image.shtmlpara o

> Lazarus. Neste momento meu c digo est assim:
>     background := TBitmap.Create;
>     background.LoadFromFile({Cadeia+'\180px-Grid.bmp}'C:\Documents and
> Settings\Daniel\Ambiente de trabalho\qqwing\180px-Grid.bmp');
>     Form1.Canvas.Draw(0,0,background); .
> supostamente no fundo do form devia aparecer uma imagem que n o aparece.
> Como fa o para ela aparecer?
>
> --
> #lazarus-br em irc.freenode.org
> #lazarusportugal em irc.ptnet.org(Cloud IRC em lazarusportugal.org/doku.php/irc)

> Em caso de d vida sobre o cliente a usar clique emhttp://lazarusportugal.org/doku.php/duvidas_irc

[dicas3d]

Em 06-06-2011 19:36, manuel escreveu:
> O teu c�digo parece bem excepto algo que n�o percebo muito bem porque
> l� est� ({Cadeia+'\180px-Grid.bmp}?????) , o c�digo deveria estar:

>
> procedure desenha_bitmap;
> var
> background: TBitmap;
> begin
> background:=TBitmap.create;
> background.LoadFromFile('C:\Documents and Settings\Daniel\Ambiente
> de trabalho\qqwing\180px-Grid.bmp');
> Form1.Canvas.Draw(0,0,background);
> end;
>
>

> Deixo-te aqui um outro aviso, e tamb�m causa de problemas, o lazarus
> n�o gosta de paths com espa�os, costuma dar problemas e no passado eu
> aprendi isso da pior forma. logo "C:\Documents and Settings" n�o �
> muito boa ideia de localiza��o de ficheiro. mesmo o projecto tenta
> coloca-lo numa pasta que desde a raiz n�o tenha espa�os no path.

>
> Boa Sorte e espero ter ajudado
>
> On Jun 6, 1:05 pm, "lazarusportugalwebmast...@gmail.com"
> <lazarusportugalwebmast...@gmail.com> wrote:
>> Ol .
>> Estou a portar o c digo que retirei dehttp://www.codefoot.com/delphi/form_background_image.shtmlpara o
>> Lazarus. Neste momento meu c digo est assim:
>> background := TBitmap.Create;
>> background.LoadFromFile({Cadeia+'\180px-Grid.bmp}'C:\Documents and
>> Settings\Daniel\Ambiente de trabalho\qqwing\180px-Grid.bmp');
>> Form1.Canvas.Draw(0,0,background); .
>> supostamente no fundo do form devia aparecer uma imagem que n o aparece.
>> Como fa o para ela aparecer?
>>
>> --
>> #lazarus-br em irc.freenode.org
>> #lazarusportugal em irc.ptnet.org(Cloud IRC em lazarusportugal.org/doku.php/irc)
>> Em caso de d vida sobre o cliente a usar clique emhttp://lazarusportugal.org/doku.php/duvidas_irc
>> Juntem-se a estes fant sticos IRC's sobre Lazarus

Isto est� l� que � para concatenar uma parte do direct�rio com dir do do
programa. Mas comentei isso para testar porque n�o mostra a imagem.

--
#lazarus-br em irc.freenode.org
#lazarusportugal em irc.ptnet.org(Cloud IRC em lazarusportugal.org/doku.php/irc)

Em caso de d�vida sobre o cliente a usar clique em http://lazarusportugal.org/doku.php/duvidas_irc