Вверх ↑
Этот топик читают: Гость
Разработчик
Ответов: 4698
Рейтинг: 426
#1: 2009-04-12 10:04:51 ЛС | профиль | цитата
Вот тестовый, работающий редактор текста, с возможностью вставки переменных(это полезно, если вам надо постоянно печатать одну и туже длинную строчку), одна переменная встроена для показа возможности
--старая версия, см ниже--
------------ Дoбавленo в 11.01:
Подправил загрузку и сохранение переменных
карма: 10
0
Ответов: 5227
Рейтинг: 587
#2: 2009-04-12 11:26:35 ЛС | профиль | цитата
без бутылки непонять.
карма: 4
Мой форум - http://hiasm.bbtalk.me/ схемы, компоненты...
0
Администрация
Ответов: 15295
Рейтинг: 1519
#3: 2009-04-12 13:53:27 ЛС | профиль | цитата
схема больно сложной выглядит для такой простой задачи
карма: 26
0
Разработчик
Ответов: 4698
Рейтинг: 426
#4: 2009-04-13 19:55:04 ЛС | профиль | цитата
Кому непонятно, разъесняю для чего нужна прога:
Например у вас есть строка "я хотел бы успеть", ставим ее в переменную "1". Затем пишем в левом мемо "[1] сделать работу, [1] пойти в кино, [1] ..." и получим "я хотел бы успеть сделать работу, я хотел бы успеть пойти в кино, ..."
На счет оптимизации схемы я работаю...
------------ Дoбавленo в 20.32:
Не подкинете мысль уменьшения схемы? никак не могу ничего придумать...
карма: 10
0
Администрация
Ответов: 15295
Рейтинг: 1519
#5: 2009-04-13 21:40:56 ЛС | профиль | цитата
вот так не катит?

Add(Memo,7533379,378,35)
{
Left=50
Top=5
Width=320
Height=115
Strings=#45:[1] сделать работу, [1] пойти в кино, [1] ...|3:[9]|
}
Add(Button,16217689,266,175)
{
Top=120
Width=40
link(onClick,16504913:doEvent1,[])
}
Add(StrList,10635786,350,98)
{
Strings=#3:[1]|3:[9]|
}
Add(StrList,15451542,399,98)
{
Strings=#17:я хотел бы успеть|16:Ваш, Иванов И.И.|
}
Add(ArrayEnum,7476563,364,238)
{
link(onItem,10647968:doRead,[])
link(onEndEnum,7686818:doData,[(407,251)(407,279)])
link(Array,10635786:Array,[])
}
Add(Memo,15334179,581,252)
{
Left=50
Top=130
Width=320
Height=125
}
Add(Memory,4076055,469,175)
{
Point(Data)
}
Add(Hub,16504913,322,175)
{
link(onEvent1,10753351:doData,[])
link(onEvent2,7476563:doEnum,[(350,188)(350,244)])
}
Add(Replace,2168681,469,238)
{
link(onReplace,11149988:doWork1,[(512,244)(512,163)(452,163)])
link(Str,7935661:Var2,[])
link(Sub_str,7476563:Item,[(482,226)(452,226)(452,289)(370,289)])
}
Add(HubEx,11149988,448,168)
{
link(onEvent,4076055:doValue,[])
}
Add(ArrayRW,10647968,413,238)
{
link(onRead,2168681:doReplace,[])
link(Array,15451542:Array,[])
link(Index,7476563:Index,[(426,226)(402,226)(402,282)(377,282)])
}
Add(GetDataEx,7935661,462,210)
{
link(Data,4076055:Value,[])
}
Add(DoData,7686818,525,273)
{
link(onEventData,15334179:doText,[])
link(Data,7935661:Var3,[(531,219)])
}
Add(DoData,10753351,378,175)
{
link(onEventData,11149988:doWork2,[])
link(Data,7533379:Text,[])
}
карма: 26
1
Голосовали:Assasin
Разработчик
Ответов: 4698
Рейтинг: 426
#6: 2009-04-13 21:51:10 ЛС | профиль | цитата
Катит!
------------ Дoбавленo в 21.56:
Да, только у меня-то можно несколько строк в одну переменную, а у вас одну! Попробуйте добавить к вашему примеру и к моему вот это:
"Я хотел бы:
1. успеть
2. доделать"
карма: 10
0
Ответов: 485
Рейтинг: 86
#7: 2009-04-13 22:52:51 ЛС | профиль | цитата
Assasin писал(а):
Попробуйте добавить к вашему примеру и к моему вот это:

Переменную записать так:

я хотел бы:|1. успеть|2. доделать
и добавить после ArrayRW:

Add(Replace,3533073,420,301)
{
SubStr="|"
DestStr="
"
}
карма: 0

1
Голосовали:Administrator
Администрация
Ответов: 15295
Рейтинг: 1519
#8: 2009-04-13 23:01:16 ЛС | профиль | цитата
именно
карма: 26
0
Разработчик
Ответов: 4698
Рейтинг: 426
#9: 2009-04-14 08:42:55 ЛС | профиль | цитата
Ладно, признаюсь, вы правы, но делать ошибки-то никто не запрещает(век живи - век учись)
------------ Дoбавленo в 13.13:
Сделал под Ваши примеры(выше)
карма: 10
0
Разработчик
Ответов: 4698
Рейтинг: 426
#10: 2009-04-23 18:12:20 ЛС | профиль | цитата
Следующая версия -- добавлена функция замены текста на переменные(пишешь название переменной, строку, которую надо заменить и он меняет ее на переменную)
code_12957.txt
карма: 10
0
файлы: 1code_12957.txt [11.9KB] [262]
10
Сообщение
...
Прикрепленные файлы
(файлы не залиты)