HiAsm
HiAsm
Вверх ↑
ФорумыПомощь по пакетуОграничить ввод в Edit ← Ctrl1234Ctrl →
Этот топик читают: Гость
Ответов: 50
Рейтинг: 2
#1: 2013-02-14 10:58:04 ЛС | профиль | цитата
Доброго времени суток,
Нужно организовать фильтр на ввод IP адреса в Edit на IC.
Ввод фильтрую чтобы можно было вводить только цифры и точку
#pas
For i:=1 to Length(ss) do if (ss[i] IN ['0'..'9','.']) then s:=s+ss[i];
а как запретить ввод чисел больше 255?
карма: 0

0
Ответов: 1528
Рейтинг: 57
#2: 2013-02-14 11:20:55 ЛС | профиль | цитата
Gorgar, так 

#cpp
^([1-9]|[1-9][0-9]|1[0-9][0-9]|2[0-4][0-9]|25[0-5]).([0-9]|[1-9][0-9]|1[0-9][0-9]|2[0-4][0-9]|25[0-5]).([0-9]|[1-9][0-9]|1[0-9][0-9]|2[0-4][0-9]|25[0-5]).([0-9]|[1-9][0-9]|1[0-9][0-9]|2[0-4][0-9]|25[0-5])$
регулярка для фильтра полного IP адреса с ограничением по 255
------------ Дoбавленo в 11.20:
[offtop]
Правда жизни писал(а):
:=
ничего никому не напоминает? паскаль такой паскаль.. [/offtop]
карма: 0

0
Ответов: 50
Рейтинг: 2
#3: 2013-02-14 11:44:18 ЛС | профиль | цитата
Это для RE_Search?
карма: 0

0
Ответов: 1528
Рейтинг: 57
#4: 2013-02-14 12:01:12 ЛС | профиль | цитата
Gorgar, 

Add(Edit,1005618,385,161)
{
 Left=50
 Top=35
 Width=175
 Text=""
}
Add(RE_Search,5193400,385,217)
{
 Expression="^([1-9]|[1-9][0-9]|1[0-9][0-9]|2[0-4][0-9]|25[0-5]).([0-9]|[1-9][0-9]|1[0-9][0-9]|2[0-4][0-9]|25[0-5]).([0-9]|[1-9][0-9]|1[0-9][0-9]|2[0-4][0-9]|25[0-5]).([0-9]|[1-9][0-9]|1[0-9][0-9]|2[0-4][0-9]|25[0-5])$"
 link(onMatch,11521963:doMessage,[(439,223)(439,188)])
 link(onNotFound,11049983:doMessage,[(439,230)(439,237)])
 link(SourceStr,1005618:Text,[])
}
Add(Button,16480759,322,217)
{
 Left=50
 Top=65
 link(onClick,5193400:doExec,[])
}
Add(Message,11521963,462,182)
{
 Message="я воль!"
}
Add(Message,11049983,462,231)
{
 Message="найн!"
}
карма: 0

0
Ответов: 50
Рейтинг: 2
#5: 2013-02-14 12:22:23 ЛС | профиль | цитата
Спасибо, это конечно хорошо, но мне нужно чтобы пользователь не мог ввести число больше 255 во время введения, а не проверять правильность после ввода.
карма: 0

0
Разработчик
Ответов: 26170
Рейтинг: 2127
#6: 2013-02-14 12:50:11 ЛС | профиль | цитата
Как-то так можно

