VBNet - Форум - Ширина Text1.Width

Вопрос: Ширина Text1.Width Добавлено: 26.03.07 17:14

Автор вопроса: KreAtoR

if Len(text1.text) > ?????text1.width?????? then
text1.righttoleft = true
else
text1.righttoleft = false
end if
Len(text1.text) c text1.width нельзя взять вот так и сравнить, а надо.
Тоесть если строка уже не помещается в Text1 то она дожна показываться справа налево а если помещается то слева направо.

Пример конечно работать не будет,что надо туда вставить???
Ответить

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

Номер ответа: 1 Автор ответа: Arseny ICQ: 298826769 Вопросов: 53 Ответов: 1732	Профиль \| \| #1	Добавлено: 26.03.07 18:18
	Если я правильно понимаю, то: Text1.Setfocus SendKeys "{END}" Ответить

Номер ответа: 2 Автор ответа: HACKER Разработчик Offline Client Вопросов: 236 Ответов: 8362	Профиль \| \| #2	Добавлено: 26.03.07 18:54
	Нужно определить ширину текста в Text1 в пикселях. Это можно сделать или API функцией (какой правдо непомню ), или через какой-нибуть лабел, у которого свойство AutoSize=True Ответить

Номер ответа: 3 Автор ответа: Alex ICQ: no Вопросов: 3 Ответов: 13	Web-сайт: no Профиль \| \| #3	Добавлено: 26.03.07 19:39
	ширина одного символа(если не изменяешь шрифт) примерно 6 точек, т.е. if Len(text1.text) > (text1.width/6) then должно работать. Ответить

Номер ответа: 4 Автор ответа: HACKER Разработчик Offline Client Вопросов: 236 Ответов: 8362	Профиль \| \| #4	Добавлено: 26.03.07 20:31
	А если не менять шрифт, а поменять кол-во точек на дюйм? Ответить

Номер ответа: 5 Автор ответа: GSerg Вопросов: 0 Ответов: 1876	Профиль \| \| #5	Добавлено: 26.03.07 22:30
	Какой же бред изложен в стартовом посте - как в коде, так и в тексте после кода... И это всё из-за .selstart=len(.text), удивительно, просто нет слов... Ответить

Номер ответа: 6 Автор ответа: Arseny ICQ: 298826769 Вопросов: 53 Ответов: 1732	Профиль \| \| #6	Добавлено: 27.03.07 08:29
	.selstart=len(.text) Там про выделение вроде ничего не говорится. Ответить

Номер ответа: 7 Автор ответа: KreAtoR Вопросов: 120 Ответов: 438	Профиль \| \| #7	Добавлено: 27.03.07 10:56
	Text1.Setfocus SendKeys "{END}" все хорошо как ты и подумал, тока курсор не вернуть обратно!!!! я правда на Клик сделал на Фокусе не работает. Хотелось бы чтоб на лостФокус оно в начало прыгало, а так как курсора нет то {HOME} в данном случае не подходит. Может есть еще какие мысли Ответить

Номер ответа: 8 Автор ответа: Alex ICQ: no Вопросов: 3 Ответов: 13	Web-сайт: no Профиль \| \| #8	Добавлено: 27.03.07 11:03
	Вообще не очень понимаю в чем проблема. Потому что по умолчанию, если текст не помещается в поле, то видиой остается последние с права символы. Посмотри значение свойства Multiline, должно быть false. Ответить

Номер ответа: 9 Автор ответа: Arseny ICQ: 298826769 Вопросов: 53 Ответов: 1732	Профиль \| \| #9	Добавлено: 27.03.07 11:23
	Может есть еще какие мысли Дофига! Поставь Text1.SelStart = 0 туда, куда переходит фокус. Private Sub Text1_GotFocus() SendKeys "{END}" End Sub Private Sub Text2_GotFocus() Text1.SelStart = 0 End Sub Ответить

Номер ответа: 10 Автор ответа: KreAtoR Вопросов: 120 Ответов: 438	Профиль \| \| #10	Добавлено: 27.03.07 11:39
	Поставь Text1.SelStart = 0 туда, куда переходит фокус. так он много куда переходить может!!!! Получается что везде ставить надо!!!! Ответить

Номер ответа: 11 Автор ответа: KreAtoR Вопросов: 120 Ответов: 438	Профиль \| \| #11	Добавлено: 27.03.07 11:42
	Посмотри значение свойства Multiline, должно быть false. а его собственно никто и не включал а видимым он будет если ты в нем печатаешь а если он ЛОКЕД а строку ты ему передаешь из другого окна!!!! а когда Form1.show делаешь то все показывается слева направо!!!! Ответить

Номер ответа: 12 Автор ответа: KreAtoR Вопросов: 120 Ответов: 438	Профиль \| \| #12	Добавлено: 27.03.07 11:46
	Поставь Text1.SelStart = 0 туда, куда переходит фокус. так он много куда переходить может!!!! Получается что везде ставить надо!!!! все без проблем я его поставил в лостФокус и все заработало Ну и идее у тебя я скажу :--}}}}}} Ответить

Номер ответа: 13 Автор ответа: Arseny ICQ: 298826769 Вопросов: 53 Ответов: 1732	Профиль \| \| #13	Добавлено: 27.03.07 14:34
	Ну и идее у тебя я скажу :--}}}}}} Голь на выдумки хитра. Ответить

Страница: 1 |