Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / количество строк в текстбоксе / 25 сообщений из 42, страница 1 из 2
04.05.2013, 23:29
    #38247954
количество строк в текстбоксе
Подскажите пожалуйста, как узнать сколько строк занимает текст в текстбоксе. Строки могут переноситься с помощью vbCrLf, а могут просто не умещаться по ширине текстбокса.
...
Рейтинг: 0 / 0
04.05.2013, 23:35
    #38247959
СхБд
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
количество строк в текстбоксе
почемукалка,

имхо
без vbCrLf иль чонить аналогичного
это - одна строка
имхо

split(...)
...
Рейтинг: 0 / 0
06.05.2013, 02:07
    #38248437
guest_rusimport
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
количество строк в текстбоксе
почемукалка,

слепил на досуге
...
Рейтинг: 0 / 0
06.05.2013, 12:44
    #38248804
количество строк в текстбоксе
guest_rusimport, спасибо!
...
Рейтинг: 0 / 0
06.05.2013, 12:52
    #38248817
guest_rusimport
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
количество строк в текстбоксе
почемукалка,

рано радуетесь, там есть одна "маленькая" недоработка, если слова в текстбоксе пишутся через дефис , то подсчет строк будет выполняться не всегда правильно (типа финансово-экономическая и т.п.) , но это вам домашнее задание - разобрать алгоритм и доработать его :)
...
Рейтинг: 0 / 0
08.01.2014, 07:04
    #38519366
guest_rusimport
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
количество строк в текстбоксе
почемукалка,

решил переделать свой пример, а то от вида первоначального кода пришёл в тихий ужас)))))

Кому не лень - потестируйте пожалуйста (может всплывут случаи, когда считает некорректно)
...
Рейтинг: 0 / 0
09.01.2014, 00:54
    #38520025
guest_rusimport
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
количество строк в текстбоксе
Если кто-то пытался тестировать - спасибо, ошибки сам нашел, алгоритм переделал (похоже окончательно), прилагаю
...
Рейтинг: 0 / 0
10.01.2014, 01:59
    #38521177
guest_rusimport
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
количество строк в текстбоксе
ещё малость подправил
...
Рейтинг: 0 / 0
10.01.2014, 09:02
    #38521296
guest_rusimport
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
количество строк в текстбоксе
нашел ещё один "ляп" , как исправить - пока не знаю, для случаев центрирования текста по середине и по правому краю алгоритмы будут другие
...
Рейтинг: 0 / 0
10.01.2014, 10:50
    #38521461
Панург
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
количество строк в текстбоксе
guest_rusimportнашел ещё один "ляп" , как исправить - пока не знаю, для случаев центрирования текста по середине и по правому краю алгоритмы будут другиеТак пойдёт? Ну ты заморочился...
...
Рейтинг: 0 / 0
10.01.2014, 12:28
    #38521706
guest_rusimport
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
количество строк в текстбоксе
Панург,

авторТак пойдёт? Ну ты заморочился...


Спасибо, что проявил интерес, но , нет , не пойдет, в твоем примере для 9-й записи считает не верно (сразу предупреждаю, задача только на первый взгляд простая)
...
Рейтинг: 0 / 0
10.01.2014, 12:31
    #38521714
guest_rusimport
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
количество строк в текстбоксе
guest_rusimportПанург,

авторТак пойдёт? Ну ты заморочился...


Спасибо, что проявил интерес, но , нет , не пойдет, в твоем примере для 9-й записи считает не верно (сразу предупреждаю, задача только на первый взгляд простая)

впрочем и не только для девятой:)
...
Рейтинг: 0 / 0
10.01.2014, 12:56
    #38521782
ILLHEAD
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
количество строк в текстбоксе
guest_rusimport,

а регексп там никак прикрутить? в нем можно все условия указать
там вроде "\n" надо считать. нет?
...
Рейтинг: 0 / 0
10.01.2014, 13:16
    #38521817
Панург
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
количество строк в текстбоксе
guest_rusimport,