Add(MainForm,2953706,112,105)
{
}
Add(Edit,11572657,175,105)
{
 Left=30
 Top=20
 Width=195
 Text=""
 ClearAfterEnter=1
 link(onChange,6195253:doEnum,[(214,111)(214,167)(165,167)(165,174)])
}
Add(Str_Enum,6195253,175,168)
{
 Delimiter="."
 link(onEnum,9065143:doConvert,[])
 link(String,8526061:Var2,[])
}
Add(If_else,6303399,273,168)
{
 Type=3
 Op2=Integer(255)
 link(onTrue,9743724:doCompare,[])
 link(onFalse,13056154:doWork2,[(326,181)(326,216)])
}
Add(Convertor,9065143,224,168)
{
 Mode=1
 link(onResult,6303399:doCompare,[])
}
Add(Delete,14040573,511,210)
{
 Count=1
 Direction=1
 link(onDelete,11572657:doText2,[(550,216)(550,104)(165,104)(165,118)])
 link(Str,11040099:Var3,[(517,145)])
}
Add(GetDataEx,8526061,175,140)
{
 link(Data,11572657:Text,[])
}
Add(If_else,9743724,336,168)
{
 Op2=Integer(4)
 link(onTrue,1475775:doCopy,[])
 link(Op1,6195253:NumSubStr,[(342,152)(265,152)(265,208)(181,208)])
}
Add(HubEx,13056154,483,210)
{
 link(onEvent,14040573:doDelete,[])
}
Add(Copy,1475775,385,168)
{
 Position=1
 Count=1
 Direction=1
 link(onCopy,10067704:doCompare,[])
 link(Str,11040099:Var2,[])
}
Add(GetDataEx,11040099,385,140)
{
 Angle=3
 link(Data,8526061:Var3,[])
}
Add(StrMask,10067704,434,168)
{
 Mask="#"
 link(onFalse,13056154:doWork1,[(487,174)])
}
карма: 22

0
Ответов: 50
Рейтинг: 2
#7: 2013-02-14 15:13:00 ЛС | профиль | цитата
nesco писал(а):
Как-то так можно

Спасибо! То что надо.
А как бы ещё в этой схеме буквы фильтровать чтобы не заморачиватся с IC?
карма: 0

0
Разработчик
Ответов: 26170
Рейтинг: 2127
#8: 2013-02-14 15:39:48 ЛС | профиль | цитата
Как-то вот так, если не использовать регулярку

Add(MainForm,2953706,112,105)
{
}
Add(Edit,11572657,175,105)
{
 Left=30
 Top=20
 Width=195
 Text=""
 ClearAfterEnter=1
 link(onChange,6195253:doEnum,[(214,111)(214,167)(165,167)(165,174)])
}
Add(Str_Enum,6195253,175,168)
{
 Delimiter="."
 link(onEnum,9609599:doCompare,[])
 link(String,8526061:Var2,[])
}
Add(If_else,6303399,469,175)
{
 Type=3
 Op2=Integer(255)
 link(onTrue,1475775:doCopy,[])
 link(onFalse,7812735:doWork1,[(515,188)])
}
Add(Convertor,9065143,413,175)
{
 Mode=1
 link(onResult,6303399:doCompare,[])
}
Add(Delete,14040573,707,238)
{
 Count=1
 Direction=1
 link(onDelete,11572657:doText2,[(756,244)(756,92)(165,92)(165,118)])
 link(Str,11040099:Var3,[(713,145)])
}
Add(GetDataEx,8526061,175,140)
{
 link(Data,11572657:Text,[])
}
Add(If_else,9743724,630,175)
{
 Op2=Integer(4)
 link(onTrue,13056154:doWork1,[(683,181)])
 link(Op1,6195253:NumSubStr,[(636,159)(461,159)(461,208)(181,208)])
}
Add(HubEx,13056154,679,238)
{
 link(onEvent,14040573:doDelete,[])
}
Add(Copy,1475775,525,175)
{
 Position=1
 Count=1
 Direction=1
 link(onCopy,10067704:doCompare,[])
 link(Str,11040099:Var2,[])
}
Add(GetDataEx,11040099,525,140)
{
 Angle=3
 link(Data,8526061:Var3,[])
}
Add(StrMask,10067704,574,175)
{
 Mask="#"
 link(onFalse,9743724:doCompare,[])
}
Add(StrMask,9609599,224,168)
{
 Mask="###"
 link(onFalse,8600542:doCompare,[])
 link(onTrue,1932215:doWork2,[(263,181)(263,167)])
}
Add(StrMask,8600542,280,168)
{
 Mask="##"
 link(onFalse,2041208:doCompare,[])
 link(onTrue,1932215:doWork3,[(319,181)])
}
Add(StrMask,2041208,336,168)
{
 Mask="#"
 link(onFalse,7812735:doWork2,[(375,174)(375,244)])
 link(onTrue,14347223:doWork2,[])
}
Add(HubEx,7812735,511,238)
{
 link(onEvent,13056154:doWork2,[])
}
Add(HubEx,14347223,392,175)
{
 link(onEvent,9065143:doConvert,[])
}
Add(HubEx,1932215,315,161)
{
 link(onEvent,14347223:doWork1,[(396,167)])
}
карма: 22

