Вверх ↑
Этот топик читают: Гость
Ответов: 3851
Рейтинг: 159
#1: 2008-05-24 21:58:07 ЛС | профиль | цитата
удобно, и сделать несложно вроде, а вот сходу ниасилил: code_9133.txt. Предлагайте..
карма: 0
начавший
0
файлы: 1code_9133.txt [936B] [232]
Гость
Ответов: 17029
Рейтинг: 0
#2: 2008-05-24 22:44:57 правка | ЛС | профиль | цитата


Редактировалось 1 раз(а), последний 2017-03-03 12:15:28
карма: 0

0
Ответов: 3851
Рейтинг: 159
#3: 2008-05-24 23:08:05 ЛС | профиль | цитата
новый взгляд на старую проблему. С надежой ..
карма: 0
начавший
0
Ответов: 8928
Рейтинг: 823
#4: 2008-05-25 00:24:52 ЛС | профиль | цитата
Андрей., символы 10 и 13 тоже входят в подсчёт на нижней точке, а положение курсора считается без них, поэтому, чем больше номер строки, тем больше ошибка, но если перед подсчётом в строке удалить эти разделители, ошибка тоже будет, поменьше и с другим знаком
Почему бы не использовать перебор массива?
карма: 19

0
Ответов: 205
Рейтинг: 3
#5: 2008-05-25 00:40:59 ЛС | профиль | цитата
а если запретить вставлять символы 10 и 13 !!! (в свойствах RichEdit --->insertCRLF)
карма: 1

0
Ответов: 3851
Рейтинг: 159
#6: 2008-05-25 11:56:59 ЛС | профиль | цитата
Леонид писал(а):
символы 10 и 13 тоже входят в подсчёт на нижней точке, а положение курсора считается без них,
не справедливо однако, предлагаю добавить соответствующую опцию либо в RichEdit либо/и в Position..

millano писал(а):
а если запретить вставлять символы 10 и 13
ключевое слово здесь - вставлять, это очень частный случай. В более общем случае приходится иметь дело с загружаемым из файла текстом. Да и вообще - не зря придуманы эти символы, а отказываться от них - значит ограничивать себя..

------------ Дoбавленo:


[quote=Леонид]Почему бы не использовать перебор массива[/quote]какая-то ерунда получается нечитаемая:

Add(RichEdit,5606174,462,189)
{
Left=10
Top=55
Width=125
Height=95
Strings=#8:один два|10:три четыре|10:пять шесть|11:семь восемь|13:девять десять|
Point(doSetSelStart)
Point(doSetSelLength)
}
Add(ArrayEnum,14712344,476,280)
{
link(onItem,13227244:doAdd,[])
link(Array,5606174:Array,[])
}
Add(Button,6158690,406,280)
{
Left=75
Top=25
Caption="найти"
link(onClick,14712344:doEnum,[])
}
Add(Memo,13227244,546,280)
{
Left=240
Top=60
Width=125
Height=130
}
это только у меня?
карма: 0
начавший
0
Ответов: 8928
Рейтинг: 823
#7: 2008-05-25 13:03:33 ЛС | профиль | цитата
Андрей., это происки nesco
code_9136.txt
карма: 19

0
файлы: 1code_9136.txt [659B] [246]
Ответов: 3851
Рейтинг: 159
#8: 2008-05-25 13:24:09 ЛС | профиль | цитата
мля, что за выходные - одно расстройство (или два?)..
карма: 0
начавший
0
Разработчик
Ответов: 26163
Рейтинг: 2127
#9: 2008-05-25 14:12:49 ЛС | профиль | цитата
Леонид писал(а):
это происки nesco

А я то здесь причем
Я ни один из этих компонентов не правил

------------ Дoбавленo:


RichEdit не понимает в таком режиме кириллицу (а черт его знает почему)



Add(MainForm,9989163,231,301)
{
Left=20
Top=105
}
Add(RichEdit,5606174,287,301)
{
Left=85
Top=60
Width=125
Height=95
Strings=#5:Andre|10:три четыре|10:пять шесть|11:семь восемь|13:девять десять|
Point(doSetSelStart)
Point(doSetSelLength)
}
Add(ArrayEnum,14712344,301,385)
{
link(onItem,13227244:doAdd,[])
link(Array,5606174:Array,[])
}
Add(Button,6158690,231,385)
{
Left=85
Top=25
Caption="найти"
link(onClick,14712344:doEnum,[])
}
Add(Memo,13227244,371,385)
{
Left=215
Top=60
Width=125
Height=130
}

карма: 22

0
Ответов: 16884
Рейтинг: 1239
#10: 2008-05-25 14:15:08 ЛС | профиль | цитата
nesco писал(а):
А я то здесь причем ?
Я ни один из этих компонентов не правил
А какое это имеет значение. "Встретил рационализатора" и т.д.
Леонид видно по инерции.
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
Ответов: 8928
Рейтинг: 823
#11: 2008-05-25 14:28:27 ЛС | профиль | цитата
nesco, ну извини
Tad, я не имею морального права поддерживать это выражение, т. к. в своё время рационализаторство помогало мне финансово обеспечивать (в советское время) школьный радиокружок (не при жене будь сказано).
карма: 19

0
Разработчик
Ответов: 26163
Рейтинг: 2127
#12: 2008-05-25 14:38:56 ЛС | профиль | цитата
А мне кажется, что "рационализаторство" приводит к возникновению "глубокой модернизации" (вот это то самое, чем и занимается... ну сами знаете кто)
карма: 22

0
Ответов: 16884
Рейтинг: 1239
#13: 2008-05-25 15:53:15 ЛС | профиль | цитата
nesco,
Библия учит любить ближнего своего, а Кама-Сутра объясняет как именно.
Имен не называешь - боишся, что бы не полюбили по Кама-Сутре ? Может ты и правый... , а может левый...
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
Разработчик
Ответов: 26163
Рейтинг: 2127
#14: 2008-05-25 16:02:13 ЛС | профиль | цитата
Tad писал(а):
Имен не называешь - боишся

Нет, просто исполняю просьбу того, кто это просил.

Tad писал(а):
Может ты и правый... , а может левый...

А может, это -- дипломатия, зачем обострять конфронтацию
карма: 22

0
Ответов: 16884
Рейтинг: 1239
#15: 2008-05-25 16:12:18 ЛС | профиль | цитата
Политкорректность придумал шайтан, для того чтобы честные люди не могли называть вещи своими именами...

карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
Сообщение
...
Прикрепленные файлы
(файлы не залиты)