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

Проблема с проверкой даты   Найти похожие ветки 

← →
Fr1K ©   (2008-04-21 17:01) [0]

Проблема с датой
Вообщем мне нужно в таблице вводить дату но так как у меня есть там записи которые сортируютса по дате, мне нужно если юзверь ввёл дату ниже последней записи в таблице то чтоб у него выскакивало сообщение
продолжить или оставить делаю так но всё равно при каждом нажатии на ентер он у меня показывает диалоговое окно хотя дата больше чем последняя: вот код
событие ЕForm3.Table1AfterPost

var  buttonSelected : Integer;
begin
 buttonSelected := MessageDlg("Äàòà íèæå òåêóùåé, Ïðîäîëæàòü?",mtInformation, mbOKCancel, 0);
 if table1.Fields.Fields[1].Value < DateToStr(Date) then
    case buttonSelected of
 mrOK: Next;
 mrCancel:Table1.Delete;

в дб гриде стоит событие
DBGridEh1KeyDown

в котором
if key = VK_Return then
 Table1.AfterPost(Table1);

---

← →
Сергей М. ©   (2008-04-21 17:09) [1]

> всё равно при каждом нажатии на ентер он у меня показывает
> диалоговое окно


Что ты понаписал, то юзер и видит)


> хотя дата больше чем последняя


Ты глаза-то разуй - у тебя оператор сравнения дат выполняется после работы с твоим модальным диалогом !

p.s.
Как там чайханщик поживает ?
Еще терпит тебя ?)

---

← →
Зоо   (2008-04-21 17:14) [2]

Удалено модератором
Примечание: Правила читаем

---

← →
Fr1K ©   (2008-04-21 17:15) [3]

Блин! ник не сохранился

---

← →
Сергей М. ©   (2008-04-21 17:15) [4]

Опять зоопарк)

---

← →
Fr1K ©   (2008-04-21 17:18) [5]

Да ищё возможно ли в ehLib в компоненте PrintDBGridEh распечатать сразу 3 таблицы на одном лесте из такогого что он позволяет работать только с одной

---

← →
Сергей М. ©   (2008-04-21 17:19) [6]

> ник не сохранился


А давеча, помнится, ты нам тут гнул горбатого, что это якобы не ты, это якобы разные люди из твоей ЛВС постят сюда)

---

← →
Fr1K ©   (2008-04-21 17:20) [7]

Да на работе сидят я не отрицаю за моим компьютером.

---

← →
Сергей М. ©   (2008-04-21 17:21) [8]

Ему, надо понимать, тоже грозит экзекуция)

---

← →
app ©   (2008-04-21 19:45) [9]

> Fr1K  (21.04.2008 17:18:05)  [5]

Два вопроса - две темф

---

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

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



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