С помощью OracleDataSet (DOA) получаю данные с сервера, и пытаюсь перегнать их в ClientDataSet.
Делаю что-то типа такого:
ClientdataSet1.Close;
ClientdataSet1.FieldDefs := OracleDataSet1.FieldDefs;
OracleDataSet1.First;
while not OracleDataSet1.Eof do begin
ClientDataSet1.Append;
for i := 0 to OracleDataSet.Fields.Count-1 do
ClientDataSet1.Fields[i].Value := OracleDataSet1.Fields[i].Value;
ClientDataSet1.Post;
OracleDataSet1.Next;
end;
по логу вижу, что в ClientDataset1 записывалась 21 строка, но после каждого Post
recordcount всеравно оставался 0. И после окончания переливания он пустой.
Под Windows+Delphi такого никогда небыло, в вот здесь очень часто.
Подобная операция выполняется (выгрузка и потом перекачка) очень много раз, но примерно
после раза 3-4-5 возникает описанная выше ситуация, и спасает только перезагрузка приложения.
Ситуация снова повторяется.
Подскажите что и где я не так делаю, или другой вариант решения данной проблемы.
