Модераторы: Poseidon, Snowy, bems, MetalFan
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Полосы прокрутки для TImage 
V
    Опции темы
IvanoffAndrey
Дата 17.7.2009, 12:13 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Бывалый
*


Профиль
Группа: Участник
Сообщений: 157
Регистрация: 8.7.2006
Где: СГАУ

Репутация: 1
Всего: 2



Здравствуйте форумчане.

Проблема такая:

Есть компонент ScrollBox, на нем лежит TImage.

TImage может менять свой размер по ходу работы программы - он расширяется.
Но почемуто полосы прокрутки у ScrollBox не появляются?
 
подскажите как решить проблему.
 
--------------------
Размерность пространства есть число Pi и в каждой точке вселенной оно стремиться к этому числу.
PM MAIL   Вверх
WandG
Дата 17.7.2009, 15:01 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 14
Регистрация: 17.11.2008

Репутация: нет
Всего: 1



может быть Вы поставили align = AllClient?

Это сообщение отредактировал(а) WandG - 17.7.2009, 15:02
PM MAIL   Вверх
IvanoffAndrey
Дата 17.7.2009, 16:06 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Бывалый
*


Профиль
Группа: Участник
Сообщений: 157
Регистрация: 8.7.2006
Где: СГАУ

Репутация: 1
Всего: 2



да точно! именно так и есть. спасиб за подсказку.
А обьясните пожалуйста почему так нельзя?

Добавлено через 3 минуты и 20 секунд
постаавил Aling = None
но все равно не появляются полосы прокрутки.
Вот как увеличивается tImage  
Код

Image.Picture.Bitmap.Width :=  Image.Picture.Bitmap.Width  +10 ;

--------------------
Размерность пространства есть число Pi и в каждой точке вселенной оно стремиться к этому числу.
PM MAIL   Вверх
Keeper89
Дата 17.7.2009, 16:11 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Завсегдатай
Сообщений: 2580
Регистрация: 26.2.2009

Репутация: 20
Всего: 58



IvanoffAndrey, как так? align = AllClient ставится для того, чтобы картинка занимала всю область скроллбокса, а он уже сам отвечает за полосы прокрутки.


--------------------
PM MAIL WWW   Вверх
IvanoffAndrey
Дата 17.7.2009, 16:17 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Бывалый
*


Профиль
Группа: Участник
Сообщений: 157
Регистрация: 8.7.2006
Где: СГАУ

Репутация: 1
Всего: 2



Ничиго не понимаю.
подскажите плиз как это организовать, убрал align = AllClient все равно ничиго не получается.
Может по мимо увелечиения Битмапа картинки нужно еще что нибуть увеличивать.
попробовал еще делать так
Image.Width := Image.Width + 10.
То есть и битмап и размер компонента увеличиваются одновременно.
Но полос все равно нету.
--------------------
Размерность пространства есть число Pi и в каждой точке вселенной оно стремиться к этому числу.
PM MAIL   Вверх
Keeper89
Дата 17.7.2009, 16:20 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Завсегдатай
Сообщений: 2580
Регистрация: 26.2.2009

Репутация: 20
Всего: 58



Скорее всего TImage не внутри ScrollBox'а.
1. Вырежьте каринку в буфер обмена.
2. Выделите Скроллбокс и вставьте Image. При этом перемещать Image за пределы бокса будет нельзя.
3. Установите у Image Align = alClient.

Это сообщение отредактировал(а) Keeper89 - 17.7.2009, 16:20


--------------------
PM MAIL WWW   Вверх
mr.Anderson
Дата 17.7.2009, 16:21 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


iOS Lead Developer
****


Профиль
Группа: Участник Клуба
Сообщений: 3374
Регистрация: 20.12.2004
Где: далеко

Репутация: 3
Всего: 128



Предположу, что TImage не считается контролом, для которого ScrollBox увеличивает свои размеры... Это только предположение. ПОпробуй разместить под ним, допустим, TPanel того же размера и попробуй менять ее размеры. Полосы появятся?


--------------------
user posted image

user posted image
PM MAIL ICQ Skype   Вверх
Keeper89
Дата 17.7.2009, 16:37 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Завсегдатай
Сообщений: 2580
Регистрация: 26.2.2009

Репутация: 20
Всего: 58



Поправочка - 3 пункт не нужен, а так все работает.


--------------------
PM MAIL WWW   Вверх
IvanoffAndrey
Дата 17.7.2009, 16:42 (ссылка)    | (голосов:1) Загрузка ... Загрузка ... Быстрая цитата Цитата


Бывалый
*


Профиль
Группа: Участник
Сообщений: 157
Регистрация: 8.7.2006
Где: СГАУ

Репутация: 1
Всего: 2



Keeper89 - проделал по пунктам.
все равно ничего не получается.
mr.Anderson для Кнопок - пробую их перемещать в ScrollBoxe - все работает, полосы прокрутки появляются, так все работате если увеличивать размеры кнопочек.
Для TImage все равно ничего не получается.
Что делать не представляю.

Как тогда иным образом огранизовать полосы прокрутки для tImage?

Добавлено через 1 минуту и 8 секунд
Программирую на Turbo Delphi
может это как то влияет?

Добавлено через 5 минут и 9 секунд
Все, простите за бузу. разобрался.
Тема такая что я напартачил там со свойствами выравнивая относительно ScrollBox.
Всем спасибо.
--------------------
Размерность пространства есть число Pi и в каждой точке вселенной оно стремиться к этому числу.
PM MAIL   Вверх
  
Ответ в темуСоздание новой темы Создание опроса
Правила форума "Delphi: Общие вопросы"
SnowyMetalFan
bemsPoseidon
Rrader

Запрещается!

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делиться вскрытыми компонентами

  • Литературу по Дельфи обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Вопросы по реализации алгоритмов рассматриваются здесь
  • 90% ответов на свои вопросы можно найти в DRKB (Delphi Russian Knowledge Base) - крупнейшем в рунете сборнике материалов по Дельфи


Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Snowy, MetalFan, bems, Poseidon, Rrader.

 
1 Пользователей читают эту тему (1 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Delphi: Общие вопросы | Следующая тема »


 




[ Время генерации скрипта: 0.1045 ]   [ Использовано запросов: 21 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.