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

Фильтрация по TDateTime   Найти похожие ветки 

← →
Anton   (2002-12-20 09:07) [0]

Решил тут воспользоваться фильтом в TTable. Заполняю Filter в object inspector"е выражением DATETIME>10/10/2000
При открытии базы данных выскакивает ошибка:
"Project xxxxx raised exception class EDatabaseError with message "Arithmetic in filter expressions not supported"".
Что я неправильно указываю? Заранее благодарю.

---

← →
Alexandr ©   (2002-12-20 09:09) [1]

разделитель неправильный.
Он думает, что ты делить числа собрался.

---

← →
Anton   (2002-12-20 09:13) [2]

Если ставлю вместо "/" точки (как в моих региональных настройках), то выдает такую ошибку "Invalid filter expression character: ".""
Как же составить фильтр правильно?

---

← →
Johnmen ©   (2002-12-20 09:18) [3]

DATETIME>"10.10.2000"

---

← →
Alexandr ©   (2002-12-20 09:18) [4]

про кавычки забыл...
DATETIME>"10/10/2000"
а вот с разделителем и порядком число-месяц или месяц-число возможны заморочки...

---

← →
Anton   (2002-12-20 09:23) [5]

Спасибо большое. С кавычками заработало.

---

← →
tarik   (2002-12-25 16:24) [6]

Братцы, выручайте. Точно такая же проблема. Только у меня даты берутся из DateTimePicker.
В общем вот кусок кода:

procedure TFormSalesValue.Button1Click(Sender: TObject);
var DateStart, DateEnd: string;
begin
tbOrders.Filter:="";
DateStart := DateToStr(DateTimeBegin.Date);
DateEnd := DateToStr(DateTimeEnd.Date);
tbOrders.Filter:="PhoneDate >" + DateStart + "AND PhoneDate <" + DateEnd;
tbOrders.Filtered := True;
end;


ЗЫ: Ногами не бейте, из меня программер никакой еще :)

---

← →
Johnmen ©   (2002-12-25 16:34) [7]

И видимо уже никакой не получится...

---

← →
vopros ©   (2002-12-25 16:39) [8]

procedure TFormSalesValue.Button1Click(Sender: TObject);
var DateStart, DateEnd: string;
begin
tbOrders.Filter:="";
DateStart := DateToStr(DateTimeBegin.Date);
DateEnd := DateToStr(DateTimeEnd.Date);
tbOrders.Filter:="PhoneDate >" +""""+ DateStart +""""+ "AND PhoneDate <" +""""+ DateEnd+"""";
tbOrders.Filtered := True;
end;

---

← →
Anatoly Podgoretsky ©   (2002-12-25 16:54) [9]

Таже проблема даты надо указывать в кавычках и соответствии с региональными настройками.

tbOrders.Filter:="PhoneDate>" + QuotedStr(DateStart) + " AND PhoneDate<" + QuotedStr(DateEnd);

---

← →
tarik   (2002-12-25 16:56) [10]

Спасибо. Заработало.

Johnmen ©
и тебе спасибо на добром слове...

---

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

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



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