Отправляет email-рассылки с помощью сервиса Sendsay
  Все выпуски  

RusFAQ.ru: Программирование на Delphi


Хостинг Портала RusFAQ.ru:
MosHoster.ru - Профессиональный хостинг на Windows 2008

РАССЫЛКИ ПОРТАЛА RUSFAQ.RU

/ КОМПЬЮТЕРЫ И ПО / Языки программирования / Delphi

Выпуск № 1197
от 04.10.2008, 11:05

Администратор:Калашников О.А.
В рассылке:Подписчиков: 388, Экспертов: 41
В номере:Вопросов: 1, Ответов: 2

Нам важно Ваше мнение об этой рассылке.
Оценить этот выпуск рассылки >>


Вопрос № 145391: Здравствуйте Уважаемые Экспкрты! Проблема следующая. После загрузки файла с расширением BMP в Image c установленным свойством AutoSize=True картинка полностью не видна на экране. При использовании свойства Strech нарушается пропорция фото. Испо...

Вопрос № 145.391
Здравствуйте Уважаемые Экспкрты!
Проблема следующая.
После загрузки файла с расширением BMP в Image c установленным свойством AutoSize=True картинка полностью не видна на экране. При использовании свойства Strech нарушается пропорция фото. Использую Delphi 5, в котором свойство пропорциональности для Image я не нашел. Подскажите как загрузить фото в Image, чтобы была видна вся фотография и не нарушалась пропорция?
За ранее благодарю.
Отправлен: 29.09.2008, 10:50
Вопрос задал: Geb2003 (статус: Посетитель)
Всего ответов: 2
Мини-форум вопроса >>> (сообщений: 0)

Отвечает: Шичко Игорь
Здравствуйте, Geb2003!
Для реализации предлагаю Вам изменить пропорционально размеры картинки, предварительно вычислив коэффициент изменения.
Код и описание в приложении.

Приложение:

Ответ отправил: Шичко Игорь (статус: 6-ой класс)
Ответ отправлен: 29.09.2008, 12:11
Оценка за ответ: 5

Отвечает: Genia007
Здравствуйте, Geb2003!
Попробуйте следующий код, использую у себя в проги:

var
Back: TBitMap; // картинка

Back.LoadFromFile(OpenPicture1.Dialog.FileName);
Image1.canvas.fillrect(Image1.canvas.cliprect);
image1.Canvas.StretchDraw(paintboxDestRect(Back),Back);

Приложение:

Ответ отправил: Genia007 (статус: 8-ой класс)
Ответ отправлен: 30.09.2008, 11:41


Вы имеете возможность оценить этот выпуск рассылки.
Нам очень важно Ваше мнение!
Оценить этот выпуск рассылки >>

Отправить вопрос экспертам этой рассылки

Приложение (если необходимо):

* Код программы, выдержки из закона и т.п. дополнение к вопросу.
Эта информация будет отображена в аналогичном окне как есть.

Обратите внимание!
Вопрос будет отправлен всем экспертам данной рассылки!

Для того, чтобы отправить вопрос выбранным экспертам этой рассылки или
экспертам другой рассылки портала RusFAQ.ru, зайдите непосредственно на RusFAQ.ru.


Форма НЕ работает в почтовых программах The BAT! и MS Outlook (кроме версии 2003+)!
Чтобы отправить вопрос, откройте это письмо в браузере или зайдите на сайт RusFAQ.ru.


© 2001-2008, Портал RusFAQ.ru, Россия, Москва.
Авторское право: ООО "Мастер-Эксперт Про"
Техподдержка портала, тел.: +7 (926) 535-23-31
Хостинг: "Московский хостер"
Поддержка: "Московский дизайнер"
Авторские права | Реклама на портале

∙ Версия системы: 5.3 RC 2 от 09.09.2008

Яндекс Rambler's Top100
RusFAQ.ru | MosHoster.ru | MosDesigner.ru | RusIRC.ru
Kalashnikoff.ru | RadioLeader.ru | RusFUCK.ru

В избранное