HiAsm
HiAsm
Вверх ↑
Форумы"Игра в слова"Очистка полей формы при вызове окна. Помогите.. ← Ctrl1Ctrl →
Этот топик читают: Гость
Ответов: 113
Рейтинг: 15
#1: 2020-08-08 16:07:02 ЛС | профиль | цитата
Помогите не пойму как заставить очиститься поля ввода при вызове формы 

Add(MainForm,2953706,21,63)
{
}
Add(StringTableMT,1776499,287,105)
{
 Left=5
 Top=50
 Width=375
 Height=210
 Columns=#7:Фамилия|3:Имя|8:Отчество|
 IconsCheck=[]
 MiscIcons=[]
 Icons=[]
}
Add(Button,13068697,112,28)
{
 Left=5
 Top=10
 Width=135
 Height=30
 Caption="Добавить запись"
 link(onClick,2782987:doWork1,[(216,34)(216,41)])
}
Add(ChildForm,2782987,287,35)
{
 link(onEvent1,1776499:doAdd,[(331,41)(331,76)(275,76)(275,111)])
}
BEGIN_SDK
  Add(EditMulti,15972521,21,21)
  {
   EventCount=1
   WorkCount=1
   link(doWork1,5938971:doVisible,[(28,27)(28,139)])
  }
  Add(MainForm,5938971,35,105)
  {
   Left=35
   Top=105
   Width=290
   Height=198
   Visible=1
   Point(doVisible)
  }
  Add(Label,1389884,14,7)
  {
   Left=10
   Top=10
   Width=53
   Height=17
   Caption="Фамилия"
  }
  Add(Edit,7380168,154,35)
  {
   Left=70
   Top=5
   Width=160
   Text=""
  }
  Add(Label,12739942,11,4)
  {
   Left=10
   Top=45
   Width=53
   Height=17
   Caption="Фамилия"
  }
  Add(Edit,10792688,193,25)
  {
   Left=70
   Top=40
   Width=160
   Text=""
  }
  Add(Label,13813478,5,-2)
  {
   Left=10
   Top=85
   Width=53
   Height=17
   Caption="Фамилия"
  }
  Add(Edit,6920198,236,40)
  {
   Left=70
   Top=80
   Width=160
   Text=""
  }
  Add(Button,8174669,112,168)
  {
   Left=185
   Top=115
   Width=75
   Height=30
   Caption="Добавить"
   link(onClick,14557649:doEvent1,[])
  }
  Add(FormatStr,3033826,203,168)
  {
   DataCount=3
   Mask="%1;%2;$3"
   link(onFString,15972521:onEvent1,[(278,174)(278,27)])
   link(Str1,7380168:Text,[(209,118)(160,118)])
   link(Str2,10792688:Text,[(216,112)(199,112)])
   link(Str3,6920198:Text,[(223,120)(242,120)])
  }
  Add(Hub,14557649,161,168)
  {
   link(onEvent1,3033826:doString,[])
   link(onEvent2,5938971:doClose,[(187,181)(187,157)(23,157)(23,132)])
  }
END_SDK
Add(InfoTip,12561040,35,133)
{
 Info=#104:Как реализовать при вызове формы ввода данных что бы поля очистились а не остовались со старыми записями|
 Width=232
 Height=46
}
Add(InfoTip,6640812,252,7)
{
 Info=#18:Форма ввода данных|
 Width=106
 Height=67
}
карма: 0
Ученик
0
Ответов: 2267
Рейтинг: 676
#2: 2020-08-08 16:23:01 ЛС | профиль | цитата
Так вроде ничего сложного. Или вопрос с подвохом. 

