Вверх ↑
Этот топик читают: Гость
Ответов: 1528
Рейтинг: 57
#1: 2011-03-03 11:41:32 ЛС | профиль | цитата
нужно убрать пробел при добавлении записи через Enter
code_22762.txt
карма: 0

0
файлы: 1code_22762.txt [2.9KB] [106]
Ответов: 4641
Рейтинг: 334
#2: 2011-03-03 11:46:31 ЛС | профиль | цитата
Trim
карма: 1
Время верстки: %cr_time% Текущее время: %time%
0
Ответов: 1528
Рейтинг: 57
#3: 2011-03-03 11:49:49 ЛС | профиль | цитата
Ravilr, ну и подскажи сразу обозначение перехода на новую строку
карма: 0

0
Ответов: 1841
Рейтинг: 370
#4: 2011-03-03 11:51:26 ЛС | профиль | цитата
Replace
карма: 1
0
Ответов: 4641
Рейтинг: 334
#5: 2011-03-03 11:52:47 ЛС | профиль | цитата
CriDos писал(а):
Replace


карма: 1
Время верстки: %cr_time% Текущее время: %time%
0
Ответов: 1841
Рейтинг: 370
#6: 2011-03-03 11:53:20 ЛС | профиль | цитата
hitman249 писал(а):
обозначение перехода на новую строку



карма: 1
0
Ответов: 1528
Рейтинг: 57
#7: 2011-03-03 12:18:41 ЛС | профиль | цитата
Trim, Replace не удаляют или даже при пустом значении происходит событие
почему при очищении каретка всёравно находится на 2рой строке ?
------------ Дoбавленo в 12.18:
вот нашёл универсальное решение, но вопрос с кареткой актуален
Add(MainForm,2953706,308,154)
{
Width=568
Height=404
}
Add(ChildPanel,12151764,371,210)
{
}
BEGIN_SDK
Add(EditMulti,10331068,21,21)
{
EventCount=1
WorkCount=1
Width=601
}
Add(Panel,3854043,28,28)
{
Top=282
Width=560
Height=35
Align=4
ColorSp=-16777200
BevelInner=0
Point(doTop)
}
Add(RadioButtonRush,13826791,35,98)
{
Width=65
Caption="Продам"
}
Add(RadioButtonRush,1766775,77,98)
{
Left=65
Width=60
Caption="Куплю"
}
Add(RadioButtonRush,14745245,119,98)
{
Left=125
Width=70
Caption="Закупаю"
}
Add(RadioButtonRush,15806977,161,98)
{
Left=195
Width=60
Caption="Сниму"
}
Add(RadioButtonRush,4513574,203,98)
{
Left=255
Width=60
Caption="Услуги"
}
Add(RadioButtonRush,6254052,245,98)
{
Left=320
Width=80
Caption="Требуются"
}
Add(RadioButtonRush,9644204,287,98)
{
Left=400
Width=65
Caption="Утерян"
}
Add(RadioButtonRush,15651833,329,98)
{
Left=465
Width=65
Caption="Разное"
}
END_SDK
Add(RichEdit,15903853,371,154)
{
Width=560
Height=282
Align=5
Font=[Arial,8,0,0,1]
ScrollBars=2
}
Add(ChildPanel,8781407,371,252)
{
link(onEvent1,15903853:doAdd,[(415,258)(415,202)(359,202)(359,160)])
}
BEGIN_SDK
Add(EditMulti,1067065,21,21)
{
EventCount=1
WorkCount=1
}
Add(Panel,1457855,28,28)
{
Top=317
Width=560
Height=60
Align=4
ModeSp=1
ColorSp=-16777200
MinOwn=50
BevelInner=0
Point(doTop)
}
Add(ButtonRush,5885183,28,98)
{
Left=431
Top=1
Width=128
Height=49
Align=3
Font=[Arial,16,0,0,204]
UpdateSpeed=1
Caption="Добавить"
Glyphs=[]
link(onClick,5990698:doWork2,[])
}
Add(RichEdit,1079653,119,42)
{
Left=1
Top=1
Width=430
Height=49
Align=5
Font=[Arial,8,0,0,1]
ScrollBars=2
Point(onKeyDown)
link(onKeyDown,3112524:doCase,[(187,55)(187,62)])
}
Add(ArrayEnum,2088664,196,175)
{
link(onItem,5624360:doCase,[])
link(onEndEnum,6769418:doEvent1,[(238,188)(238,165)(164,165)(164,41)])
link(Array,10477095:Array,[])
}
Add(StrList,10477095,182,77)
{
}
Add(DoData,10466019,119,98)
{
link(onEventData,10477095:doText,[])
link(Data,1079653:Text,[])
}
Add(Hub,1507261,77,98)
{
link(onEvent1,10466019:doData,[])
link(onEvent2,2088664:doEnum,[(143,111)(143,181)])
}
Add(Hub,6769418,189,35)
{
link(onEvent1,1079653:doClear,[(216,41)(216,33)(107,33)(107,55)])
link(onEvent2,10477095:doClear,[(215,48)(215,69)(170,69)(170,90)])
}
Add(Case,3112524,224,56)
{
Value=Integer(13)
link(onTrue,5990698:doWork1,[(267,69)(267,94)(67,94)])
}
Add(HubEx,5990698,63,98)
{
link(onEvent,1507261:doEvent1,[])
}
Add(Case,5624360,252,175)
{
Value=String()
link(onNextCase,1067065:onEvent1,[(302,181)(302,27)])
}
END_SDK
карма: 0

0
Ответов: 1841
Рейтинг: 370
#8: 2011-03-03 12:22:20 ЛС | профиль | цитата
hitman249 писал(а):
почему при очищении

очищении чего?
hitman249 писал(а):
просто удалить лишнюю строчку при копировании?

