Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2007.03.18;
Скачать: CL | DM;

Вниз

Определение даты у записи   Найти похожие ветки 

 
Washington   (2007-02-26 18:14) [0]

В общем такая ситуация. Имеется планировщик с базой данных, в которой записаны все планы. Допустим есть несколько одинаковых записей, но на разные даты. Все записи (при открытии проги) добавляются в CheckListBox. Пользователь отмечает какой-нибудь план (выполнен) и в эту запись в поле Done должна записаться единица. В принципе несложно, но есть загвоздка - планы показываются не на один день, а на неделю вперёд. То есть нужно определить дату у определённой записи в CheckListBox"е. Как?

зы Прямо сочинение получилось


 
Jeer ©   (2007-02-26 18:21) [1]

Сложение (конкатенацию) строк никто не отменял
s3 := "Rec: "  + s1 + " Date: " + s2;


 
Washington   (2007-02-26 18:28) [2]

Так мне дату не надо выводить


 
Anatoly Podgoretsky ©   (2007-02-27 00:34) [3]

> Washington  (26.02.2007 18:28:02)  [2]

Тогда делай группирование, а как пользователь то догадается, к какой дате относится?


 
Washington   (2007-02-27 12:12) [4]

В принципе, с датой можно. Выводить я её вывожу, а как в базу данных добавить? Insert не подходит, так как не новую запись добавляю, а изменяю созданную.


 
ЮЮ ©   (2007-02-27 12:30) [5]


> Все записи (при открытии проги) добавляются в CheckListBox.

Где-то, например в Items.Objects, хранить значение ключевого поля, а запрос на изменение, как всем известно, должен выглядеть как
UPDATE
...
WHERE <ключевое поле> = <значене ключевого поля>


 
Washington   (2007-02-27 17:25) [6]

Сделал через Update.
Код:
with Form1.ADOQuery2 do
  begin
    close;
    SQL.clear;
    SQL.Add("update Plans");
    SQL.Add("set Done = "1"");
    SQL.Add("where Plans=:a and Date=:d");
    Parameters.ParseSQL(SQL.Text,True);
    Prepared:=true;
    Parameters.ParamValues["a"]:=a;
    Parameters.ParamValues["d"]:=d;
    ExecSQL;
  end;

a: - непосредственно план
d: - дата на этот план

Ошибку выдаёт. Говорит, что не могёт найти таковую таблицу. Другие ADOQuery работают через этот же ADOConnection и всё путём. В чём теперь ошибка?



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

Текущий архив: 2007.03.18;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.059 c
15-1171896458
Cerberus
2007-02-19 17:47
2007.03.18
Отдам кошечку в хорошие программистские руки (Самара)


15-1172433448
RASkov
2007-02-25 22:57
2007.03.18
Behold TV


15-1171867558
Pazitron_Brain
2007-02-19 09:45
2007.03.18
Старая мать + новый винт


2-1172086085
danila_master
2007-02-21 22:28
2007.03.18
PNG в Delphi


2-1172317674
Novichok_New
2007-02-24 14:47
2007.03.18
"Непонятные" поля (mail)