[angvelem]

Сообщение от Alegun

Код:

...
Label1.Caption:= IntToStr(Image1.Height)+' : '+IntToStr(Image1.Picture.Height);
Label2.Caption:= IntToStr(Image1.Width)+' : '+IntToStr(Iimage1.Picture.Width);
...

Я об этом ТС говорил, но его это не устроило.

Видно точно такой ответ не устроил и ТС ушёл искать правду на следующем форуме.