Перенос данных в из 1 таб. в другую...

[ivp88]

Всем спасибо кто помог разобраться с моей проблемой ........

[Pitbull]

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

Что касается метода InsertRecord, то там все просто.

При его выполнении в таблицу вставляется новая запись, заполняется значениями из массива, переданного в качестве параметра, и выполняется метод Post.

Значения в массиве должны следовать в том же порядке, в каком определены поля в вашем наборе данных и тип значения должен соответствовать типу поля. Если значение поля не определено, то в качестве парметра передается значение null. Если значений в массиве меньше, чем полей в наборе данных, то остальным полям присваивается значение null.

При вставке записи ее положение в таблице определяется одним из следующих способов:

- Для индексированных таблиц Paradox и dBASE запись вставляется в позицию, соответствующую текущему индексу.

- Для неиндексированных таблиц Paradox запись вставляется в текущую позицию курсора.

- Для неиндексированных таблиц dBASE, FoxPro и Acess новая запись добавляется в конец таблицы.

Только что вставленная запись становится активной.

Допустим поля в Table2 определены в следующем порядке: ID_Vozvr, Date_Vozvr, InvenNom, NazvKn, ID_Chit, ID_Bibl и их структура полностью соответствует структуре Table3.
Поэтому мы можем отказаться от приведения значений из Table2 к формату Table3 (ваше Table2.FieldByName('InvenNom').AsSt ring) и обратиться непосредственно к значению поля следующим образом:

Table2['InvenNom']

В конечном случае это будет выглядеть примерно так:

Table3.InsertRecord([Table2['ID_Vidachi'],null,Table2['InvenNom'],Table2['NazvKn'],Table2.['ID_Chit'],Table2['ID_Bibl']]);

И все же я настаиваю на использовании запросов!!!!
ві так заостряете внимание на индексах, но ведь неправильное обращение с ними может привести к замедлению работі базі.

[Andrei]

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

И все же я настаиваю на использовании запросов!!!!

Дело вкуса IMHO, с локальными базами, особенно Pradox, BDE работает намного быстрее.

ві так заостряете внимание на индексах, но ведь неправильное обращение с ними может привести к замедлению работі базі.

Я всего лишь процитировал Help Delphi 7 для метода InsertRecod в собственном переводе и со своими комментариями.

Акценты на работе с индексами расставил не я, а разработчики Delphi и учитывать эти особенности при работе с локальными таблицами разработчику просто необходимо. Например, если позиция вновь вставляемой записи окажется в начале таблицы, то программе придется вставить запись в нужное место и переписать заново все записи, идущие после нее. Представляете, что может случиться, если файл таблицы нехилых размеров и, к тому же, постоянно переписывается.

Раньше я работал с таблицами FoxPro. Там вопросы сохранности данных, IMHO, продуманы лучше чем в Paradox или Acess. Например:
- Они не ипользуют Insert, а только Append. И новые записи всегда дописываются в конец файла.
- Индексы вынесены в отдельный файл и для каждого индекса можно создать свой собственный .IDX файл, если нужно. Потому как файлы индексов переписываюся часто и по многу раз и вследствии этого часто же и слетают. А заново переиндексировать таблицу, в случае чего, проблем не составляет.

PS: Метод InsertRecord, так же как метод Insert является общим для всех датасетов, в том числе и с использованием SQL. В хелпе есть еще один пунктик, который звучит примерно так:

- Позиция вновь вставляемой записи в базах данных SQL зависит от применяемой SQL. Индексы обновляются автоматически.