0
Ответов: 16884
Рейтинг: 1239
#9: 2013-02-14 16:43:20 ЛС | профиль | цитата
nesco, если
nesco писал(а):
Как-то вот так
то даже не как-то.
Набираем 123.99, потом исправляем 1 на 9 и получаем в Edit 923.9 (что значительн отличается от 255)
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
Разработчик
Ответов: 26170
Рейтинг: 2127
#10: 2013-02-14 17:16:21 ЛС | профиль | цитата
Tad писал(а):
Набираем 123.99, потом исправляем 1 на 9 и получаем в Edit 923.9

Как вариант -- надо запретить перемещение курсора. Да это простенький пример на скорую руку. А ты, если такой умный, возьми и приведи свою схему, а мы посмотрим
------------ Дoбавленo в 17.16:
Можно вот так сделать, не в одном Edit. Опять-таки -- это просто пример

Add(MainForm,12711339,140,140)
{
}
Add(ChildPanel,660501,203,140)
{
}
BEGIN_SDK
  Add(EditMulti,6383351,21,21)
  {
   Width=545
   Height=501
  }
  Add(Panel,8247545,35,105)
  {
   Left=15
   Top=10
   Width=185
   Height=20
   BevelInner=0
  }
  Add(Edit,15438086,105,105)
  {
   Width=35
   Color=16777215
   Font=[Verdana,10,1,0,204]
   WinStyle=1
   Text=""
   Alignment=1
   ClearAfterEnter=1
   link(onChange,15798036:doCompare,[])
  }
  Add(Edit,3161263,105,210)
  {
   Left=50
   Width=35
   Color=16777215
   Font=[Verdana,10,1,0,204]
   WinStyle=1
   Text=""
   Alignment=1
   ClearAfterEnter=1
   link(onChange,5900746:doCompare,[])
  }
  Add(Edit,14650819,105,315)
  {
   Left=100
   Width=35
   Color=16777215
   Font=[Verdana,10,1,0,204]
   WinStyle=1
   Text=""
   Alignment=1
   ClearAfterEnter=1
   link(onChange,9156022:doCompare,[])
  }
  Add(Edit,6358266,105,420)
  {
   Left=150
   Width=35
   Color=16777215
   Font=[Verdana,10,1,0,204]
   WinStyle=1
   Text=""
   Alignment=1
   ClearAfterEnter=1
   link(onChange,12458889:doCompare,[])
  }
  Add(Label,6427186,147,28)
  {
   Left=40
   Top=2
   Width=9
   Height=20
   Font=[Verdana,10,1,0,204]
   Caption="."
  }
  Add(Label,6193661,154,35)
  {
   Left=90
   Top=2
   Width=9
   Height=20
   Font=[Verdana,10,1,0,204]
   Caption="."
  }
  Add(Label,5334392,161,42)
  {
   Left=140
   Top=2
   Width=9
   Height=20
   Font=[Verdana,10,1,0,204]
   Caption="."
  }
  Add(If_else,5991795,392,112)
  {
   Type=3
   Op2=Integer(255)
   link(onFalse,5020617:doWork1,[(438,125)])
  }
  Add(Convertor,4970047,343,112)
  {
   Mode=1
   link(onResult,5991795:doCompare,[])
  }
  Add(Delete,4896428,455,154)
  {
   Count=1
   Direction=1
   link(onDelete,15438086:doText,[(494,160)(494,97)(95,97)(95,111)])
   link(Str,15438086:Text,[(461,145)(111,145)])
  }
  Add(StrMask,15798036,161,105)
  {
   Mask="###"
   link(onFalse,10987628:doCompare,[])
   link(onTrue,12414991:doWork2,[(200,118)(200,104)])
  }
  Add(StrMask,10987628,217,105)
  {
   Mask="##"
   link(onFalse,5395400:doCompare,[])
   link(onTrue,12414991:doWork3,[(256,118)])
  }
  Add(StrMask,5395400,273,105)
  {
   Mask="#"
   link(onFalse,5020617:doWork2,[(312,111)(312,160)])
   link(onTrue,6258641:doWork2,[])
  }
  Add(HubEx,5020617,434,154)
  {
   link(onEvent,4896428:doDelete,[])
  }
  Add(HubEx,6258641,322,112)
  {
   link(onEvent,4970047:doConvert,[])
  }
  Add(HubEx,12414991,252,98)
  {
   link(onEvent,6258641:doWork1,[(326,104)])
  }
  Add(If_else,2809257,392,217)
  {
   Type=3
   Op2=Integer(255)
   link(onFalse,8032995:doWork1,[(438,230)])
  }
  Add(Convertor,8929182,343,217)
  {
   Mode=1
   link(onResult,2809257:doCompare,[])
  }
  Add(Delete,1060653,455,259)
  {
   Count=1
   Direction=1
   link(onDelete,3161263:doText,[(494,265)(494,202)(95,202)(95,216)])
   link(Str,3161263:Text,[(461,250)(111,250)])
  }
  Add(StrMask,5900746,161,210)
  {
   Mask="###"
   link(onFalse,11763454:doCompare,[])
   link(onTrue,2627364:doWork2,[(200,223)(200,209)])
  }
  Add(StrMask,11763454,217,210)
  {
   Mask="##"
   link(onFalse,15616441:doCompare,[])
   link(onTrue,2627364:doWork3,[(256,223)])
  }
  Add(StrMask,15616441,273,210)
  {
   Mask="#"
   link(onFalse,8032995:doWork2,[(312,216)(312,265)])
   link(onTrue,6795848:doWork2,[])
  }
  Add(HubEx,8032995,434,259)
  {
   link(onEvent,1060653:doDelete,[])
  }
  Add(HubEx,6795848,322,217)
  {
   link(onEvent,8929182:doConvert,[])
  }
  Add(HubEx,2627364,252,203)
  {
   link(onEvent,6795848:doWork1,[(326,209)])
  }
  Add(If_else,11896549,392,322)
  {
   Type=3
   Op2=Integer(255)
   link(onFalse,5979773:doWork1,[(438,335)])
  }
  Add(Convertor,11131631,343,322)
  {
   Mode=1
   link(onResult,11896549:doCompare,[])
  }
  Add(Delete,12339573,455,364)
  {
   Count=1
   Direction=1
   link(onDelete,14650819:doText,[(494,370)(494,307)(95,307)(95,321)])
   link(Str,14650819:Text,[(461,355)(111,355)])
  }
  Add(StrMask,9156022,161,315)
  {
   Mask="###"
   link(onFalse,14267694:doCompare,[])
   link(onTrue,7049185:doWork2,[(200,328)(200,314)])
  }
  Add(StrMask,14267694,217,315)
  {
   Mask="##"
   link(onFalse,15134093:doCompare,[])
   link(onTrue,7049185:doWork3,[(256,328)])
  }
  Add(StrMask,15134093,273,315)
  {
   Mask="#"
   link(onFalse,5979773:doWork2,[(312,321)(312,370)])
   link(onTrue,10630800:doWork2,[])
  }
  Add(HubEx,5979773,434,364)
  {
   link(onEvent,12339573:doDelete,[])
  }
  Add(HubEx,10630800,322,322)
  {
   link(onEvent,11131631:doConvert,[])
  }
  Add(HubEx,7049185,252,308)
  {
   link(onEvent,10630800:doWork1,[(326,314)])
  }
  Add(If_else,7906106,392,427)
  {
   Type=3
   Op2=Integer(255)
   link(onFalse,10925005:doWork1,[(438,440)])
  }
  Add(Convertor,2538445,343,427)
  {
   Mode=1
   link(onResult,7906106:doCompare,[])
  }
  Add(Delete,1449422,455,469)
  {
   Count=1
   Direction=1
   link(onDelete,6358266:doText,[(494,475)(494,412)(95,412)(95,426)])
   link(Str,6358266:Text,[(461,460)(111,460)])
  }
  Add(StrMask,12458889,161,420)
  {
   Mask="###"
   link(onFalse,11944625:doCompare,[])
   link(onTrue,15219950:doWork2,[(200,433)(200,440)])
  }
  Add(StrMask,11944625,217,420)
  {
   Mask="##"
   link(onFalse,2888464:doCompare,[])
   link(onTrue,15219950:doWork3,[(256,433)])
  }
  Add(StrMask,2888464,273,420)
  {
   Mask="#"
   link(onFalse,10925005:doWork2,[(312,426)(312,475)])
   link(onTrue,12399090:doWork2,[])
  }
  Add(HubEx,10925005,434,469)
  {
   link(onEvent,1449422:doDelete,[])
  }
  Add(HubEx,12399090,322,427)
  {
   link(onEvent,2538445:doConvert,[])
  }
  Add(HubEx,15219950,252,434)
  {
   link(onEvent,12399090:doWork1,[(326,440)])
  }
