Большой текстовый файл

[D_E_N]

вот так создаю

    CoInitialize(nil);
    logauto('Получение данных');
    AdoCon:=TADOConnection.Create(nil);
    ADOQry:= TADOQuery.Create(nil);
    AdoCon.ConnectionString:='Provider=Microsoft.Jet.OLEDB.4.0;Data Source='+ExtractFilePath(ParamStr(0))+'\Data\base.mdb;Persist Security Info=False';
    AdoCon.LoginPrompt:=false;
    AdoCon.Mode:=cmShareDenyNone;
    AdoCon.Provider:='Microsoft.Jet.OLEDB.4.0';
    ADOQry.Connection:=adocon;
    AdoCon.Connected:=true;

вот так уничтожаю

AdoCon.free;
ADOQry.free;
CoUninitialize;

вот код обработки

[Luuzuk]

Надеюсь, вы не для каждого получения данных новое подключение создаете?

[D_E_N]

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

Надеюсь, вы не для каждого получения данных новое подключение создаете?

Нет. В начале потока создаю и когда поток завершаю освобождаю.

[Stilet]

В начале потока создаю и когда поток завершаю освобождаю.

Логично. Но все равно ИМХО задача того не стоит. Хотя может я ее не до конца понял.

[D_E_N]

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

Логично. Но все равно ИМХО задача того не стоит. Хотя может я ее не до конца понял.

а как быть? работает тяжелее чем когда был в текстовом файле а firebird пытался создать но так и не получилось... Через IBConsole ошибка Unavable database. как быть что посоветуете ? как решить задачу? Посмотрите код обработки может я так что то ошибочно делаю..

[eval]

у вас удивительная способность говорить ничего не рассказывая, что значит "работает тяжелее"?

с базой надо учиться работать, объектную модель надо пересматривать и т.п....

[D_E_N]

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

у вас удивительная способность говорить ничего не рассказывая, что значит "работает тяжелее"?

извиняюсь))) сделал БД на Access работать программа стала медленнее

[eval]

(pos(model,ADOQry.FieldByName('Ìàðê à').AsString)>0)

такие моменты не должны быть в коде

[D_E_N]

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

такие моменты не должны быть в коде

а как сравнивать полученные данные? сразу в запрос вставлять и по oef делать результат?

[eval]

структуру данных надо делать правильно