» Использование DevExpress 2

Dronton2
TableView.OptionsView.HeaderHeight работает только в том случае, если все столбцы имеют стандартный размер (Column.Position.LineCount = 1)

Если же хотя бы один столбец имеет Column.Position.LineCount > 1, то TableView.OptionsView.HeaderHeight перестает действовать - все столбцы, кроме изменяемого, принимают стандартную высоту, изменяемый же столбец принимает высоту Column.Position.LineCount * (стандартная высота).

TableView.OnGetCellHeight - опять же, вызывается только в случае, если столбцы имеют стандартный (Column.Position.LineCount = 1) размер.

Продолжаю искать решение =) ...

Половинчатое решение найдено.

Устанавливаем Column.Position.LineCount = 1, и меняем высоту заголовков всех колонок разом с помощью TableView.OptionsView.HeaderHeight.

Хотелось сделать таблицу с разной высотой заголовков столбцов (т.е., например, высота заголовка столбца Col1 равна 7 усл. ед., а высота заголовка столбца Col2 равна 10 усл. ед.), чтобы при этом все ячейки имели стандартную высоту - но ИМХО это пока что невозможно.

Спасибо всем откликнувшимся

NuclearDeath1, я написал:

Цитата:

Событие <GridDBTableView>+<ИмяСтолбца>.OnCustomDrawHeader - прямо в нем руками с помощью местного Canvas'а рисовать заголовок столбца. Примеры рисования есть в Demos'ах стандартной поставки

Нужно-то всего:
1. Сэмулировать рисование столбцов (так как себе надо);
2. Рисование треугольника сортировки;
3. Вывод текста (заголовка столбца).

И гордо устанавливать ADone в True

как в cxGrid'е использовать контекстный поиск?

DroN_S
SomeView.OPtionsBehavior.IncSearch = true
SomeColumn.Options.IncSearch = true

Разрешает поиск по колонке, когда курсор находится в ячейке этой колонки.

afiget
пардон, не в cxGrid'е, а в dxDBGrid'е осуществить контекстный поиск?

korobovmax

Я подумал и понял, что вы предложили правильное решения )

Просто я уперся и хотел найти какое-то стандартное решение, без обработки событий и добавления функционала, по-простому решить вопрос )

Спасибо за ответы.

DroN_S
С этим не помогу, давно обновился.

Здравствуйте. Помогите пожалуйста с проблемой.
Использую Quantum Grid v.6.
Работаю следующим образом:
Delphi. Компоненты TQuery, TDataSource, TAdoConnection.
Выполняю запрос (запросы самые разнообразные). Резултат отображаю в гриде:
cxGrid1DBTableView1.DataController.CreateAllItems(false);
Таким образом, в режиме дизайна ничего не проектирую.
Стоит следующая задача.
Большинство запросов типовые и возвратят примерно следующее:
[Идентификатор], [Количество], [Цена]. Остальные поля не столь выжны.
Нужно группировать данные. Переношу в верхнюю часть грида столбец [Идентификатор] и получаю все почти в том виде, как это и требуется.
Теперь хочется рядом с наименованием идентификатора видеть общее количество и общую цену для группы. Как это сделать?
В хелпе нашел пример. Но это только для того случая, когда в режиме дизайна создаются поля (Table View Tutorial. Step 8: Group Summary Creation), т.е. нам уже известно, какие поля будут во View. Как такое сделать в рантайме?

afiget
оказалось очень банально, надо было выставить свойство edgoAutoSearch в true и всё
вот следующий вопрос: как загрузить картинку в dxDBGrid...
я делаю сейчас так: создал поле типа GraphicColumn, сделала его первым по счёт (IndexCol=0) и на событие OnCustomDrawCell повешал такой код

Код:
if (AColumn = OrgList.Columns[0]) and
(dm.IView.FieldByName('EXT').AsInteger = 0) then
begin
OrgList.Canvas.Draw(ARect.TopLeft.x, ARect.TopLeft.y, frmView.Excel);
OrgList.Cursor := crHandPoint;
end;

Доброе время суток.
А можно в гриде вызвать программным путем окно фильтра на определенное поле? Если да, то подскажите как.

Цитата:

А можно в гриде вызвать программным путем окно фильтра на определенное поле? Если да, то подскажите как.

Пример программного добавления фильтра по текстовому полю. Текст для фильтрации задается в переменной FilterDisplayText:

Код:
var
FilterDisplayText, FilterText: string;
AItem: TcxCustomGridTableItem;
AItemList: TcxFilterCriteriaItemList;
...
with YourTableView do
begin
AItem := Items[GetColumnByFieldName(YOURFIELDNAME).Index];
FilterText := '%' + FilterDisplayText + '%';
try
DataController.Filter.BeginUpdate;
AItemList := DataController.Filter.Root.AddItemList(fboOr);
AItemList.AddItem(AItem, foLike, FilterText, FilterDisplayText);

AItem := Items[GetColumnByFieldName(YOURFIELDNAME).Index];
FilterText := '%' + FilterDisplayText + '%';
AItemList.AddItem(AItem, foLike, FilterText, FilterDisplayText);
finally
DataController.Filter.Active := true;
DataController.Filter.EndUpdate;
end;
end;

golkanavt
X11
как я понимаю, нужно было
Цитата:

вызвать программным путем окно фильтра на определенное поле

? т.е. выпадающий список в заголовке окна?

хорошо, а как окно фильтра вызвать?

Появилась неприятная "фича" для моих бухгалтеров после установки версии х.28, до этого работал на апрельской версии.
Ситуация такая:
На форме лежит TcxPageControl с одним TcxTabSheet
На TcxTabSheet лежат TcxVerticalGrid и две кнопки TcxButton

Пользователь вводит текстовые данные в TcxVerticalGrid, при нажатии на кнопку TcxButton выполняются действия. Раньше при нажатии на кнопку все действия выполнялись сразу, а с версией х.28 ситуация иная - нужно нажать два раза на кнопку. Т.е. получается, что при первом нажатии на кнопку (т.е. потеря TcxVerticalGrid'ом фокуса) ячейка в TcxVerticalGrid выходит из режима редактирования и фокус всё равно остаётся на TcxVerticalGrid.

А теперь вопрос: как побороть это поведение, и сделать так как было в апрельской версии, т.е при потере фокуса TcxVerticalGrid'ом ячейка принимала сделанные изменения (immediate post)

aQG
Поищите вот тут
GridClaimantsTV.DataController.Summary.GroupSummaryItems
Необходимо просто добавить нужные вам элементы.

Добавлено:
X11
Кстати в папке с QuantumGrid есть прекрасные демки с работой с фильтром
Также вам можно использовать компонент cxFilterControl и в качестве LinkComponent указать нужный вам грид.

Цитата:

Поищите вот тут
GridClaimantsTV.DataController.Summary.GroupSummaryItems
Необходимо просто добавить нужные вам элементы.

Ну, до этого дошел) Что делаю: захожу в режиме дизайна в редактор (кликаю на cxGrid1DBTableView1), перехожу в раздел Summary->Default fo groups. Здесь создаю Item: TcxGridDBTableSummaryItem. В рантайме, как я понимаю, для доступа к нему нужно сделать так: cxGrid1DBTableView1.DataController.Summary.GroupSummaryItems[0].Items[0].
В том же редакторе ставлю для этого итема:
Format: Сумма
Kind: skSum
Теперь пытаюсь использовать событие cxGrid1DBTableView1CustomDrawGroupCell.
Что здесь-то нужно делать? Как работать с полями.
Если не затруднит, дайте пожалуйста небольшой пример.

Нашел в хелпе следующее:

Код:
//The second summary group
with SummaryGroups.Add do
begin
//Add proposed grouping column(s)
TcxGridTableSummaryGroupItemLink(Links.Add).Column := tvOrdersProductID;
//Add summary items
with SummaryItems.Add as TcxGridDBTableSummaryItem do
begin
Column := tvOrdersQuantity;
Kind := skSum;
Position := spFooter;
Format := 'TOTAL = 0';
end;
with SummaryItems.Add as TcxGridDBTableSummaryItem do
begin
Column := tvOrdersPurchaseDate;
Kind := skMin;
Position := spFooter;
end;
end;
...

uazero
В обменнике (см.шапку) лежит версия х.29. Там это исправлено?

Dronton2, в версии х.29 поведение такое же. Сначала нужно выйти из режима редактирования ячейки.

Dronton2
uazero
28-ая версия работала корректно.
а в 29-ой верт.грид с кнопкой плохо работает (мож кнопка не срабатыват)
и еще в 29 нет скинов

похоже придется вертаться на 28-ую