откуда удалить?
hitman249 писал(а):
Trim, Replace не удаляют или даже при пустом значении происходит событие

кого не удаляет? переносы или пробелы?
В какой части схемы ты использовал выше указанные компоненты?
карма: 1
0
Ответов: 1528
Рейтинг: 57
#9: 2011-03-03 12:34:01 ЛС | профиль | цитата
CriDos,
hitman249 писал(а):
нашёл универсальное решение

остался только один вопрос, почему в поле ввода при очищении каретка остаётся на второй строке?
------------ Дoбавленo в 12.33:
маленько не красивый с точки зрения реализации, но рабочий вариант, если кому интересно
Add(MainForm,10836024,238,224)
{
Width=568
Height=404
}
Add(ChildPanel,8781407,301,322)
{
link(onEvent1,15903853:doAdd,[(345,328)(345,272)(289,272)(289,230)])
}
BEGIN_SDK
Add(EditMulti,1067065,21,21)
{
EventCount=1
WorkCount=1
}
Add(Panel,1457855,28,28)
{
Top=317
Width=560
Height=60
Align=4
ModeSp=1
ColorSp=-16777200
MinOwn=50
BevelInner=0
Point(doTop)
}
Add(ButtonRush,5885183,28,98)
{
Left=431
Top=1
Width=128
Height=49
Align=3
Font=[Arial,16,0,0,204]
UpdateSpeed=1
Caption="Добавить"
Glyphs=[]
link(onClick,5990698:doWork2,[])
}
Add(RichEdit,1079653,119,42)
{
Left=1
Top=1
Width=430
Height=49
Align=5
Font=[Arial,8,0,0,1]
ScrollBars=2
Point(onKeyDown)
link(onKeyDown,3112524:doCase,[(187,55)(187,62)])
}
Add(ArrayEnum,2088664,196,140)
{
link(onItem,6238346:doCase,[])
link(onEndEnum,6769418:doEvent1,[(238,153)(238,133)(164,133)(164,41)])
link(Array,10477095:Array,[])
}
Add(StrList,10477095,182,77)
{
}
Add(DoData,10466019,119,98)
{
link(onEventData,10477095:doText,[])
link(Data,1079653:Text,[])
}
Add(Hub,1507261,77,98)
{
OutCount=3
link(onEvent1,10466019:doData,[])
link(onEvent3,2088664:doEnum,[(98,118)(98,146)])
}
Add(Hub,6769418,189,35)
{
link(onEvent1,1079653:doClear,[(216,41)(216,33)(107,33)(107,55)])
link(onEvent2,10477095:doClear,[(215,48)(215,69)(170,69)(170,90)])
}
Add(Case,3112524,217,56)
{
Value=Integer(13)
link(onTrue,8460180:doTimer,[])
}
Add(HubEx,5990698,63,98)
{
link(onEvent,1507261:doEvent1,[])
}
Add(Case,6238346,245,140)
{
Value=String()
link(onNextCase,1067065:onEvent1,[(299,146)(299,27)])
}
Add(Timer,8460180,259,63)
{
Interval=1
Enable=1
AutoStop=1
link(onTimer,5990698:doWork1,[(297,69)(297,94)(67,94)])
}
END_SDK
Add(ChildPanel,12151764,301,280)
{
}
BEGIN_SDK
Add(EditMulti,10331068,21,21)
{
EventCount=1
WorkCount=1
Width=601
}
Add(Panel,3854043,28,28)
{
Top=282
Width=560
Height=35
Align=4
ColorSp=-16777200
BevelInner=0
Point(doTop)
}
Add(RadioButtonRush,13826791,35,98)
{
Width=65
Caption="Продам"
}
Add(RadioButtonRush,1766775,77,98)
{
Left=65
Width=60
Caption="Куплю"
}
Add(RadioButtonRush,14745245,119,98)
{
Left=125
Width=70
Caption="Закупаю"
}
Add(RadioButtonRush,15806977,161,98)
{
Left=195
Width=60
Caption="Сниму"
}
Add(RadioButtonRush,4513574,203,98)
{
Left=255
Width=60
Caption="Услуги"
}
Add(RadioButtonRush,6254052,245,98)
{
Left=320
Width=80
Caption="Требуются"
}
Add(RadioButtonRush,9644204,287,98)
{
Left=400
Width=65
Caption="Утерян"
}
Add(RadioButtonRush,15651833,329,98)
{
Left=465
Width=65
Caption="Разное"
}
END_SDK
Add(RichEdit,15903853,301,224)
{
Width=560
Height=282
Align=5
Font=[Arial,8,0,0,1]
ScrollBars=2
}
карма: 0

0
Ответов: 1841
Рейтинг: 370
#10: 2011-03-03 12:34:34 ЛС | профиль | цитата
hitman249, у тебя точка onKeyDown задействована (событие происходит каждый рас при нажатии) и после очищение поля ввода когда ты отпускаешь клавишу добавляется перенос...
карма: 1
0
Ответов: 16884
Рейтинг: 1239
#11: 2011-03-03 12:53:53 ЛС | профиль | цитата
hitman249 писал(а):
нужно убрать пробел при добавлении записи через Enter
а попробовать RichEdit.InsertCRLF=False
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
Ответов: 1528
Рейтинг: 57
#12: 2011-03-03 13:51:24 ЛС | профиль | цитата
Tad, во первых не работает, а во вторых нельзя, эта функция мне нужна
карма: 0

0
Ответов: 16884
Рейтинг: 1239
#13: 2011-03-03 13:57:29 ЛС | профиль | цитата
Tad писал(а):
а попробовать RichEdit.InsertCRLF=False
у того, что на MainForm
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
13
Сообщение
...
Прикрепленные файлы
(файлы не залиты)