Averiguar parametros trect en un Timagen

[avmm2004]

Empezado por xEsk

Puedes usar las propiedades: Width y Height de la clase TPicture. Los valores que te devuelve, son las dimensiones reales de la imagen, no del TImage.


Ejemplo:Código Delphi [-]ShowMessage(IntToStr(Image1.Picture.Width) + 'x' + IntToStr(Image1.Picture.Height));



Saludos.

Siendo asi las proporciones de la imagen no se pierden aunque lo pase a PDF ¿no?

Gracias.