Не учёл скрол...
...
Рейтинг: 0 / 0
10.01.2014, 13:45
    #38521868
guest_rusimport
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
количество строк в текстбоксе
Панург,

девятая запись - считает 2 , на самом деле 3, одиннадцатая - считает -1, на самом деле -5 , можно далее продолжать:)
...
Рейтинг: 0 / 0
10.01.2014, 13:47
    #38521871
Прогер_самоучка
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
количество строк в текстбоксе
guest_rusimportПанург,

девятая запись - считает 2 , на самом деле 3, одиннадцатая - считает -1, на самом деле -5 , можно далее продолжать:)
Тактичное такое тролление. Раззадоривание-таки
...
Рейтинг: 0 / 0
10.01.2014, 13:53
    #38521881
количество строк в текстбоксе
почемукалкакак узнать сколько строк занимает текст в текстбоксе. А можно поинтересоваться - ЗАЧЕМ?
...
Рейтинг: 0 / 0
10.01.2014, 13:57
    #38521892
Панург
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
количество строк в текстбоксе
guest_rusimport,

Прямо мой пример такие результаты даёт?
...
Рейтинг: 0 / 0
10.01.2014, 14:20
    #38521940
guest_rusimport
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
количество строк в текстбоксе
Панургguest_rusimport,

Прямо мой пример такие результаты даёт?

ну, а чей ? не мой же, я этот код не писал
...
Рейтинг: 0 / 0
10.01.2014, 14:24
    #38521951
Konst_One
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
количество строк в текстбоксе
c 0 индекс в массиве, если явно не переопределили в заголовке модуля через OPTION BASE
...
Рейтинг: 0 / 0
10.01.2014, 15:46
    #38522150
Панург
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
количество строк в текстбоксе
Konst_Onec 0 индекс в массиве, если явно не переопределили в заголовке модуля через OPTION BASEТы имеешь ввиду это?
Код: vbnet
1.
.lfFaceName = Me.Поле0.FontName & Chr$(0)

Это единственное, что напоминает массив...


guest_rusimport,

добавь в заголовок модуля
Код: vbnet
1.
2.
3.
Option Compare Database
Option Explicit
Option Base 0
...
Рейтинг: 0 / 0
10.01.2014, 16:00
    #38522167
guest_rusimport
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
количество строк в текстбоксе
Панургguest_rusimport,

добавь в заголовок модуля
Код: vbnet
1.
2.
3.
Option Compare Database
Option Explicit
Option Base 0



добавил - результат тот же
...
Рейтинг: 0 / 0
10.01.2014, 16:01
    #38522169
guest_rusimport
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
количество строк в текстбоксе
guest_rusimportПанургguest_rusimport,

добавь в заголовок модуля
Код: vbnet
1.
2.
3.
Option Compare Database
Option Explicit
Option Base 0



добавил - результат тот же

т.е. опять считает не правильно
...
Рейтинг: 0 / 0
10.01.2014, 17:44
    #38522328
Панург
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
количество строк в текстбоксе
guest_rusimport,

Почитал внимательно про функция DrawText и выяснил (раньше не обращал внимание на это, т.к. не было нужды), что с параметром DT_CALCRECT функция будет считать правильно, если самое длинное слово в строке не превышает ширину ограничивающего прямоугольника. Если надо подробней, то в гугл
Таким образом, предложенный способ будет работать с контролом достаточной ширины...
...
Рейтинг: 0 / 0
10.01.2014, 19:31
    #38522482
guest_rusimport
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
количество строк в текстбоксе
Панург,

это всё замечательно, но что же делать со всеми возможными встречающимися комбинациями слов в рамках конкретного текстбокса (хотя бы для случая правого выравнивания текста, я уже не говорю про случаи другого выравнивания текста в текстбоксе)? Будет ли правильно работать алгоритм, предложенный вами (с учетом того, что вы написали выше)? Что то меня терзают сомнения
...
Рейтинг: 0 / 0
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / количество строк в текстбоксе / 25 сообщений из 42, страница 1 из 2
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]