Вверх ↑
Ответов: 16884
Рейтинг: 1239
#1: 2020-08-08 21:00:28 ЛС | профиль | цитата
DataEntry, облегчаем работу оператора. Автоматически исправляем ошибки с заглавными и строчными буквами.
Нажать кнопку - Пробел, переход Tab


Add(MainForm,3698199,238,196)
{
}
Add(StringTableMT,1776499,385,196)
{
Left=5
Top=50
Width=375
Height=210
Columns=#7:Фамилия|3:Имя|8:Отчество|
IconsCheck=[]
MiscIcons=[]
Icons=[]
}
Add(Button,13068697,287,196)
{
Left=5
Top=10
Width=135
Height=30
Caption="Добавить запись"
link(onClick,2782987:doWork1,[])
}
Add(ChildForm,2782987,336,196)
{
link(onEvent1,1776499:doAdd,[])
}
BEGIN_SDK
Add(EditMulti,15972521,14,28)
{
EventCount=1
WorkCount=1
Width=489
Height=165
link(doWork1,5938971:doVisible,[(60,34)(60,125)])
}
Add(MainForm,5938971,105,91)
{
Left=35
Top=105
Width=290
Height=198
Visible=1
Point(doVisible)
Point(onShow)
link(onShow,13617012:doEvent1,[(145,118)(145,55)])
}
Add(Label,1389884,28,91)
{
Left=10
Top=10
Width=53
Height=102
Caption="Фамилия\r\n\r\n\r\nИмя\r\n\r\n\r\nОтчество\r\n"
AutoSize=1
Alignment=1
}
Add(Edit,7380168,189,77)
{
Left=70
Top=10
Width=160
Text=""
ClearAfterEnter=1
Point(doSetFocus)
link(onChange,1821272:doModify,[])
}
Add(Edit,10792688,315,70)
{
Left=70
Top=50
Width=160
Text=""
ClearAfterEnter=1
Point(doSetFocus)
link(onChange,11401600:doModify,[])
}
Add(Edit,6920198,406,42)
{
Left=70
Top=85
Width=160
Text=""
ClearAfterEnter=1
Point(doSetFocus)
link(onChange,6829296:doModify,[])
}
Add(Button,8174669,105,140)
{
Left=185
Top=120
Width=75
Height=30
Caption="Добавить"
Point(doSetFocus)
link(onClick,14557649:doEvent1,[])
}
Add(FormatStr,3033826,217,140)
{
DataCount=3
Mask="%1;%2;%3"
link(onFString,15972521:onEvent1,[(490,146)(490,34)])
link(Str1,7380168:Text,[(223,132)(195,132)])
link(Str2,10792688:Text,[(230,110)(321,110)])
link(Str3,6920198:Text,[(237,124)(412,124)])
}
Add(Hub,14557649,147,140)
{
link(onEvent1,3033826:doString,[])
link(onEvent2,5938971:doClose,[(174,153)(174,182)(95,182)(95,118)])
}
Add(Hub,13617012,154,49)
{
OutCount=4
link(onEvent1,8276042:doWork2,[])
link(onEvent2,9993300:doWork2,[])
link(onEvent3,16733997:doWork2,[])
link(onEvent4,7380168:doSetFocus,[(174,76)(174,97)])
}
Add(StrCase,1821272,231,77)
{
Type=3
link(onModify,16733997:doWork3,[(275,83)(275,69)])
}
Add(StrCase,11401600,357,70)
{
Type=3
link(onModify,9993300:doWork3,[(401,76)(401,62)])
}
Add(StrCase,6829296,448,42)
{
Type=3
link(onModify,8276042:doWork1,[(492,48)(492,37)(396,37)])
}
Add(HubEx,9993300,291,56)
{
Angle=1
link(onEvent,10792688:doText2,[(295,83)])
}
Add(HubEx,8276042,392,49)
{
link(onEvent,6920198:doText2,[])
}
Add(HubEx,16733997,175,63)
{
Angle=1
link(onEvent,7380168:doText2,[(179,90)])
}
END_SDK

карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
1
Голосовали:DataEntry