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

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

Вернуться   Форум программистов > Delphi программирование > БД в Delphi
Регистрация

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

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

Ответ
 
Опции темы Поиск в этой теме
Старый 08.08.2012, 16:04   #11
astecenko
Homo Interneticus
Форумчанин
 
Аватар для astecenko
 
Регистрация: 04.03.2011
Сообщений: 611
По умолчанию

Цитата:
Сообщение от d_adilet Посмотреть сообщение
я прошу прощения, я видать не правильно выразился...
я пытаюсь с помощью этого кода скопировать данные с серверной таблицы в локальную...структура таблиц идентична...
насколько я понял, получается что предложенный вами код
Код:
if DMFm.OraQuery2.FieldsCount<> DMFm.IBTable1.FieldsCount
будет всегда давать мне ShowMessage,
так как одна таблица пустая другая с данными...

или я чего то недопонимаю?

Заранее спасибо за помощь
По всей видимости чего-то недопонимаете так как FieldCount и RecordCount немного разные вещи
astecenko вне форума Ответить с цитированием
Старый 09.08.2012, 06:02   #12
d_adilet
Пользователь
 
Регистрация: 13.01.2010
Сообщений: 49
По умолчанию

Цитата:
Сообщение от evg_m Посмотреть сообщение
в сторону перехода отказа от IBTable и перехода на SQL. IBQuery.

примерная схема
Код:
IBqueryDest.SQL:='insert (....) values (...)'; // пишем параметризированный запрос на добавление (можно сделать еще на этапе конструктора( дизайнера) форм  )

while not IBQuerySource.EOF do begin  // здесь был IBQuery1 !!
// заполняем параметры (копируем поля из исходного запроса)
  IBQueryDest.parameters.... :=IBQuerysource.fileds.....; 
  ...........................................................
  IBQueryDest.ExecSQL; // выполняем  

  IBQuerySource.Next; 
end;
Спасибо большое,
буду пробовать
d_adilet вне форума Ответить с цитированием
Ответ


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



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
ошибка List index out of bounds (0) Natalie023 Помощь студентам 9 17.12.2011 19:27
Почему ошибка 'List index out of bounds (0)'? WandererX Общие вопросы Delphi 7 20.06.2010 11:17
Ошибка List Index out of bounds Rapala Помощь студентам 1 03.05.2010 17:33
Ошибка List index of bounds(1) Blue Heron Помощь студентам 5 17.03.2010 00:38
ошибка:List index out of bounds tanek Помощь студентам 7 26.12.2009 20:38