![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
DBGRID - Имя поля (FieldName) [D6]
VALUA © (2006-06-08 14:42:00)Господа , что делаю не так ? Кликаю на заголовке поля (pole1) и набор данных должен проиндексироваться по этому полю и обновиться ->
procedure TForm16.DBGrid2TitleClick(Column: TColumn);
begin
if (Column.FieldName = 'pole1') then begin - не срабатывает условие
IBQuery1.SQL.Clear;
IBQuery1.SQL.Add('Select * from FILE');
IBQuery1.SQL.Add('where (Priz = 1) and (Kod = :P0)');
IBQuery1.SQL.Add('Order by pole1,pole2,pole3');
IBQuery1.Params[0].AsInteger := p1;
IBQuery1.Open;
end;
end;
Torin (2006-06-08 16:46:00) [1]Ток следует учесть, что чем больше таблица, тем дольше она индексируется. Я не знаю всего ТЗ, но мне кажется, что индексировать на OnTitleClick - не самая лучшая идея. Это как правило делается один раз
Например, у мя был DBF на 3 гига (насколько я помню), и он индексировался
около минут 15... (Delphi3, Win95). Правда, было это лет 6 назад...
Ega23 (2006-06-08 14:47:00) [2]
if (ANSIUpperCase(Column.FieldName) = ANSIUpperCase('pole1'))
?