Delphi 7+FoxPro 6 проблема с типом данных date

[Ditrovich]

Здравствуйте, возникла одна проблемка. Есть бд на Foxpro, обработка данных идёт через приложение на делфи. В Foxpro есть тип данных date, до внесения данных в поле данного типа там отображается пустая строка, т.е видно, что данные отсутствуют. При подключении бд на foxpro к делфи, все пустые значение полей с типом date заменяются на дату 30.12.1899. Так вот вопрос, как исправить данную ситуацию, потому как в отчётах потом тоже выводится эта дата вместо пустой строки? Может можно это значение стандартное в делфи как-то изменить либо в foxpro подкрутить чего?

[Аватар]

Сделать в DataSet вычисляемое поле и, если дата (AsDateTime) этого поля = 0 , то ничего не присваивать в него, иначе присвоить дату из исходного поля

[Ditrovich]

таблиц штух 18, полей с датой тьма, это для каждого поля что ли делать так?

[Аватар]

Это зависит от средств, с помощью которых обращение из Delphi к dbf. Поэксперементировать, возможно есть провайдер для ADO, или другое ПО, которое правильно интерпретирует не заполненную дату, т.е. передает NULL. Таким вопросом не задавался, поэтому не скажу. Если такового не найдется, то для отображения в гриде проще не придумаешь. Разве что программно прорисовывать значение этого поля, насколько это проще - вам решать

[Ditrovich]

Провайдера не удалось нормального найти под foxpro, увы. Попробую ещё поискать, но за ответ спасибо

[Аватар]

Что значит не удалось? Так, на вскидку - vfpoledb.1, JET OLE DB, MSDASQL - пробуйте

[Ditrovich]

Вот я первого использую, а второй кажись для foxpro не подходит, раньше пробовал кажись. Перепроверю сейчас

[Аватар]

Все подходят, только строку соединения правильно задать. И есть зависимость от кодовой страницы dbf, или отсутствия указания на нее в файле

[Ditrovich]

Спасибо за внимание к вопросу, проблему решил) Может кому понадобится, опишу:
1) ставим в Foxpro на поле тип значения по умолчанию .Null., для того чтоб дальнейшие записи нормальными сразу создавались;
2) затем запросами на sql при помощи update изменяем пустые значения полей в таблицах foxpro на .Null. Запрос вида Update tablename set fieldname=Null where fieldname={} Два первых шага позволят делфи отображать пустую строку вместо даты по умолчанию;
3) и наконец используем опять же в FoxPro команду SET NULLDISPLAY TO [] для того чтобы с его стороны вместо .Null. отображались пустые строки.
Готово)

[Ditrovich]

Тема закрыта
P.S. новичок на форуме, не знаю, может её как-то закрывать нужно) Если да-поскажите как это сделать