FibPlus

← →
ligor (2003-04-28 21:25) [0]

Записываю в БД из текстовых файлов большой объем
информации где то на 1500-2000 выскакивает ошибка
"Out of memory"

← →
Johnmen © (2003-04-28 22:43) [1]

Как записываешь ?

← →
ligor (2003-04-28 22:51) [2]

После каждой записи
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;
что типа этого

← →
Zacho © (2003-04-28 23:04) [3]

Скорее всего, тебе действительно не хватает памяти. Посмотри, достаточно ли места на винте под своп. Поставь UniDirectional:=true или для записи в БД воспользуйся аналогом TIBSQL (не помню, как он называется в FIBPlus) Кстати, не плохо бы приводить более подробную информацию, по твоему коду ничего вразумительного сказать нельзя, непонятно даже какой именно компонент используешь. Или может вообще у тебя бесконечный цикл где-нибудь получается, вот свободная память и заканчивается.

Используй запрос в TpFIBQuery для прямой вставки. И никаких локальных наборов данных !

FibPlus Найти похожие ветки