Как автоматически занести дату и время в таблицу???

[Vasiliska]

Тема такая,у меня есть две главные таблицы, в одной у меня продукция а в другую переносятся данные из этой таблицы для выведения отчета в форме товарного чека,и так вопрос в том что я сделала третью таблицу для выведения отчета по продажам но в ней мне необходимо чтобы еще заносилась дата и время совершенной по покупки!

код вот такой

 if table2.State=dsBrowse then
  table2.Insert;
  table2.Edit;
  table2.FieldByName('Tovar').AsString :=table1.FieldByName('Tovar').AsString;
  table2.FieldByName('Kolicestvo').AsInteger:=1;
  table2.FieldByName('Cena').AsString:=table1.FieldByName('Cena').AsString;
 table2.FieldByName('Date').AsString:={что необходимо написать сдесь чтобы это зароботало???}
  table2.Post;

[Stilet]

table2.FieldByName('Date').AsDateTime:=now;

Или указывай какого типа поле Date в базе.

[Vasiliska]

Пасибки тебе!=)))Кстати мож ты еще поможешь,не получается сделать отчет!Как его можно упростить?

[Stilet]

Что за отчет? Как делаешь?

[Vasiliska]

Сообщение от Stilet

Что за отчет? Как делаешь?

ну вобще я хотела чтобы что бы у меня выводилось в Excel,т.к это у меня будет товарный чек

[Stilet]

Я тебе вот что посоветую - пока что поработай с QReport или Fast Report.
Кстати из них можно в экзел выгрузить, если не ошибаюсь.
Если все же экзел заинтересовал могу порекомендовать начать с книги Корняков В.Н. «Программирование документов и приложений MS Office в Delphi»
Всю читать не обязательно - выбери важные моменты из раздела работы с Экзелом, пройдись гуглом дабы точно выяснить как с определенными методами работать и получишь нямку.
Более того - http://delphiworld.narod.ru/_all_articles_.html
раздел OLE Automation MSOffice - [77] может достаточно неплохо помочь.
И от себя на всякий случай: http://yandex.ua/yandsearch?text=xls...oc=10&lr=20554
Другого примера у меня увы не завалялось