Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Общие вопросы Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 19.04.2011, 16:54   #11
Виктория7777
Пользователь
 
Аватар для Виктория7777
 
Регистрация: 02.12.2010
Сообщений: 67
По умолчанию

Мы сначала экспортировали файл (DBaseIV), затем подключали их к базе данных, с помошью компонента Table и DaraSource. И всё...
Виктория7777 вне форума Ответить с цитированием
Старый 19.04.2011, 17:10   #12
Виктория7777
Пользователь
 
Аватар для Виктория7777
 
Регистрация: 02.12.2010
Сообщений: 67
Печаль

Весь проект.
Вложения
Тип файла: rar Dom_zad.rar (352.8 Кб, 6 просмотров)
Виктория7777 вне форума Ответить с цитированием
Старый 19.04.2011, 17:28   #13
OlegVE
Форумчанин
 
Регистрация: 27.09.2010
Сообщений: 376
По умолчанию

Лень разбираться и переподключать все ваши таблицы... Попробуйте сначала заменить
Код:
procedure TForm1.DocumentCalcFields(DataSet: TDataSet);
begin
Documentkol_vo:= DaysBetween(Now(),Document.FieldByName('DATA_REGIS').AsDateTime);
end;
на
Код:
procedure TForm1.DocumentCalcFields(DataSet: TDataSet);
begin
  Documentkol_vo.Value := DaysBetween(Now(), DocumentDATA_REGIS.AsDateTime);
end;
Жду Вашего ответа. Потом посмотрю.
P.S. Практически вернулись к Вашему исходному коду после выяснения всех обстоятельств.
OlegVE вне форума Ответить с цитированием
Старый 19.04.2011, 17:32   #14
Виктория7777
Пользователь
 
Аватар для Виктория7777
 
Регистрация: 02.12.2010
Сообщений: 67
По умолчанию

Несовместимые типы TIntegerField и Integer
Виктория7777 вне форума Ответить с цитированием
Старый 19.04.2011, 17:49   #15
OlegVE
Форумчанин
 
Регистрация: 27.09.2010
Сообщений: 376
По умолчанию

1. Всё работает. Вы наверно не заменили на мой (Ваш исходный, мной подправленный) последний код. При отсутствии .Value именно такая ошибка и должна выскакивать.
2. Разберитесь сами со строками
Код:
DBGrid1.Columns[6].Width:=Ini.ReadInteger('Grid', 'WfieldNum6', 50);
и
    Ini.WriteInteger( 'Grid', 'WfieldNum6', DBGrid1.Columns[6].Width);
Откуда у Вас седьмая колонка? Закомментируйте их сначала.

Последний раз редактировалось OlegVE; 19.04.2011 в 17:59.
OlegVE вне форума Ответить с цитированием
Старый 21.04.2011, 15:10   #16
Виктория7777
Пользователь
 
Аватар для Виктория7777
 
Регистрация: 02.12.2010
Сообщений: 67
По умолчанию

Спасибо большое, всё работает...))))
Виктория7777 вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Access+word и access+pdf xanderg Microsoft Office Access 2 07.11.2010 13:51
Запрос с датами и временем к Access [D7, Access] alexandr2010 БД в Delphi 3 26.07.2010 22:19
Есть БД на Access 2.0, нужно открыть в Access 2003 Spirit_33 Microsoft Office Access 1 23.07.2009 07:59
Access 97, открыть базу данных Access alexhol Microsoft Office Access 0 27.04.2009 12:10
Delphy и Access.вводя инфу во вторичный файл Access, она отражалась в первом ADOTable Lev БД в Delphi 0 11.11.2007 12:14