Тема: Как воспользоваться календарем в скриптах для выбора даты
Подскажите пожалуйста как воспользоваться календарем в скриптах для выбора даты?
Спасибо
Вы не вошли. Пожалуйста, войдите или зарегистрируйтесь.
TechnologiCS → TechnologiCS → Использование TechnologiCS API → Как воспользоваться календарем в скриптах для выбора даты
Страницы 1
Чтобы отправить ответ, вы должны войти или зарегистрироваться
Подскажите пожалуйста как воспользоваться календарем в скриптах для выбора даты?
Спасибо
если справочник календари TechnologiCS - то что-то типа такого примера ICalendar.SetCurrentDate.
Если имеется ввиду формы ввода, то можно использовать например вот такой пример
'<doc Выбор даты '<par %1 As String Первоначальная дата> '<par %2 As String Заголовок> '> Function SelectDate( StartDate, Caption ) SelectDate = Null Set Form = TCSApp.TCSForm( "", False ) If Caption="" Then Caption = "Задайте дату:" Form.Caption = Caption Call Form.CreateControl( "TVBDateEdit", "FDate", "" ) Set C = Form.Controls( "FDate" ) C.Left = 5 C.Top = 5 C.Width = 400 If Not IsNull(StartDate) Then C.Date = StartDate Call Form.CreateControl( "TVBBitBtn", "OkBtn", "" ) Set B = Form.Controls( "OkBtn" ) B.Caption = "Выбрать" B.Width = 120 B.Left = C.Left + C.Width - B.Width B.Top = C.Top + C.Height + 10 B.ModalResult = 1 Form.Width = 400 + 15 Form.Height = B.Top + B.Height + 40 Form.ShowModal If Form.ModalResult=1 Then SelectDate = C.Date End Function Sub Test1 D1 = SelectDate( Date, "" ) MsgBox "Select date:" & D1 End Sub
У нас версия 4,7,1 - похоже там нет еще TCSApp.TCSForm, а календарь ТКС пробовала использовать для выбора даты - она не сохраняется, установить какую-то конкретную в календаре- да -все нормально, а вот выбор - все время стоит на последнем дне года.
Про версии 4.7.1 не подскажу.
Страницы 1
Чтобы отправить ответ, вы должны войти или зарегистрироваться
TechnologiCS → TechnologiCS → Использование TechnologiCS API → Как воспользоваться календарем в скриптах для выбора даты