-
Помогите написать код программы. Поиск совпадающей даты в dbgride и вывод сообщения если дата совпадает с текущей.
-
В dbgride нет дат. Как и других данных. Это лишь отображение данных
-
Поиск совпадающих данных по столбцу, которые отобраюаются в dbgide. находящиеся в Mysql. подключенные через AdoTable.
-
> [1] DVM © (26.07.13 14:23)
> В dbgride нет дат. Как и других данных.
Хе, слово в слово.
> [2] Новичок90 (26.07.13 14:43)
> Mysql.
Ну так запросом и ищи.
-
> [2] Новичок90 (26.07.13 14:43)
> AdoTable
А это в топку.
-
with DBGrid1.DataSource.Dataset do
begin
First;
while not eof do
begin
if Round(FieldByname('Data').AsDateTime)=Round(Date()) then ShowMessage('Find');
next;
end;
end;
-
> [5] Добряк (26.07.13 15:57)
Где DisableControls?
-
> Где DisableControls?
не парься, там AdoTable и волнует, значит тормозов нет... т.к. сотня другая записей. чего на них "экономить"?
-
if Round(FieldByname('Data').AsDateTime)=Round(Date())
1.
Ошибка.
Trunc + F1
2. Зачем ты каждый раз дату округляешь?
-
Согласен со всеми [6]..[8]
Но самое главное - после [5] ветка прниняла полезное направление
-
> [9] Добряк (27.07.13 09:31)
> после [5] ветка прниняла полезное направление
Бесполезное, ибо полезные советы даны ранее.
-
проще всего рядом положить поле куда будет вводиться искомая дата
проверяешь содержимое на "датовость"
и передаешь в запрос как параметр
вместо АдоТабле используй АДОДатасет
как вариант можно передавать дату в фильтр
Есть новые 
Нет новых [119955 +195][b:0][p:0.001]