Скачать: CL | DM;

Раскрытое окно в TDateTimePicker   Найти похожие ветки 

← →
Евгений Р.   (2007-12-11 21:33) [0]

Как определить у TDateTimePicker открыто ли сейчас окно с календариком, либо пользователь изменяет текст?

---

← →
DVM ©   (2007-12-11 21:37) [1]

А что требуется сделать в результате?

---

← →
Евгений Р.   (2007-12-11 21:56) [2]

Обнаружить внесение изменений, и, при необходимости записать в БД.
Кажется DroppedDown?

---

← →
DVM ©   (2007-12-11 21:58) [3]

А чем не устроило событие OnChange ?

---

← →
Евгений Р.   (2007-12-11 22:03) [4]

Оно отрабатывает при перемещении по календарю. Если побродив пользователь нажмет Esc, то значение вернется к первоначальному, а собітие уже біло візвано.

---

← →
DVM ©   (2007-12-11 22:10) [5]

> Если побродив пользователь нажмет Esc, то значение вернется
> к первоначальному, а собітие уже біло візвано.

А в чем проблема то? Ну вызвано и вызвано. Ты не пиши в базу сразу по этом событию, а пиши по нажатию кнопки сохранить изменения.

---

← →
Евгений Р.   (2007-12-11 22:15) [6]

Кнопка "Сохранить" станет доступной после перевода таблици в dsEdit, по событию onStateChange. Круг замкнулся?

---

← →
DVM ©   (2007-12-11 22:26) [7]

> Кнопка "Сохранить" станет доступной после перевода таблици
> в dsEdit, по событию onStateChange. Круг замкнулся?

Какой круг? В чем проблема не пойму. Изменил юзер запись/ не изменил пиши в любом случае то что есть по нажатию сохранить.

---

← →
Евгений Р.   (2007-12-11 22:35) [8]

Проблемы нет.
Но...Обратите внимание на редактор Delphi. Иконка сохранения текста активизируется только при внесении изменения в текст.
А еще нужно и лог писать!!!

---

← →
DVM ©   (2007-12-11 22:40) [9]

> Но...Обратите внимание на редактор Delphi. Иконка сохранения
> текста активизируется только при внесении изменения в текст.
>  

ну я думаю правильнее тогда до редактирования запоминать исходное значение в доп переменной и на OnChange сравнивать то что написано с оригиналом, если есть различие то включать кнопку сохранить.

---

← →
Евгений Р.   (2007-12-11 22:46) [10]

Можно и так, тем более, что старое значение в пока не измененном DataSet, но кажется получилось проще:

procedure TfViProgGrupTblFrame_Main.edDataPCloseUp(Sender: TObject);
begin
   SaveChangesDates;
end;

procedure TfViProgGrupTblFrame_Main.edDataPChange(Sender: TObject);
begin
   if not edDataP.DroppedDown then SaveChangesDates;
end;

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.47 MB
Время: 0.01 c