Вверх ↑
Этот топик читают: Гость
Ответов: 4
Рейтинг: 0
#1: 2020-07-06 07:07:16 ЛС | профиль | цитата
Доброго времени суток. Подскажите пожалуйста! Как сделать так, чтобы при первом открытие формы текущая дата автоматически вводилась в текстовое поле, а не при выборе из списка.


Add(SimpleForm,2953706,70,105)
{
Width=498
Height=82
}
Add(RichEdit,10726363,301,70)
{
Left=140
Top=10
Width=335
Height=25
Point(doSetSelect)
}
Add(DateConvertor,6395462,231,105)
{
Mode=9
Format="dd.MM.yyyy"
Point(Result)
link(onResult,10726363:doSetSelect,[(282,111)(282,111)])
}
Add(DatePicker,11609742,182,105)
{
Left=10
Top=10
Width=125
Height=21
link(onChange,6395462:doConvert,[])
}
Add(StyleXP,11784815,70,70)
{
}

Редактировалось 1 раз(а), последний 2020-07-07 07:32:22
карма: 0

0
vip
#1.1контекстная реклама от партнеров
Ответов: 16884
Рейтинг: 1239
#2: 2020-07-06 07:20:26 ЛС | профиль | цитата

Add(MainForm,2953706,21,105)
{
Width=361
Height=211
Position=1
link(onCreate,8180157:doData,[])
}
Add(RichEdit,10726363,133,119)
{
Left=5
Top=20
Width=335
Height=140
Point(doSetSelect)
}
Add(StyleXP,11784815,21,161)
{
}
Add(Time,12499141,77,70)
{
Format="Сегодня D-M-Y года. \r\nВремя h:m:s"
}
Add(DoData,8180157,77,119)
{
link(onEventData,10726363:doAdd,[])
link(Data,12499141:FormatTime,[])
}

карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
Ответов: 4
Рейтинг: 0
#3: 2020-07-06 07:22:09 ЛС | профиль | цитата
Большое спасибо ;)
карма: 0

0
Ответов: 16884
Рейтинг: 1239
#4: 2020-07-06 07:31:05 ЛС | профиль | цитата
Или так. Успехов!


Add(MainForm,2953706,21,105)
{
Width=361
Height=211
Position=1
link(onCreate,5541289:doEvent1,[])
}
Add(RichEdit,10726363,196,119)
{
Left=5
Top=20
Width=335
Height=140
Point(doSetSelect)
}
Add(StyleXP,11784815,21,70)
{
}
Add(Time,12499141,105,70)
{
Format="Сегодня D-M-Y года. \r\nВремя h:m:s"
Point(DateTime)
}
Add(DoData,8180157,105,119)
{
link(onEventData,12173329:doWork2,[])
link(Data,12499141:FormatTime,[])
}
Add(DateConvertor,6395462,112,168)
{
Mode=9
Format="Сегоднч d MMMM yyyy года."
Point(Result)
Point(Data)
link(onResult,12173329:doWork3,[(165,174)])
link(Data,12499141:DateTime,[])
}
Add(HubEx,12173329,161,119)
{
link(onEvent,10726363:doAdd,[])
}
Add(Hub,5541289,70,119)
{
link(onEvent1,8180157:doData,[])
link(onEvent2,6395462:doConvert,[(94,132)(94,174)])
}

карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
4
Сообщение
...
Прикрепленные файлы
(файлы не залиты)