Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Сортировка по клику на колонке, в EhLib 
:(
    Опции темы
delphi_
Дата 22.4.2008, 22:59 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 140
Регистрация: 30.11.2006

Репутация: нет
Всего: -1
а что мешает погуглить на счет ошибок аксесса?
PM MAIL   Вверх
Veniamin
Дата 23.4.2008, 10:40 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 44
Регистрация: 3.3.2005

Репутация: нет
Всего: нет
delphi_ Эта ошибка не в Access, а в Делфи после выполнения команды сортировки выскакивает.
PM MAIL   Вверх
Akella
Дата 23.4.2008, 18:36 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Творец
****


Профиль
Группа: Модератор
Сообщений: 18485
Регистрация: 14.5.2003
Где: Корусант

Репутация: 29
Всего: 329
Вот ещё по поводу сортировки
http://www.delphiplus.org/articles/compone...grid/index.html
PM MAIL   Вверх
Ganoci
Дата 14.5.2008, 15:33 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 78
Регистрация: 8.2.2008

Репутация: нет
Всего: нет
Ребят, помогите плз решить возникшую проблему!
Сортирую по указанной схеме:
Цитата

procedure TForm1.DBGridEh1TitleClick(Column: TColumnEh);
begin
case Column.Title.SortMarker of
    smNoneEh:
    begin
      two.Sort:=Column.FieldName;
      Column.Title.SortMarker := smDownEh;
    end;
    smDownEh:
    begin
      two.Sort:=Column.FieldName ;
      Column.Title.SortMarker := smUpEh;
    end;
    smUpEh:
    begin
      two.Sort:=Column.FieldName;
      Column.Title.SortMarker := smNoneEh;
    end;
    end; //case

end;


Если подобную сортировку применить к Гриду (таблице), несвязанному с другими таблицами, то все норма!
У меня же две таблицы взаимосвязаны, т.е.  вопервых есть связь в БД, а во-вторых, на форме организованно все так, что есть главная таблица и от каждая её строки (клику по ней) - идет ветвление на насколько строк уже в другом гриде.
http://ipicture.ru/Gallery/Viewfull/1851716.html

Так вот если отсортировать поля в подчиненном гриде, то когда меняешь позицию (клик по другой строке) в главном гриде, то связи с младшей таблицей прерывается иона пустует.
http://ipicture.ru/Gallery/Viewfull/1851744.html
PM MAIL   Вверх
Дюша2011
Дата 13.1.2011, 20:53 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 1
Регистрация: 13.1.2011

Репутация: нет
Всего: нет
Цитата(Ganoci @ 14.5.2008,  15:33)
Ребят, помогите плз решить возникшую проблему!
Сортирую по указанной схеме:
Цитата

procedure TForm1.DBGridEh1TitleClick(Column: TColumnEh);
begin
case Column.Title.SortMarker of
    smNoneEh:
    begin
      two.Sort:=Column.FieldName;
      Column.Title.SortMarker := smDownEh;
    end;
    smDownEh:
    begin
      two.Sort:=Column.FieldName ;
      Column.Title.SortMarker := smUpEh;
    end;
    smUpEh:
    begin
      two.Sort:=Column.FieldName;
      Column.Title.SortMarker := smNoneEh;
    end;
    end; //case

end;


Если подобную сортировку применить к Гриду (таблице), несвязанному с другими таблицами, то все норма!
У меня же две таблицы взаимосвязаны, т.е.  вопервых есть связь в БД, а во-вторых, на форме организованно все так, что есть главная таблица и от каждая её строки (клику по ней) - идет ветвление на насколько строк уже в другом гриде.
http://ipicture.ru/Gallery/Viewfull/1851716.html

Так вот если отсортировать поля в подчиненном гриде, то когда меняешь позицию (клик по другой строке) в главном гриде, то связи с младшей таблицей прерывается иона пустует.
http://ipicture.ru/Gallery/Viewfull/1851744.html

Я проблему решил такми образом:

ADOTable2.IndexFieldNames := 'ID2, Глубина ASC';


где ID2 это индексное поле через которе связана таблица 2 с главной таблицей, а Глубина - это сортируемое поле.
При этом методе не теряется связь между таблицами.
PM MAIL   Вверх
superVad
Дата 13.1.2011, 21:27 (ссылка) | (голосов:1) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 735
Регистрация: 6.4.2006
Где: Черкассы, Украина

Репутация: 3
Всего: 15
И трех лет не прошло.
PM MAIL   Вверх
Ответ в темуСоздание новой темы Создание опроса
Правила форума "Delphi: Базы данных и репортинг"
Vit
Петрович

Запрещено:

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делиться вскрытыми компонентами


Обязательно указание:

1. Базы данных (Paradox, Oracle и т.п.)

2. Способа доступа (ADO, BDE и т.д.)


  • Литературу по Дельфи обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Вопросы по реализации алгоритмов рассматриваются здесь
  • 90% ответов на свои вопросы можно найти в DRKB (Delphi Russian Knowledge Base) - крупнейшем в рунете сборнике материалов по Дельфи
  • Вопросы по SQL и вопросы по базам данных не связанные с Дельфи задавать здесь

FAQ раздела лежит здесь!

Если Вам помогли и атмосфера форума Вам понравилась, то заходите к нам чаще! С уважением, Vit, Петрович.
 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Delphi: Базы данных и репортинг | Следующая тема »

Подписаться на тему | Подписка на этот форум | Скачать/Распечатать тему


 




[ Время генерации скрипта: 0.0698 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
 По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.