Nobres colegas,

 

Recentemente peguei na internet um exemplo de como aplicar zoom em um
componente EDBImage.

 

Coloquei um ScrollBox e dentro dele, coloquei o componente EDBImage.

 

No incremento e decremento do zoom estou utilizando o seguinte código:

 

Botão incremento:

EDBImage1.Width :=EDBImage1.Width+10;

EDBImage1.Height:=EDBImage1.Height+10;

 

Botão decremento:

EDBImage1.Width :=EDBImage1.Width-10;

EDBImage1.Height:=EDBImage1.Height-10;

 

Porém, nada ocorre com a imagem.

 

Algum dos nobres colegas que já implementou uma função deste tipo ou que
possa me dar um dica de como faze-lo eu ficaria muito grato.

 

Abraço.

 

Ralp Alves

 

 



[As partes desta mensagem que não continham texto foram removidas]

Responder a