END_SDK
карма: 22

0
Ответов: 50
Рейтинг: 2
#11: 2013-02-14 18:56:06 ЛС | профиль | цитата
nesco писал(а):
Как-то вот так, если не использовать регулярку

Спасибо,nesco, вот так лучше.
nesco писал(а):
Можно вот так сделать, не в одном Edit. Опять-таки -- это просто пример

Я сначала тоже так и делал на отдельных Edit`ах но минус в том что нужно ТАВ нажимать при вводе и вставить адрес с буфера нельзя
карма: 0

0
Разработчик
Ответов: 26170
Рейтинг: 2127
#12: 2013-02-14 18:59:24 ЛС | профиль | цитата
Gorgar писал(а):
вот так лучше

Но обнаруженный баг там так и остался. Надо бы его устранить, пока на ум не лезет "как". Подождем, может кто-то лучше сделает
карма: 22

0
Ответов: 16884
Рейтинг: 1239
#13: 2013-02-14 22:51:12 ЛС | профиль | цитата
А можно и так
code_30326.txt

------------ Дoбавленo в 21.41:
Gorgar писал(а):
вставить адрес с буфера нельзя
Кто сказал ?
------------ Дoбавленo в 22.51:
Вставляй сколько хош. Кто не даёт ? 

Add(MainForm,12029765,98,98)
{
 Width=371
 Height=93
 Caption="Ввод IP"
 BorderStyle=1
 Position=1
 link(onCreate,4914830:doWork1,[])
}
Add(ChildGroupBox,4914830,168,112)
{
}
BEGIN_SDK
  Add(EditMulti,310096,21,21)
  {
   WorkCount=1
   Width=573
   Height=494
   link(doWork1,10721222:doSetFocus,[(105,27)(105,146)])
  }
  Add(Label,1002684,49,308)
  {
   Left=10
   Top=15
   Width=110
   Height=25
   Font=[Arial,18,1,0,204]
   Caption="    .    .    . "
   AutoSize=1
  }
  Add(GroupBox,12013591,49,350)
  {
   Left=10
   Top=5
   Width=343
   Height=52
   Caption="Ввод IP"
  }
  Add(Edit,10721222,196,126)
  {
   Left=10
   Top=20
   Width=28
   Font=[Arial,8,1,0,204]
   TabOrder=1
   Text=""
   Alignment=2
   Point(doSetFocus)
   Point(doMaxLenField)
   link(onChange,1682614:doEvent1,[])
  }
  Add(Edit,203343,203,217)
  {
   Left=45
   Top=20
   Width=28
   Font=[Arial,8,1,0,204]
   TabOrder=2
   Text=""
   Alignment=2
   DataType=1
   MaxLenField=3
   Point(doSetFocus)
   link(onChange,1451458:doLength,[])
  }
  Add(Edit,200003,210,308)
  {
   Left=80
   Top=20
   Width=28
   Font=[Arial,8,1,0,204]
   TabOrder=3
   Text=""
   Alignment=2
   DataType=1
   MaxLenField=3
   Point(doSetFocus)
   link(onChange,9589152:doLength,[])
  }
  Add(Edit,9034583,217,392)
  {
   Left=115
   Top=20
   Width=28
   Font=[Arial,8,1,0,204]
   TabOrder=4
   Text=""
   Alignment=2
   DataType=1
   MaxLenField=3
   Point(doSetFocus)
   link(onChange,3344247:doLength,[])
  }
  Add(Length,147600,273,133)
  {
   link(onLength,4566986:doCompare,[])
  }
  Add(If_else,4566986,322,133)
  {
   Op2=Integer(3)
   link(onTrue,11522229:doCompare,[])
  }
  Add(If_else,11522229,378,133)
  {
   Type=1
   Op1=Integer(256)
   link(onTrue,11943500:doData,[(425,139)(425,115)(112,115)(112,139)])
   link(onFalse,203343:doSetFocus,[(424,146)(424,268)(189,268)(189,237)])
   link(Op2,1959219:Var3,[(391,121)(368,121)(368,173)])
  }
  Add(DoData,11943500,119,133)
  {
   Data=String()
   link(onEventData,14167634:doWork2,[])
  }
  Add(Length,1451458,273,217)
  {
   link(onLength,2395299:doCompare,[])
  }
  Add(If_else,2395299,322,217)
  {
   Op2=Integer(3)
   link(onTrue,4671211:doCompare,[])
  }
  Add(If_else,4671211,378,217)
  {
   Type=2
   Op2=Integer(255)
   link(onTrue,2888136:doData,[(417,223)(417,202)(117,202)(117,230)])
   link(onFalse,200003:doSetFocus,[(430,230)(430,351)(191,351)(191,328)])
   link(Op1,2251410:Var3,[(384,205)(368,205)(368,257)])
  }
  Add(DoData,2888136,126,224)
  {
   Data=String()
   link(onEventData,2985629:doWork2,[])
  }
  Add(Length,9589152,273,308)
  {
   link(onLength,4721293:doCompare,[])
  }
  Add(If_else,4721293,322,308)
  {
   Op2=Integer(3)
   link(onTrue,16660833:doCompare,[])
  }
  Add(If_else,16660833,378,308)
  {
   Type=2
   Op2=Integer(255)
   link(onTrue,6278796:doData,[(420,314)(420,293)(107,293)(107,321)])
   link(onFalse,9034583:doSetFocus,[(437,321)(437,442)(194,442)(194,412)])
   link(Op1,3210378:Var3,[(384,296)(371,296)(371,348)])
  }
  Add(DoData,6278796,112,315)
  {
   Data=String()
   link(onEventData,14623896:doWork2,[])
  }
  Add(Length,3344247,273,392)
  {
   link(onLength,3063908:doCompare,[])
  }
  Add(If_else,3063908,322,392)
  {
   Op2=Integer(3)
   link(onTrue,6562249:doCompare,[])
  }
  Add(If_else,6562249,378,392)
  {
   Type=2
   Op2=Integer(255)
   link(onTrue,7991448:doData,[(421,398)(421,373)(105,373)(105,405)])
   link(Op1,10053631:Var3,[(384,380)(368,380)(368,432)])
  }
  Add(DoData,7991448,112,399)
  {
   Data=String()
   link(onEventData,11315475:doWork2,[])
  }
  Add(Button,4641221,147,469)
  {
   Left=160
   Top=20
   Caption=">>>"
   link(onClick,5294825:doString,[])
  }
  Add(FormatStr,5294825,196,469)
  {
   DataCount=4
   Mask="%1.%2.%3.%4"
   link(onFString,10518623:doText,[])
   link(Str1,1959219:Var2,[])
   link(Str2,2251410:Var2,[])
   link(Str3,3210378:Var2,[])
   link(Str4,10053631:Var2,[])
  }
  Add(GetDataEx,10053631,217,427)
  {
   link(Data,9034583:Text,[])
  }
  Add(GetDataEx,3210378,210,343)
  {
   link(Data,200003:Text,[])
  }
  Add(GetDataEx,2251410,203,252)
  {
   link(Data,203343:Text,[])
  }
  Add(GetDataEx,1959219,196,168)
  {
   link(Data,10721222:Text,[])
  }
  Add(Hub,1682614,245,126)
  {
   link(onEvent1,14600087:doLength,[(266,132)(266,62)])
   link(onEvent2,147600:doLength,[])
  }
  Add(If_else,10058878,322,56)
  {
   Type=2
   Op2=Integer(3)
   link(onTrue,15765219:doEnum,[])
  }
  Add(Length,14600087,273,56)
  {
   link(onLength,10058878:doCompare,[])
  }
  Add(Str_Enum,15765219,378,56)
  {
   Delimiter="."
   Step=0
   link(onEnum,4885146:doEvent,[(421,62)(421,36)(37,36)(37,258)])
   link(String,1959219:Var1,[(384,46)(182,46)(182,173)])
  }
  Add(IndexToChanel,4885146,42,252)
  {
   Count=5
   Point(Index)
   link(onEvent2,3602351:doEvent1,[(79,265)(79,258)])
   link(onEvent3,2985629:doWork3,[(179,272)])
   link(onEvent4,14623896:doWork1,[(179,279)])
   link(Index,15765219:NumSubStr,[(48,102)(384,102)])
   link(onEvent5,11315475:doWork1,[(172,286)])
  }
  Add(HubEx,14167634,168,133)
  {
   link(onEvent,10721222:doText2,[])
  }
  Add(HubEx,2985629,175,224)
  {
   link(onEvent,203343:doText2,[])
  }
  Add(HubEx,14623896,175,315)
  {
   link(onEvent,200003:doText2,[])
  }
  Add(HubEx,11315475,168,399)
  {
   link(onEvent,9034583:doText2,[])
  }
  Add(Edit,10518623,259,469)
  {
   Left=225
   Top=20
   Width=109
   Height=19
   Color=-16777201
   Ctl3D=1
  }
  Add(DoData,1186545,119,168)
  {
   Data=Integer(3)
   link(onEventData,10721222:doMaxLenField,[(160,174)(160,153)])
  }
  Add(Hub,3602351,84,252)
  {
   link(onEvent1,1186545:doData,[(108,258)(108,174)])
   link(onEvent2,14167634:doWork3,[(172,265)])
  }
END_SDK
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
файлы: 1code_30326.txt [4.3KB] [228]
Ответов: 50
Рейтинг: 2
#14: 2013-02-15 21:48:08 ЛС | профиль | цитата
Спасибо всем за советы и примеры!
карма: 0

0
Ответов: 495
Рейтинг: 163
#15: 2013-03-05 19:37:57 ЛС | профиль | цитата
Всем привет! Новую тему не создавал, задача с которой столкнулся похожа.
В поле Edit вводим не IP , а время 00:00. Т.к. чувствую меня не в ту степь понесло ,
прошу помощи у Сопользователей ( Дать пинка в нужное русло). Пример наброска с некоторыми нюансами:
code_30502.txtЗадачи которые ставил: ввод вручную и стрелочками (и корректировка) так и не осилил
карма: 4

0
файлы: 1code_30502.txt [6.4KB] [328]
ФорумыПомощь по пакетуОграничить ввод в Edit ← Ctrl1234Ctrl →
Сообщение
...
Прикрепленные файлы
(файлы не залиты)
HiAsm Studio 2003 - 2024
Пользовательское соглашение | support@hiasm.com
Яндекс.Метрика