Add(MainForm,5371118,203,252)
{
 Position=1
}
Add(StringTableMT,1776499,567,224)
{
 Left=5
 Top=50
 Width=375
 Height=210
 Columns=#7:Фамилия|3:Имя|8:Отчество|
 IconsCheck=[]
 MiscIcons=[]
 Icons=[]
}
Add(Button,13068697,294,224)
{
 Left=5
 Top=10
 Width=135
 Height=30
 Caption="Добавить запись"
 link(onClick,2782987:doWork1,[])
}
Add(ChildForm,2782987,469,224)
{
 link(onEvent1,1776499:doAdd,[])
}
BEGIN_SDK
  Add(EditMulti,15972521,21,21)
  {
   EventCount=1
   WorkCount=1
   Width=447
   Height=298
   link(doWork1,5938971:doVisible,[(59,27)(59,139)])
  }
  Add(MainForm,5938971,98,105)
  {
   Left=35
   Top=105
   Width=290
   Height=198
   Visible=1
   Point(doVisible)
  }
  Add(Label,1389884,343,259)
  {
   Left=10
   Top=10
   Width=53
   Height=17
   Caption="Фамилия"
  }
  Add(Edit,7380168,287,21)
  {
   Left=70
   Top=5
   Width=160
   Text=""
  }
  Add(Label,12739942,336,252)
  {
   Left=10
   Top=45
   Width=53
   Height=17
   Caption="Фамилия"
  }
  Add(Edit,10792688,294,56)
  {
   Left=70
   Top=40
   Width=160
   Text=""
  }
  Add(Label,13813478,329,252)
  {
   Left=10
   Top=85
   Width=53
   Height=17
   Caption="Фамилия"
  }
  Add(Edit,6920198,301,91)
  {
   Left=70
   Top=80
   Width=160
   Text=""
  }
  Add(Button,8174669,112,168)
  {
   Left=185
   Top=115
   Width=75
   Height=30
   Caption="Добавить"
   link(onClick,14557649:doEvent1,[])
  }
  Add(FormatStr,3033826,287,168)
  {
   DataCount=3
   Mask="%1;%2;$3"
   link(onFString,15972521:onEvent1,[(405,174)(405,27)])
   link(Str1,7380168:Text,[])
   link(Str2,10792688:Text,[])
   link(Str3,6920198:Text,[])
  }
  Add(Hub,14557649,161,168)
  {
   OutCount=5
   link(onEvent1,3033826:doString,[])
   link(onEvent2,7380168:doText2,[(200,181)(200,34)])
   link(onEvent3,10792688:doText2,[(214,188)(214,69)])
   link(onEvent4,6920198:doText2,[(228,195)(228,104)])
   link(onEvent5,5938971:doClose,[(187,202)(187,226)(86,226)(86,132)])
  }
END_SDK
Add(InfoTip,12561040,217,322)
{
 Info=#104:Как реализовать при вызове формы ввода данных что бы поля очистились а не остовались со старыми записями|
 Width=232
 Height=46
}
Add(InfoTip,6640812,434,196)
{
 Info=#18:Форма ввода данных|
 Width=106
 Height=67
}
карма: 11

1
Голосовали:DataEntry
Ответов: 8926
Рейтинг: 823
#3: 2020-08-08 16:43:23 ЛС | профиль | цитата
DataEntry, уважайте будущих пользователей, не заставляйте их прыгать с клавиатуры на мышку и с мышки на клавиатуру:
Enter


