Модераторы: Akina
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> показать строчки в Text 
:(
    Опции темы
Dastin
  Дата 4.1.2007, 20:33 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



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

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



Всем доброго дня. Такой вопрос. Есть два текстового поля Text1 и Text2 и кнопка Command1. Мне нужно прочитать строчки под номером 3 и 4 и показать в одном из полей. Я здесь ничего не нашёл к сожалению. Мог бы кто нибудь мне написать как это сделать? 
PM MAIL   Вверх
BorisVorontsov
Дата 4.1.2007, 22:42 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Thinker
**


Профиль
Группа: Комодератор
Сообщений: 714
Регистрация: 3.11.2005
Где: Молдавия, г. Киши нёв

Репутация: 5
Всего: 10



Откуда нужно прочитать строчки?


--------------------
[code=cpp]
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;
[/code]
PM MAIL ICQ GTalk   Вверх
W4FhLF
Дата 5.1.2007, 10:35 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


found myself
****


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

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



Код

Private Sub Command1_Click()
    arr = Split(Text1.Text, vbCrLf)
    If UBound(arr) >= 3 Then Text2.Text = arr(2) & vbCrLf & arr(3)
End Sub



Это сообщение отредактировал(а) W4FhLF - 5.1.2007, 10:36


--------------------
"Бог умер" © Ницше
"Ницше умер" © Бог
PM ICQ   Вверх
Dastin
Дата 5.1.2007, 13:09 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



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

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



Цитата(W4FhLF @ 5.1.2007,  10:35)
Код

Private Sub Command1_Click()
    arr = Split(Text1.Text, vbCrLf)
    If UBound(arr) >= 3 Then Text2.Text = arr(2) & vbCrLf & arr(3)
End Sub


W4FhLF, Спасибо! Вот только он показывает если есть перенос..., а если текст сплошняком идёт и не имеет переноса? Получается при этом он эти строки вообще не находит или показывает ещё к этим, другие снизу... Как сделать чтобы не зависило от этого?
PM MAIL   Вверх
Akina
Дата 6.1.2007, 15:13 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Советчик
****


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

Репутация: 34
Всего: 454



Dastin, Что (по твоему разумению) есть строка?


--------------------
 О(б)суждение моих действий - в соответствующей теме, пожалуйста. Или в РМ. И высшая инстанция - Администрация форума.

PM MAIL WWW ICQ Jabber   Вверх
Dastin
  Дата 6.1.2007, 16:18 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



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

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



Цитата(Akina @ 6.1.2007,  15:13)
Dastin, Что (по твоему разумению) есть строка?

Вообще то строка, по моему разумению, это то что начинается с левого края текстового или другого поля и заканчивается справа. Желательно чтоб это не зависило от переноса- ||...  ;) Мне именно такой код нуженsmile
PM MAIL   Вверх
cardinal
Дата 6.1.2007, 19:00 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Инженер
****


Профиль
Группа: Экс. модератор
Сообщений: 6003
Регистрация: 26.3.2002
Где: Германия

Репутация: 19
Всего: 99



Dastin, выкладывай код с примером текста, а то так долго можно обсуждать...


--------------------
Немецкая оппозиция потребовала упростить натурализацию иммигрантов
В моем блоге: Разные истории из жизни в Германии

"Познание бесконечности требует бесконечного времени, а потому работай не работай - все едино".  А. и Б. Стругацкие
PM   Вверх
Dastin
  Дата 6.1.2007, 19:49 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



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

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



Цитата(cardinal @ 6.1.2007,  19:00)
Dastin, выкладывай код с примером текста, а то так долго можно обсуждать...

Текст с переносом на каждую новую строчку текста:

Есть у меня друг, 
профессиональный 
музыкант, баянист. 
Для того чтобы 
сыграть не очень 
сложную мелодию, 
ему не обязательно 
ее разучивать — 
достаточно лишь 
прослушать, и он 
может ее повторить. 
Он даже ради шутки 
переигрывает на баяне 
разные современные 
мелодии, «бумеры» и 
«бригады». 

Вот пример текста где нет переносов, если не нажимать Enter во время введения. Этот текст будет показан не верно или вовсе не показан. А это мне как раз и нужно увидеть...smile :

Есть у меня друг, профессиональный музыкант, баянист. Для того чтобы сыграть не очень сложную мелодию, ему не обязательно ее разучивать — достаточно лишь прослушать, и он может ее повторить. Он даже ради шутки переигрывает на баяне разные современные мелодии, «бумеры» и «бригады». Он говорит, что это не сложно, так как в отличие от классики современные мелодии намеренно упрощены для того, чтобы легче воспринимались. Вот эту способность я считаю одним из признаков профессионализма. Пример человека, который добился успеха в том деле, которым занимается. 

Надеюсь теперь поняли что я имел ввиду... smile



PM MAIL   Вверх
cardinal
Дата 6.1.2007, 21:02 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Инженер
****


Профиль
Группа: Экс. модератор
Сообщений: 6003
Регистрация: 26.3.2002
Где: Германия

Репутация: 19
Всего: 99



А как ты хочешь текст без переносов делить по строкам, по длине? По словам? По запятым?


--------------------
Немецкая оппозиция потребовала упростить натурализацию иммигрантов
В моем блоге: Разные истории из жизни в Германии

"Познание бесконечности требует бесконечного времени, а потому работай не работай - все едино".  А. и Б. Стругацкие
PM   Вверх
Dastin
Дата 6.1.2007, 23:21 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



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

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



Цитата(cardinal @ 6.1.2007,  21:02)
А как ты хочешь текст без переносов делить по строкам, по длине? По словам? По запятым?

А зачем что- то делить в тексте, когда нужно показать требуемую строчку, видную уже конкретно в поле? Она можно сказать, уже разложена сама текстовым полем на строки. Вот мне это как раз и нужно суметь.  smile
PM MAIL   Вверх
Akina
Дата 6.1.2007, 23:33 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Советчик
****


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

Репутация: 34
Всего: 454



API (TextWidth конкретно) тебе в руки - и обрабатывай строку свою по словам. Кстати, поиск по форуму поможет - вопрос обсуждался.

PS. Запомни - то что тебе надо, НЕ СТРОКИ.


--------------------
 О(б)суждение моих действий - в соответствующей теме, пожалуйста. Или в РМ. И высшая инстанция - Администрация форума.

PM MAIL WWW ICQ Jabber   Вверх
Black_Star
Дата 8.1.2007, 14:03 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Бывалый
*


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

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



Dastin, похожая тема решалась тут
PM ICQ   Вверх
cardinal
Дата 9.1.2007, 01:26 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Инженер
****


Профиль
Группа: Экс. модератор
Сообщений: 6003
Регистрация: 26.3.2002
Где: Германия

Репутация: 19
Всего: 99





--------------------
Немецкая оппозиция потребовала упростить натурализацию иммигрантов
В моем блоге: Разные истории из жизни в Германии

"Познание бесконечности требует бесконечного времени, а потому работай не работай - все едино".  А. и Б. Стругацкие
PM   Вверх
  
Ответ в темуСоздание новой темы Создание опроса
Правила форума "VB6"
Akina

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

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

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

  • Литературу по VB обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Вопросы по реализации алгоритмов рассматриваются здесь
  • Используйте теги [code=vb][/code] для подсветки кода. Используйтe чекбокс "транслит" (возле кнопок кодов) если у Вас нет русских шрифтов.


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

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


 




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


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

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