ввод даты в диалоге

[Идущий вперёд]

прошу помочь
вот есть самописный диалог
My_inp_dialog DIALOG
Fields
my_opl_d1:date;
my_opl_d2:date;
my_otg_d1:date;
my_otg_d2:date;
Buttons
cmOk, Default;
cmCancel;
<<'Ввод интервалов дат'
Введите период оплаты с .@@@@@@@@@ по .@@@@@@@@@
Введите период отгрузки с.@@@@@@@@@ по .@@@@@@@@@
<.Ввод.> <.Отмена.>
>>
есть ли возможность сделать так чтобы вводить данные с клавиатуры, а не выбором из календаря

[Goblin]

А что, уже нельзя стало ?
Всю жизнь руками вводили хоть в фейсах, хоть в диалогах ...

[oiko]

Добавь noprotect

[Идущий вперёд]

если добавить noprotect
my_opl_d1:date,noprotect;
my_opl_d2:date;
my_otg_d1:date;
my_otg_d2:date;
то это не помогает

[Идущий вперёд]

если добавить noprotect
my_opl_d1:date,noprotect;
my_opl_d2:date;
my_otg_d1:date;
my_otg_d2:date;
то это не помогает

[san]

а так:
my_opl_d1: date [,'DD/MM/YYYY'];

[oiko]

можно попробовать date1:[10, 'DD/MM/YYYY'],pickbutton,noprotect;

[Идущий вперёд]

получается такая штука
удаётся ввести только 1 символ и после этого всё. ввод прекращается
перед вызовом диалога я присвоил значения текущих дат
begd_opl:=cur_date;
endd_opl:=Add_Months(cur_date,1)
begd_otp:=cur_date
endd_otp:=Add_Months(cur_date,1)
Rundialog(my_inp_dialog,begd_opl,endd_opl,begd_otp,endd_otp);

[san]

[Идущий вперёд]

спасибо oiko
заработало

[GTHack]

а чё стандартного диалога для ввода даты нема ?
(мне надо для ввода одной даты)

[PViP]

GTHack, етсь такое, в 712 есть 'GetFormNa', в воьмерке тож должен быть, только имя компонента надо определит!

Код: Выделить всё

RunDialog('GetFormNa', Date1);