[Sanny007]

В данных строчках. я определяю коэффициент масштабирования, т.е. фиксирую ширину и длину картинки... Согластна, что длина теряется. А если написать так: k:=(Win/Wout)*(Hin/Hout)? Конечно, не уверена, что правильно... ))).