Add(MainForm,13774391,245,140)
{
}
Add(StringTableMT,1776499,392,140)
{
 Left=5
 Top=50
 Width=375
 Height=210
 Columns=#7:Фамилия|3:Имя|8:Отчество|
 IconsCheck=[]
 MiscIcons=[]
 Icons=[]
}
Add(Button,13068697,294,140)
{
 Left=5
 Top=10
 Width=135
 Height=30
 Caption="Добавить запись"
 link(onClick,2782987:doWork1,[])
}
Add(ChildForm,2782987,343,140)
{
 link(onEvent1,1776499:doAdd,[])
}
BEGIN_SDK
  Add(EditMulti,15972521,14,28)
  {
   EventCount=1
   WorkCount=1
   Width=335
   link(doWork1,12274421:doEvent1,[(53,34)(53,55)])
  }
  Add(MainForm,5938971,105,91)
  {
   Left=35
   Top=105
   Width=290
   Height=198
   Visible=1
   Point(doVisible)
  }
  Add(Label,1389884,28,91)
  {
   Left=10
   Top=10
   Width=53
   Height=17
   Caption="Фамилия"
  }
  Add(Edit,7380168,189,77)
  {
   Left=70
   Top=5
   Width=160
   Text=""
   ClearAfterEnter=1
   Point(doSetFocus)
   link(onEnter,10792688:doSetFocus,[(228,90)(228,83)])
  }
  Add(Label,12739942,35,98)
  {
   Left=10
   Top=45
   Width=53
   Height=17
   Caption="Фамилия"
  }
  Add(Edit,10792688,238,63)
  {
   Left=70
   Top=40
   Width=160
   Text=""
   ClearAfterEnter=1
   Point(doSetFocus)
   link(onEnter,6920198:doSetFocus,[(277,76)(277,62)])
  }
  Add(Label,13813478,42,105)
  {
   Left=10
   Top=85
   Width=53
   Height=17
   Caption="Фамилия"
  }
  Add(Edit,6920198,287,42)
  {
   Left=70
   Top=80
   Width=160
   Text=""
   ClearAfterEnter=1
   Point(doSetFocus)
   link(onEnter,8174669:doSetFocus,[(326,55)(326,139)(116,139)(116,181)])
  }
  Add(Button,8174669,126,175)
  {
   Left=185
   Top=115
   Width=75
   Height=30
   Caption="Добавить"
   Point(doSetFocus)
   link(onClick,14557649:doEvent1,[])
  }
  Add(FormatStr,3033826,217,175)
  {
   DataCount=3
   Mask="%1;%2;$3"
   link(onFString,15972521:onEvent1,[(333,181)(333,34)])
   link(Str1,7380168:Text,[(223,132)(195,132)])
   link(Str2,10792688:Text,[(230,103)(244,103)])
   link(Str3,6920198:Text,[(237,124)(293,124)])
  }
  Add(Hub,14557649,175,175)
  {
   link(onEvent1,3033826:doString,[])
   link(onEvent2,5938971:doClose,[(200,188)(200,167)(95,167)(95,118)])
  }
  Add(Hub,12274421,63,49)
  {
   OutCount=3
   link(onEvent1,11099364:doData,[])
   link(onEvent2,5938971:doVisible,[(88,62)(88,125)])
   link(onEvent3,7380168:doSetFocus,[(144,69)(144,97)])
  }
  Add(DoData,11099364,105,49)
  {
   Data=String()
   link(onEventData,13617012:doEvent1,[])
  }
  Add(Hub,13617012,154,49)
  {
   OutCount=3
   link(onEvent1,6920198:doText2,[])
   link(onEvent2,10792688:doText2,[(228,62)(228,76)])
   link(onEvent3,7380168:doText2,[(179,69)(179,90)])
  }
END_SDK
карма: 19

1
Голосовали:DataEntry
Ответов: 113
Рейтинг: 15
#4: 2020-08-08 17:02:04 ЛС | профиль | цитата
sla8a писал(а):
Так вроде ничего сложного. Или вопрос с подвохом.

Честно говоря думал что может в свойствах формы есть какая фича)) Дамы не тянуть связи на очистку)

Друзья спасибо Вам большое.

P.S.
Леонид возьму на заметку
карма: 0
Ученик
0
Ответов: 2267
Рейтинг: 676
#5: 2020-08-08 18:28:22 ЛС | профиль | цитата
DataEntry писал(а):
Честно говоря думал что может в свойствах формы есть какая фича)) Дамы не тянуть связи на очистку)

Как вариант:


