Delphi dicas

Passar imagem bitmap como variável

//ESTA DICA É SIMPLES,MAS AJUDA AOS INICIANTES.COMO

//TRANSFORMAR UMA IMAGEM NUMA VARIÁVEL:

//UMA IMAGEM DE UM IMAGE (IMAGE1) É PASSADO PARA OUTRO IMAGE

//(IMAGE2):

//ASSIM É MAIS FÁCIL TRABALHAR COM ELAS.





procedure TForm1.Button1Click(Sender: TObject);

var a:tpicture;

begin

        a:=tpicture(image1.picture);

        image2.picture:=tpicture(a);

end;

por : Almir Bispo Dos Santos Filho