Помогите, пожалуйста, с печатью....

Программирование на Visual Basic, главный форум. Обсуждение тем программирования на VB 1—6.
Даже если вы плохо разбираетесь в VB и программировании вообще — тут вам помогут. В разумных пределах, конечно.
Правила форума
Темы, в которых будет сначала написано «что нужно сделать», а затем просьба «помогите», будут закрыты.
Читайте требования к создаваемым темам.
Vitaliy
Новичок
Новичок
 
Сообщения: 26
Зарегистрирован: 14.05.2003 (Ср) 13:35

Помогите, пожалуйста, с печатью....

Сообщение Vitaliy » 19.11.2003 (Ср) 10:31

Есть у меня форма, на ней несколько текстовых полей, которые заполняются или пользователем, или из файла, и потом текст из этих полей выводится на печать в определенные места листа (по координатам). Так вот, когда у меня текстовое поле состоит из нескольких строк (MultiLine=True) , то если не поставить после каждой строки Enter, то все выводится в одну строку. Это еще полбеды. Когда с Enter-ом, правильно печатается только первая строка (т.е. в нужном месте), а остальные печатаются с начала листа (т.е позиция Х=0).
Подскажите, как быть? :(

Aleksej
Продвинутый пользователь
Продвинутый пользователь
Аватара пользователя
 
Сообщения: 191
Зарегистрирован: 03.06.2003 (Вт) 9:58

Сообщение Aleksej » 28.11.2003 (Пт) 16:46

1. Получи количество строк в TextBox'e:
Count =SendMessage(Text.hwnd, EM_GETLINECOUNT, 0, 0)
2. Получи длину строки:
LineLength = SendMessage(Text.hwnd, EM_LINELENGTH, i, 0) + 1
3. Добавить в массив:
result = SendMessage(Text.hwnd, EM_GETLINE, i, ByVal strBuffer)
И с каждой отдельной строкой в массиве, делай что хочешь.

Max!
Постоялец
Постоялец
Аватара пользователя
 
Сообщения: 502
Зарегистрирован: 03.04.2003 (Чт) 22:08
Откуда: Литва

Сообщение Max! » 28.11.2003 (Пт) 21:00

Покопаися в форуме я уже задовал похожий вопросс! 8)
Max!


Вернуться в Visual Basic 1–6

Кто сейчас на конференции

Сейчас этот форум просматривают: SemrushBot, Yandex-бот и гости: 9

    TopList