» Использование DevExpress (часть 4)

kniazkinP
Влияет! Работает только при NewItemRow.Visible := False

marser

Цитата:

Влияет! Работает только при NewItemRow.Visible := False

Чудо свершилось Оно заработало! Спасибо! А никак нельзя настроить чтобы работало и так и так?

kniazkinP

Цитата:

А никак нельзя настроить чтобы работало и так и так?

Это уже перебор! Что-нибудь одно - или так, или так.

как сделать, чтобы в Grid в ячейке по условию мигал индикатор, предположим восклицательный знак, спасибо

tatbesidovska
Можно стиль сделать, но он не динамический через OnGetContentStyle или подставлять компонент их репозитория или текст OnGetPropertiesForEdit

tatbesidovska

Цитата:

как сделать, чтобы в Grid в ячейке по условию мигал индикатор, предположим восклицательный знак, спасибо

Обработать событие OnCustomDrawCell

Добавлено:
Поторопился написать - не сразу заметил слово "мигал". Ecли использовать OnCustomDrawCell, то по таймеру нужно выставлять или снимать "флаг" и вызывать cxGrid.Invalidate. Хреново получится!

Hi All
а как связать разные tDxBar что бы на меню И на кнопку было одно действие ??

JohnSilver182
Создаешь кнопку в dxBarManager и тащишь мышкой сначало на один, потом на второй dxBar.

marser А там вроде какието LINK-и моно создавать

JohnSilver182
В дизайнтайме линки автоматически создадутся.

ПОдскажите, а как в зависимости какая дата стоит в ячейке закрасить строки в gridView? GridControl Devexpressовский

tatbesidovska
Свойство OnGetContentStyle
там обработчик

Код: If (ARecord.IsData) and (ARecord.Values[AItem.Index]=1234) Then AStyle:=dm_Rk_Tariffs.st_My_ID;

нет такого свойства у gridView, во всяков случае я его не нашла

tatbesidovska
Это свойство ячейки(Column)

Цитата:

Hi All
а как связать разные tDxBar что бы на меню И на кнопку было одно действие ??

кнопу перетаскиваете и в меню, и на панель.

Добавлено:

Цитата:

Да, спасибо, нашёл! А почему же всё равно, перемстившись на последнюю строку, нажав стрелку вниз, не добавляется новая строка?

Цитата:

И у меня вообще нету FibDataSet.. Стоит Datasouce и table

Может у тебя компонента table - ReadOnly, т.е. только для чтения?

tatbesidovska

Цитата:

ПОдскажите, а как в зависимости какая дата стоит в ячейке закрасить строки в gridView? GridControl Devexpressовский

Если нужно закрасить всю строку, а не одну ячейку, то удобнее использовать событие схGridTableView.OnCustomDrawCell

Код: procedure TForm1.cxGridTableView1CustomDrawCell(Sender: TcxCustomGridTableView; ACanvas: TcxCanvas; AViewInfo: TcxGridTableDataCellViewInfo; var ADone: Boolean);
begin
if not AViewInfo.Selected and VarSameValue(AViewInfo.GridRecord.Values[<OurColumnDate>.Index], <OurDate>) then
begin
ACanvas.Brush.Color := clYellow;
ACanvas.Font.Color := clRed;
end;
end;

kniazkinP

Цитата:

Чудо свершилось Оно заработало! Спасибо! А никак нельзя настроить чтобы работало и так и так?

Код: if Key = VK_DOWN then
if DataController.GetRecordCount-1=DataController.Controller.FocusedRecordIndex then
begin
DataController.Append;
DataController.GotoLast;
end;

tatbesidovska
используй событие RowStyle - там из аргумента есть доступ к Appearance, а из Appearance свойство backcolor.

TechnoDreamer

Цитата:

if Key = VK_DOWN then
if DataController.GetRecordCount-1=DataController.Controller.FocusedRecordIndex then
begin
DataController.Append;
DataController.GotoLast;
end;

