VBNet - Форум - Label+Form

Вопрос: Label+Form Добавлено: 03.12.02 19:37

Автор вопроса: Zeus | Web-сайт: apirussia.by.ru | ICQ: 161801353

у мя такая, значит, проблема:
Имеется форма, на ней лейбл(label). Размеры формы=размерам лейбла, то есть видно только сам лейбл.
Лейбл содержит информацию(естественно), например, 123456. Справа от цифр ничего нет, только грница формы. Autosize лейбла стоит на TRUE. При изменении информации, допустим, на 1234, WIDTH лейбла уменьшается, но форма то остаётся прежних размеров!
Так вот, как сделать, чтобы WIDTH формы изменилась до таких размеров, когда не видно лишнего фона справа от лейбла???

Ответить

Ответы Всего ответов: 10

Номер ответа: 1
Автор ответа:

Ян

ICQ: 816105

Вопросов: 38
Ответов: 198

Web-сайт: www.yan.net.ru
Профиль | | #1

Добавлено: 03.12.02 19:59

Попробуй так:

Private Sub Label1_Change()
Me.Width = Label1.Width
End Sub

label1 - твой лэйбл

Ответить

Номер ответа: 2
Автор ответа:

CaS

ICQ: 165551179

Вопросов: 10
Ответов: 124

Web-сайт: www22.brinkster.com/casperz
Профиль | | #2

Добавлено: 04.12.02 16:00

Не знаю, толи к меня Васик глюканутый или я что-то не так делал, но у меня, например, если у формы стоит StartUpPosition=2 (по центру экрана) или, если у лэйбла autosize=true, то они мне постоянно возращали Width=0 и Height=0, поэтому я составлял алгоритм для лэйбла вычисления его Width по его Len(...) оператору. Попробуй, может получиться?!

Ответить

Номер ответа: 3
Автор ответа:

-=Gork=-

ICQ: 9993198

Вопросов: 8
Ответов: 229

Web-сайт: olegm.wz.cz/
Профиль | | #3

Добавлено: 04.12.02 18:15

Еси возвращает 0, значит ты проверку делал когда Лэйбл был пустой. У меня все пашет. Алгоритмы по ЛенУ создавать вряд-ли понадобится. ТО- что волшебник саказл - и есть правда.

Ответить

Номер ответа: 4
Автор ответа:

CaS

ICQ: 165551179

Вопросов: 10
Ответов: 124

Web-сайт: www22.brinkster.com/casperz
Профиль | | #4

Добавлено: 04.12.02 21:00

Как раз лыйбл у меня был не пустой

Ответить

Номер ответа: 5
Автор ответа:

Zeus

ICQ: 161801353

Вопросов: 63
Ответов: 220

Web-сайт: apirussia.by.ru
Профиль | | #5

Добавлено: 04.12.02 21:16

Ян, не помогло, форма принимает значение первоначальной WIDTh лейбла...

Colorburn, попробую...

А первоначально лейбл пустой...

Ответить

Номер ответа: 6
Автор ответа:

-=Gork=-

ICQ: 9993198

Вопросов: 8
Ответов: 229

Web-сайт: olegm.wz.cz/
Профиль | | #6

Добавлено: 04.12.02 23:51

2 Colorburn:

Странно..

2 Zeus:

Странно тоже...

А вообще - разве у лейбла есть событие Change? - Сорри, у меня на этом компе нету Васика..

Ответить

Номер ответа: 7 Автор ответа: *CyRax* Разработчик Offline Client ICQ: 204447456 Вопросов: 180 Ответов: 4229	Web-сайт: basicproduction.nm.ru Профиль \| \| #7	Добавлено: 05.12.02 01:23
	Утанавливай лефт и топ равным нюлю в событии _Change перед принудительным ресайзом. Либо смени Alignment своего лабела (если у тебя стоит 2 - Center). P.S. Ответить

Номер ответа: 8
Автор ответа:

Zeus

ICQ: 161801353

Вопросов: 63
Ответов: 220

Web-сайт: apirussia.by.ru
Профиль | | #8

Добавлено: 07.12.02 17:44

А всё-таки это сработало))) :

Private Sub Label1_Change()
Me.Width = Label1.Width
End Sub

Усём Спасибо!

Ответить

Номер ответа: 9
Автор ответа:

CyRax

Разработчик Offline Client

ICQ: 204447456

Вопросов: 180
Ответов: 4229

Web-сайт: basicproduction.nm.ru
Профиль | | #9

Добавлено: 07.12.02 21:14

Ну а то что я тебе сказал - сработало ?.

Потому что если у тебя алигмент - центр, то другого быть не может.

Ответить

Номер ответа: 10 Автор ответа: Ян ICQ: 816105 Вопросов: 38 Ответов: 198	Web-сайт: www.yan.net.ru Профиль \| \| #10	Добавлено: 07.12.02 21:44
	А я что говорил Ответить

Страница: 1 |