Add(MainForm,13774391,490,84)
{
 Position=1
}
Add(StringTableMT,1776499,749,84)
{
 Left=5
 Top=50
 Width=375
 Height=210
 Columns=#7:Фамилия|3:Имя|8:Отчество|
 IconsCheck=[]
 MiscIcons=[]
 Icons=[]
}
Add(Button,13068697,546,84)
{
 Left=5
 Top=10
 Width=135
 Height=30
 Caption="Добавить запись"
 link(onClick,8865095:doEvent1,[])
}
Add(ChildFormEx,15442198,623,84)
{
 Mode=1
 link(onFString,13386795:doEvent1,[])
}
BEGIN_SDK
  Add(EditMultiEx,13869353,21,21)
  {
   WorkCount=#7:##clear|5:##add|8:##delete|
   EventCount=#9:onFString|
   Width=629
   Height=333
   Point(##clear)
   Point(##add)
   Point(##delete)
   link(##add,10333844:doVisible,[(150,34)(150,230)])
  }
  Add(MainForm,10333844,280,196)
  {
   Left=35
   Top=105
   Width=290
   Height=198
   Visible=1
   Position=1
   Point(doVisible)
  }
  Add(Label,4399211,210,105)
  {
   Left=10
   Top=10
   Width=53
   Height=17
   Caption="Фамилия"
  }
  Add(Edit,1138738,350,133)
  {
   Left=70
   Top=5
   Width=160
   Text=""
  }
  Add(Label,16519162,207,102)
  {
   Left=10
   Top=45
   Width=53
   Height=17
   Caption="Фамилия"
  }
  Add(Edit,5784403,396,130)
  {
   Left=70
   Top=40
   Width=160
   Text=""
  }
  Add(Label,15919703,201,96)
  {
   Left=10
   Top=85
   Width=53
   Height=17
   Caption="Фамилия"
  }
  Add(Edit,14122171,439,124)
  {
   Left=70
   Top=80
   Width=160
   Text=""
  }
  Add(Button,3290451,308,266)
  {
   Left=185
   Top=115
   Width=75
   Height=30
   Caption="Добавить"
   link(onClick,5324388:doEvent1,[])
  }
  Add(FormatStr,5222272,399,266)
  {
   DataCount=3
   Mask="%1;%2;$3"
   link(onFString,13869353:onFString,[(541,272)(541,27)])
   link(Str1,1138738:Text,[(405,216)(356,216)])
   link(Str2,5784403:Text,[(412,210)(402,210)])
   link(Str3,14122171:Text,[(419,218)(445,218)])
  }
  Add(Hub,5324388,357,266)
  {
   link(onEvent1,5222272:doString,[])
   link(onEvent2,10333844:doClose,[(383,279)(383,320)(253,320)(253,223)])
  }
END_SDK
Add(Hub,8865095,595,84)
{
 link(onEvent1,15442198:##clear,[])
 link(onEvent2,15442198:##add,[])
}
Add(Hub,13386795,665,84)
{
 link(onEvent1,1776499:doAdd,[])
 link(onEvent2,1687528:doDeferredEvent,[])
}
Add(DeferredEvent,1687528,693,91)
{
 link(onDeferredEvent,15442198:##delete,[(735,97)(735,137)(611,137)(611,104)])
}
карма: 11

1
Голосовали:DataEntry
Ответов: 16884
Рейтинг: 1239
#6: 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
Ответов: 113
Рейтинг: 15
#7: 2020-08-09 00:24:30 ЛС | профиль | цитата
Мужчины спасибо за помощь...! Очень ценю потраченное вами время...
карма: 0
Ученик
0
7
Форумы"Игра в слова"Очистка полей формы при вызове окна. Помогите.. ← Ctrl1Ctrl →
Сообщение
...
Прикрепленные файлы
(файлы не залиты)
HiAsm Studio 2003 - 2024
Пользовательское соглашение | support@hiasm.com
Яндекс.Метрика