Не вводите народ в заблуждение. При NewItemRow.Visible := True это не сработает!

marser, с чего бы это? Код взят из рабочего проекта.

Цитата:

В дизайнтайме линки автоматически создадутся.

Ничего не понял про них .
Создаются по непонятному принципу .

Идею Линков я понимаю так .
Создаю Линк . Пишу OnCliсk на Link
К dxBarButton цепляю LINK

А у dxBarButton Вобще свойства linkItem нет !!!
Зато есть у dxSusItem . Нехрена контейнеру !! ItemLINK ???!!

TechnoDreamer

Цитата:

marser, с чего бы это? Код взят из рабочего проекта.

Еще раз проверил. При NewItemRow.Visible := True (наверху весит строчка: "Click here to add a new row") положительного результата получить не удалось.

Добавлено:
JohnSilver182

Цитата:

Создаю Линк . Пишу OnCliсk на Link

У TdxBarItemLink события OnClick нет, есть у TdxBarItem - dxBarButton.

Цитата:

К dxBarButton цепляю LINK

Наоборот. К линку цепляется dxBarButton:
dxBarItemLink.Item := dxBarItem

Пример организации панели кнопок как у 1С в многодокументальном приложении (MDI).


На главной форме внизу лежит Bar1 типа TdxBar

Создание и показ кнопки на панели. Этот код вызывается при создании каждой дочерней формы

Код: procedure TfmMain.CreateFormButton(form1:TForm);
var
ABar : TdxBar;
NewButton : TdxBarButton;
NewItemLink : TdxBarItemLink;
begin
inc(iButtonsCount);
ABar := Bar1;
NewButton := TdxBarButton.Create(self);
NewItemLink := ABar.ItemLinks.Add;
NewItemLink.Item := NewButton;
NewItemLink.Item.Tag := form1.Handle;
NewButton.Tag := form1.Handle;
NewButton.Name := 'dxButton'+IntToStr(NewButton.Tag);
NewButton.Caption := form1.Caption + '[' + IntToStr(iButtonsCount) + ']';
NewButton.Hint := form1.Caption;
NewButton.OnClick := dxBarButtonClick;
NewButton.ButtonStyle := bsChecked;
NewButton.Down := true;
NewButton.PaintStyle := psCaptionGlyph;
NewButton.GroupIndex := 1;
NewButton.Glyph.Width := 16;//GetSystemMetrics(SM_CXSMICON);
NewButton.Glyph.Height := 16;//GetSystemMetrics(SM_CYSMICON);
NewButton.Glyph.Canvas.Draw(0,0,form1.Icon);
ABar.Control.RepaintBar;
end;

Добрый день.
Не подскажите как можно выйти из режима редактирования ячейки cxGrida.

Ситуация такая.
У меня на поле висит много обработчиков. и когда я встаю на ячейку попадаю в режим редактирования ячейки. дальше если начать прокручивать грид колесиком. происходят тормоза. необходимо перед прокруткой выходить из режима редактирования и спокойно прокручивать грид.
пробовал в событии OnMouseWheel делать Post, но не помогает. и ни как не могу найти как можно выйти из редактирования

kirdub
Попробуйте Properties.UseMouseWheel := False

Может так?
http://www.sql.ru/Forum/actualthread.aspx?bid=20&tid=769490&hl=

Добавлено:
Спрятать редактор:

Код: <View>.Controller.EditingController.HideEdit := True;

X11, большое спасибо получилось.

Подскажите, как то можно в ribbonPageGroup добавить элемент не являющейся BarItem, допустим GaugeControl. Вообщем хочется разместить его в ribbonControl и не знаю как? Возможно можно добавить какой то barItem в который потом добавить GaugeControl.

alexander315435
TdxBarControlContainerItem не подойдёт?

marser, спасибо, а в winforms как аналогичный компонент называется, сори, что сразу не сказал что для winforms.