![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
FibPlus [D7, IB6.x]
ligor © (2003-04-28 21:25:00)Записываю в БД из текстовых файлов большой объем
информации где то на 1500-2000 выскакивает ошибка
"Out of memory"
Johnmen (2003-04-28 23:39:00) [1]Используй запрос в TpFIBQuery для прямой вставки. И никаких локальных наборов данных !
Zacho (2003-04-28 23:04:00) [2]Скорее всего, тебе действительно не хватает памяти. Посмотри, достаточно ли места на винте под своп. Поставь UniDirectional:=true или для записи в БД воспользуйся аналогом TIBSQL (не помню, как он называется в FIBPlus) Кстати, не плохо бы приводить более подробную информацию, по твоему коду ничего вразумительного сказать нельзя, непонятно даже какой именно компонент используешь. Или может вообще у тебя бесконечный цикл где-нибудь получается, вот свободная память и заканчивается.
ligor (2003-04-28 22:51:00) [3]После каждой записи
AutoComit
with dm.tbPack do begin
Append;
FieldByName("ENTNMB").AsString:= EntNmb;
FieldByName("PERIOD").AsString:= SList[6];
FieldByName("KODKAT").AsString:= SList[7];
FieldByName("TPFIS4I").AsString:= SList[10];
FieldByName("TPFIS4K").AsString:= SList[11];
FieldByName("PACKNMB").AsString:= SList[1];
FieldByName("FILENAME").AsString:= ExtractFileName(FName);
Post;
Result:= FieldByName("ID").AsInteger;
end;
что типа этого
Johnmen (2003-04-28 22:43:00) [4]Как записываешь ?