Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > Delphi: Базы данных и репортинг > TADOQuery скорость перемещения курсора

Автор: namervasek 1.6.2012, 15:42

всем здрасте!
есть код

Код


    MainQuery.Close;
    MainQuery.SQL.Clear;
    ConstructQueryStr(MainQuery.SQL);
    
    {$IfNDef Release}
    J := GetTickCount;
    {$EndIf}

    MainQuery.Open;

    while not FSelelectComplete do
    begin
      Application.ProcessMessages;
    end;

    {$IfNDef Release}
    ShowMessage('Запрос выполнен = ' +  IntToStr(GetTickCount - J));
    J := GetTickCount;
    I := 0;
    {$EndIf}

    MainQuery.First;
    MainListView.Items.BeginUpdate;
    while not MainQuery.Eof  do
    begin

      {$IfNDef Release}
      Inc(I);
      {$EndIf}

      MainQuery.Next;
    end;

    {$IfNDef Release}
    ShowMessage('Запрос пройден за = ' +  IntToStr(GetTickCount - J));
    ShowMessage('Кол-во полученых записей = ' + IntToStr(I));
    {$EndIf}

Делается асихроный запрос в базу результат запроса примерно 500000 строк.
Первая месага показывает время около 17000(вполне приемлемое).
Вторая месага показывает цифру около 1760000(это где то минут 20 вышло).
Вопрос такой: можно как то ускорить перемещение курсора?

Автор: Данкинг 1.6.2012, 15:49

А смысл? Может, возможно решить задачу как-то иначе?

Автор: namervasek 1.6.2012, 16:13

Смысл сего творения в заполнении ListView инфой. заполняется List соотвествено в цикле.

Автор: Данкинг 1.6.2012, 16:15

А, ну тогда вариант - сделать обычный грид вместо листвью.

Автор: namervasek 1.6.2012, 16:31

DBGrid?
Если да то скажу почему выбор пал на View.
После формирование View необходимо что бы можно было
1) результат сортировать по любой колонке,
2) сортировка должна быть быстрой(запрос к базе с order by ни приемлем с таким количеством строк)
3) мюльтиселект строк
4) разукрашивать строки таблиц как захочется(причем разукрашивать надо так что бы если строка выделена то разукрашивать не надо)
Самые выжные первые дав пункта.
Вторые два в DBGrid реализовать конечно можно, но четвертый пункт делается прямо сказать как то через ж... (особено закраска строк)

Пробовал TMS-ий грид но проблемы там такие же как и обычного