Страница 1 из 1

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

Добавлено: 26 фев 2006, 08:51
Идущий вперёд
прошу помочь 8-)
вот есть самописный диалог
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;
<<'Ввод интервалов дат'
Введите период оплаты с .@@@@@@@@@ по .@@@@@@@@@
Введите период отгрузки с.@@@@@@@@@ по .@@@@@@@@@
<.Ввод.> <.Отмена.>
>>
есть ли возможность сделать так чтобы вводить данные с клавиатуры, а не выбором из календаря
:-)

Добавлено: 26 фев 2006, 08:57
Goblin
А что, уже нельзя стало ?
Всю жизнь руками вводили хоть в фейсах, хоть в диалогах ...

Добавлено: 26 фев 2006, 08:58
oiko
Добавь noprotect

Добавлено: 26 фев 2006, 10:24
Идущий вперёд
если добавить noprotect
my_opl_d1:date,noprotect;
my_opl_d2:date;
my_otg_d1:date;
my_otg_d2:date;
то это не помогает :eek:

Добавлено: 26 фев 2006, 10:24
Идущий вперёд
если добавить noprotect
my_opl_d1:date,noprotect;
my_opl_d2:date;
my_otg_d1:date;
my_otg_d2:date;
то это не помогает :eek:

Добавлено: 26 фев 2006, 10:29
san
а так:
my_opl_d1: date [,'DD/MM/YYYY'];

Добавлено: 26 фев 2006, 10:39
oiko
можно попробовать date1:[10, 'DD/MM/YYYY'],pickbutton,noprotect;

Добавлено: 26 фев 2006, 10:39
Идущий вперёд
:-(
получается такая штука
удаётся ввести только 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);

Добавлено: 26 фев 2006, 11:14
san
:?

Добавлено: 26 фев 2006, 11:26
Идущий вперёд
спасибо oiko
заработало :smile:

Добавлено: 03 сен 2007, 10:25
GTHack
а чё стандартного диалога для ввода даты нема ?
(мне надо для ввода одной даты)

Добавлено: 03 сен 2007, 10:52
PViP
GTHack, етсь такое, в 712 есть 'GetFormNa', в воьмерке тож должен быть, только имя компонента надо определит!

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

RunDialog('GetFormNa', Date1);