![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Проблема с DBGridEh библиотеки EhLib и Адо [D7]
ArchValentin © (2009-03-05 12:07:00)Доброго времени суток. База данных фаил аксесс, связываюсь с ним через Адо. Хочу чтобы при клики на заголовок колонки, таблица сортировалась, решил использовать для этого DBGridEh. Подключаю модуль EhLibADO и при клике на заголовок получаю invalid class typecast
BDS 2006
KSergey (2009-03-10 12:20:00) [1]зачем такая поделка может понадобиться? тем более раз ADO умеет сортировать без переоткрытия. К стати, в такой парадигме уход указателя с тек. записи не беспокоит?
ArchValentin (2009-03-10 11:24:00) [2]поковырялся еще чуток, плюнул и сделал следующее, вдруг кому понадобится
procedure TDogForm.DBGridEh1TitleClick(Column: TColumnEh);
begin
case Column.Title.SortMarker of
smDownEh:
begin
qdog.SQL.Clear;
qdog.SQL.Add('select * from dog order by '+Column.FieldName);
qdog.Active:=true;
end;
smUpEh:
begin
qdog.SQL.Clear;
qdog.SQL.Add('select * from dog order by '+Column.FieldName+' desc');
qdog.Active:=true;
end;
end;
end;
KSergey (2009-03-10 09:53:00) [3]скопировать EhLibADO и ручками дошаманить по месту сообразно применяемым типам. Не знаю как сейчас, но когда-то этот модуль был излишне примитивен, подходил только как пример/шаблон для развития собственного.