Форум: "Базы";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.02.11;
Скачать: [xml.tar.bz2];




Вниз

DBGrid 


Есипенко   (2002-01-12 00:59) [0]

Уважаемые мастера! Подскажите пожалуйста начинающему как програмно изменить порядок следования столбцов в DBGrid и
как повесить одно PopupMenu на поле данных а второе PopupMenu
на заголовки столбцов?
Буду признателен за ответы.



Sergey13   (2002-01-14 11:42) [1]

1. DBGrid отображает то что есть в таблице или запросе. Поэтому менять порядок надо при выборке данных. Применять для этого индексы(для Table) или предложение ORDER BY (для Query).
2. PopupMenu врядли удастся повесить на разные части ОДНОГО контрола без извратов.



TonnyS   (2002-01-14 12:31) [2]

Если через Query, то порядок столбцов в DBGrid зависит от порядка полей в SELECT:
SELECT * FROM mytable - так как в таблице,
SELECT Name,Fam,year FROM MyTable - уже в такой последовательности.

Popup: отлавливаеш OnMouseDown DBgrid, по позиции курсора определяеш номер столбца, соответственно обрабатываеш попуп-меню (какие-то пункты может невидимыми сделать надо) и вручную его раскрываеш.



SergVlad   (2002-01-14 13:42) [3]

Порядок можно задавать и после визуализации данных в DBGid.
Последовательно пробежаться по всем полям tb или query (или видимым или нужным) и установить новые индексы
qu.Fields[i].Index := newidx;



evgeg   (2002-01-15 20:57) [4]

> Sergey13, TonnyS
Ну вы даете!
Переоткрывать запрос, чтобы просто поменять порядок столбцов!

> SergVlad
Уже лучше, но привязываемся к набору данных, а не к сетке. А если одну набору соответсвует несколько сеток?

Есть такое свойство TDBGrid.Columns. В Дельфи 2 нельзя у него нельзя напрямую менять порядок столбцов (что странно, так как перетаскивать стольцы мышью в run-time можно),
но можно воспользоваться назначением TDBGrid.Columns.Items [i].FieldName.
Например, меняем i и k-й столбцы:


var s: string;
begin
s := DBGrid1.Columns.Items [i].FieldName;
DBGrid1.Columns.Items [i].FieldName := DBGrid1.Columns.Items [k].FieldName;
DBGrid1.Columns.Items [k].FieldName := s;
end;


IMHO в старших версиях Дельфи DBGrid.Columns более удобен.
Им и надо пользоваться.



evgeg   (2002-01-15 20:58) [5]

Поправка

> IMHO в старших версиях Дельфи DBGrid.Columns более удобен.

IMHO в старших версиях Дельфи DBGrid.Columns должен быть более удобен.



SergVlad   (2002-01-15 21:09) [6]

Ok
Важны правильные альтернативы.




Форум: "Базы";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.02.11;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.73 MB
Время: 0.024 c
1-32258           Оля                   2002-01-28 12:08  2002.02.11  
Инсталлятор


1-32222           Duce                  2002-01-25 14:52  2002.02.11  
Error : Control has no parent window


1-32282           Bodia                 2002-01-20 19:42  2002.02.11  
WebBrowser


6-32303           Дремучий              2001-11-19 22:24  2002.02.11  
как скачать картинку?


3-32164           kserg@ukr.net         2002-01-16 17:24  2002.02.11  
Kаким событем можно отловить и