Scroll
Правила форума
Темы, в которых будет сначала написано «что нужно сделать», а затем просьба «помогите», будут закрыты.
Читайте требования к создаваемым темам.
Темы, в которых будет сначала написано «что нужно сделать», а затем просьба «помогите», будут закрыты.
Читайте требования к создаваемым темам.
Сообщений: 13
• Страница 1 из 1
- GB826
- Постоялец
-
- Сообщения: 312
- Зарегистрирован: 04.08.2005 (Чт) 0:58
- Откуда: Планета #3
GB826 » 12.05.2006 (Пт) 10:53
:о) Добавить стандартный контрол VScrollBar, находящийся на панели инструментов, которая находится слева (по умолчанию)
Пора уже всем хорошим людям собраться и убить всех плохих людей.
- virtuoz
- Новичок
- Сообщения: 31
- Зарегистрирован: 10.05.2006 (Ср) 15:36
virtuoz » 12.05.2006 (Пт) 11:04
окошко сверху - вниз и наоборот, чтобы прокрутка работала
в делфи у формы есть свойство horzscrollbar, и там все решается путем переключения его в состояние true, в VB6 такого нету, так что объясните пожалуйста по пунктам как сделать работающий scrollbar, а не просто как перетащить из панели инструментов H и V ScrollBarы
в делфи у формы есть свойство horzscrollbar, и там все решается путем переключения его в состояние true, в VB6 такого нету, так что объясните пожалуйста по пунктам как сделать работающий scrollbar, а не просто как перетащить из панели инструментов H и V ScrollBarы
Последний раз редактировалось virtuoz 12.05.2006 (Пт) 11:18, всего редактировалось 2 раз(а).
- virtuoz
- Новичок
- Сообщения: 31
- Зарегистрирован: 10.05.2006 (Ср) 15:36
virtuoz » 12.05.2006 (Пт) 11:26
GB826 писал(а):У тя экран маленький?
Не надо скролить два текстбокса и одну кнопку, лучше форму увеличь..
экран ногрмальный - 1280, но не хочу я жестко фиксировать размер окна, куда удобнне прокрутить скролом чем растягивать окно
- Viper
- Артефакт VBStreets
-
- Сообщения: 4394
- Зарегистрирован: 12.04.2005 (Вт) 17:50
- Откуда: Н.Новгород
Viper » 12.05.2006 (Пт) 11:56
virtuoz писал(а):экран ногрмальный - 1280, но не хочу я жестко фиксировать размер окна, куда удобнне прокрутить скролом чем растягивать окно
Ты уж определись что тебе хочется: фиксировать размер окна и скролить или растягивать окно?
ИМХО: Если уж делать скролл, то действительно помещать все содержимое окна на контейнер, типа панели
Весь мир матрица, а мы в нем потоки байтов!
- Lumen
- Постоялец
-
- Сообщения: 841
- Зарегистрирован: 03.12.2005 (Сб) 16:09
- Откуда: Брянск
Lumen » 12.05.2006 (Пт) 12:09
Именно как в Delphi IMHO нельзя. Можно поместить все контролы в контейнер (Frame или PictureBox) и при перемещении ползунка двигать этот контейнер вверх или вниз, в зависимости от перемещения ползунка. Вот пример такой реализации:
- Вложения
-
Форма со скроллингом.rar- (1.59 Кб) Скачиваний: 33
- BV
- Thinker
-
- Сообщения: 3987
- Зарегистрирован: 12.09.2004 (Вс) 0:55
- Откуда: Молдавия, г. Кишинёв
BV » 12.05.2006 (Пт) 13:07
Ой, как у нас всё запущено...
Для появления стандартной полосы прокрутки надо:
Или...
Но работать этот Scroll всё равно просто так не будет
Далее сабклассинг на WM_V[H]SCROLL и перемещение элементов подобно:
Тот же эффект будет, если использовать свой Scroll.
Для появления стандартной полосы прокрутки надо:
- Код: Выделить всё
Dim lOldStyle As Long
lOldStyle = GetWindowLong(frmMain.hwnd, GWL_STYLE)
SetWindowLong frmMain.hwnd, GWL_STYLE, lOldStyle Or WS_VSCROLL
Или...
- Код: Выделить всё
ShowScrollBar frmMain.hwnd, SB_VERT, True
Но работать этот Scroll всё равно просто так не будет
Далее сабклассинг на WM_V[H]SCROLL и перемещение элементов подобно:
- Код: Выделить всё
fraGeneral.Top[Left] = -ScrollValue
Тот же эффект будет, если использовать свой Scroll.
const char *out = "|*0>78-,+<|"; size_t cc = char_traits<char>::length(out);
for (size_t i=0;i<cc;i++){cout<<static_cast<char>((out[i]^89));}cout<<endl;
for (size_t i=0;i<cc;i++){cout<<static_cast<char>((out[i]^89));}cout<<endl;
Сообщений: 13
• Страница 1 из 1
Кто сейчас на конференции
Сейчас этот форум просматривают: AhrefsBot, Majestic-12 [Bot], SemrushBot и гости: 170