powered by simpleCommunicator - 2.0.53     © 2025 Programmizd 02
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Удалить двойные пустые строки в edit
17 сообщений из 17, страница 1 из 1
Удалить двойные пустые строки в edit
    #38084663
Ganjubas
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
В edit1 копируются некие данные:

строка1
строка2

строка3
строка4


строка5
строка6

Как вместо двойных пустых строк (между строками 4 и 5) оставить только одну? (условие: если встречаются две пустые строки подряд, то один из них удаляем)
...
Рейтинг: 0 / 0
Удалить двойные пустые строки в edit
    #38084679
Jonny540
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
GanjubasВ edit1 копируются некие данные:Т.е. выводятся из таблицы или как?
...
Рейтинг: 0 / 0
Удалить двойные пустые строки в edit
    #38084708
tanglir
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Код: sql
1.
2.
3.
local lcLineSeparator
lcLineSeparator=chr(13)
edit.text=strtran(edit.text,replicate(lcLineSeparator,2),lcLineSeparator)
...
Рейтинг: 0 / 0
Удалить двойные пустые строки в edit
    #38084764
Jonny540
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
tanglir,

Не факт, что попадутся два chr(13) подряд. Между ними может быть столько всяких неотображаемых...
...
Рейтинг: 0 / 0
Удалить двойные пустые строки в edit
    #38084783
tanglir
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Jonny540Между ними может быть столько всяких неотображаемыхGanjubasдвойных пустых строк Если строка пустая - значит, она пустая. Длины ноль. Если она не пустая, то ТСу надо изменить условие задачи.
...
Рейтинг: 0 / 0
Удалить двойные пустые строки в edit
    #38084821
Ganjubas
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
tanglir
Код: sql
1.
2.
3.
local lcLineSeparator
lcLineSeparator=chr(13)
edit.text=strtran(edit.text,replicate(lcLineSeparator,2),lcLineSeparator)



Показывает ошибку "PROPERTY TEXT iz read only"

поменял
Код: sql
1.
edit.text

на
Код: sql
1.
edit.value

не работает (т.е. двойные пустые строки также остаются)
...
Рейтинг: 0 / 0
Удалить двойные пустые строки в edit
    #38084826
Ganjubas
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
[/quot]Если строка пустая - значит, она пустая. [/quot]

Да, строки пустые
...
Рейтинг: 0 / 0
Удалить двойные пустые строки в edit
    #38084833
IgorNG
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Ganjubastanglir
Код: sql
1.
2.
3.
local lcLineSeparator
lcLineSeparator=chr(13)
edit.text=strtran(edit.text,replicate(lcLineSeparator,2),lcLineSeparator)



Показывает ошибку "PROPERTY TEXT iz read only"

поменял
Код: sql
1.
edit.text

на
Код: sql
1.
edit.value

не работает (т.е. двойные пустые строки также остаются)

В каком свойстве/событии этот код? Надеюсь, this или thisform не забыли добавить?
...
Рейтинг: 0 / 0
Удалить двойные пустые строки в edit
    #38084848
tanglir
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
подозреваю, что с
Код: sql
1.
lcLineSeparator=CHR(10)+chr(13)

всё заработает.
...
Рейтинг: 0 / 0
Удалить двойные пустые строки в edit
    #38084869
Jonny540
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
tanglirподозреваю, что с
Код: sql
1.
lcLineSeparator=CHR(10)+chr(13)

всё заработает.Хм...
Код: plsql
1.
lсEdit='sdfsdfsdf'+chr(13)+'dsdfs'+chr(10)+chr(10)+'2134'+chr(13)+chr(10)+chr(10)+chr(13)+'vbnvb'

Как тебе такой вариант?
...
Рейтинг: 0 / 0
Удалить двойные пустые строки в edit
    #38084875
Ganjubas
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
tanglirподозреваю, что с
Код: sql
1.
lcLineSeparator=CHR(10)+chr(13)

всё заработает.

Да), работает. Спасибо
...
Рейтинг: 0 / 0
Удалить двойные пустые строки в edit
    #38084880
tanglir
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Jonny540Как тебе такой вариант?"Сдуру и х** сломать можно"
...
Рейтинг: 0 / 0
Удалить двойные пустые строки в edit
    #38084889
Ganjubas
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Jonny540tanglirподозреваю, что с
Код: sql
1.
lcLineSeparator=CHR(10)+chr(13)

всё заработает.Хм...
Код: plsql
1.
lсEdit='sdfsdfsdf'+chr(13)+'dsdfs'+chr(10)+chr(10)+'2134'+chr(13)+chr(10)+chr(10)+chr(13)+'vbnvb'

Как тебе такой вариант?

В моем случае это не грозит), т.к. копируемый текст разный, но формат везде одинаковый
...
Рейтинг: 0 / 0
Удалить двойные пустые строки в edit
    #38084915
Ganjubas
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
А как в этом же edit сделать так, чтоб строки автоматически не переносились на след. строку, т.е. чтоб строки выводились во всю длину даже если ширина edita намного меньше длины строки. Ну как в gride
...
Рейтинг: 0 / 0
Удалить двойные пустые строки в edit
    #38084923
IgorNG
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
GanjubasА как в этом же edit сделать так, чтоб строки автоматически не переносились на след. строку, т.е. чтоб строки выводились во всю длину даже если ширина edita намного меньше длины строки. Ну как в gride

Замени EditBox на TextBox :)
...
Рейтинг: 0 / 0
Удалить двойные пустые строки в edit
    #38085098
Ganjubas
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
IgorNGGanjubasА как в этом же edit сделать так, чтоб строки автоматически не переносились на след. строку, т.е. чтоб строки выводились во всю длину даже если ширина edita намного меньше длины строки. Ну как в gride

Замени EditBox на TextBox :)

а другого способа не не?
...
Рейтинг: 0 / 0
Удалить двойные пустые строки в edit
    #38085126
IgorNG
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Ganjubas,

Height = 23 (или какое значение у тебя для стандартного TextBox)
...
Рейтинг: 0 / 0
17 сообщений из 17, страница 1 из 1
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Удалить двойные пустые строки в edit
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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