Кстати, читая об изменениях в поведении грида со сменой версии вспомнил о своей проблеме - на форме лежит TabSheet с кучей табов, практически на каждом из них есть тулбары с хоткеями, наиболее актуальный из них - добавление записей по Insert. Работало все замечательно, в зависимости от активного sheet срабатывал нужный Action по этому хоткею. Несколько месяцев назад это точно работало, когда я как разработчик приложения принимал участие в работе отдела и сам вносил данные. Затрудняюсь сказать, на какой версии механизм сломался, и теперь вне зависимости от активной вкладки срабатывает Action самой первой, что не есть гуд, особенно теперь, когда операторы приложения научились работать с хоткеями и для ускорения обработки информации хотят делать все с клавиатуры. Сталкивался ли кто либо с этой проблемой и как ее решать?

Добавлено:
Текущая версия Dev - DevExpr_11_sep_2007

golkanavt, можно сделать один Action с желаемым хоткеем.
В нем сделать обработку:
case TabSheet.ActivePageIndex of
0: <ActionInsert0>.Execute;
...
N: <ActionInsertN>.Execute;
end;

Самый просто механизм

korobovmax
Сделать то можно, только мне непонятно, почему такие изменения в поведении компонент, чем это оправдано? Этак при каждом апдейте девок придется весь новый билд софта перелопачивать на предмет подобных "усовершенствований", ведь работало все нормально и тут нате.

golkanavt, я не знаю, какой у тебя обработчик стоит.
Мое решение - независимо от версий

Есть такая проблема.

Начальные условия:
1. Грид работает в unbound mode (заполняю ручками).
2. Сортировки отключены.
3. В грид залито примерно 60 000 строк.

Что делает пользователь:
1. использует popup фильтры, группировки
2. меняет значение одного поля с 1 на 0 и наоборот.

Какие возникают проблемы:
1. Если не использовать фильтры и группировки, то изменение значения поля происходит моментально. если же стоит фильтр, то изменение одного значения занимает до 3 сек. - это дофига.
Как я понял, грид в это время занимается перестройкой фильтров и сортировкой. Зачем - непонятно, т.к. ни в сортируемых, ни в отфильтрованых колонках ничего не поменялось.
2. Грид каждый раз при открытии попап фильтра заново его считывает - занимает секунды три. Опять же непонятно зачем - никаких изменений в фильтруемые поля не вносилось.

Код изменения одного значения:

Sender.DataController.BeginUpdate;
Sender.DataController.Filter.BeginUpdate;
try
s := '';
t1 := time;
if (ACellViewInfo.Item.Tag >0) and (ACellViewInfo.DisplayValue <> null) then begin
rl := TRightsLine(Integer(RightsGrid.DataController.Values[RightsGrid.DataController.FocusedRecordIndex,0]));
Right := rl.ObjectType.RightsById[ACellViewInfo.Item.Tag];
if Right.Value = 0 then
Right.Value := 1
else
Right.Value := 0;
end;
finally
RightsGrid.DataController.Filter.CancelUpdate;
RightsGrid.DataController.EndUpdate; // !!! вот эта операция занимает 3 секунды, все остальное проходит мгновенно
end;


Вопросы:

1. Как можно отключить постоянное построение фильтров?
2. Как при изменении значения обойти задержку на EndUpdate?

ivyanushkevich
Не уверен, что получится, но можно попробовать TcxCustomDataController.BeginUpdateFields
либо для фильтруемых полей, либо для обновляемых вместо DataController.BeginUpdate.
Не уверен я в итоговом результате, т.к. непонятно, что делает датаконтроллер при получении нотификации об изменении значения поля.

всем привет.

в обычном лукапном дб комбо можно было указать List Sourse, List field и Lisk key field, не указывая DataSouse, Datafield.
и тогда в нём можно было просто отобразить выбранное значение.
скажите, как настроить (не сомневаюсь, что можно) cxDbLookupComboBox, чтоб тоже показывал значение Listfield.
пока не получается

brookson
Используй OnGetDisplayText.
Но, если используешь cxDbLookupComboBox, то лучше указывать DataSource, иначе нет смысла его использовать.

Цитата:

всем привет.

в обычном лукапном дб комбо можно было указать List Sourse, List field и Lisk key field, не указывая DataSouse, Datafield.
и тогда в нём можно было просто отобразить выбранное значение.
скажите, как настроить (не сомневаюсь, что можно) cxDbLookupComboBox, чтоб тоже показывал значение Listfield.
пока не получается

Тоже БЫЛА такая проблема, пока не подсказали здесь же, что в обычном (НЕ DB) выпадающем списке cxLookupComboBox тоже есть listsource и всё остальное

<b>Dronton2</b>

получилось с cxLookupComboBox! забыл, что есть такое чудо. и там всё, как я хотел.