Перейти из форума на сайт.

НовостиФайловые архивы
ПоискАктивные темыТоп лист
ПравилаКто в on-line?
Вход Забыли пароль? Первый раз на этом сайте? Регистрация
Компьютерный форум Ru.Board » Компьютеры » Прикладное программирование » Использование DevExpress 2

Модерирует : ShIvADeSt

ShIvADeSt (07-02-2009 14:53): Продолжаем тут
http://forum.ru-board.com/topic.cgi?forum=33&topic=10123#1
 Версия для печати • ПодписатьсяДобавить в закладки
Страницы: 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122

   

ShIvADeSt



Moderator
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
DevExpress

Обмен опытом, обсуждение нюансов и решение проблем возникающих при использовании библиотеки компонент Developer Express




 
Сами прирученные компоненты частенько приходят на водопой сюда
 
DLL со скинами из библиотеки dxSkins, автор Ziltoid Подробнее... линк обновлен
Продолжение, начало тут
 

Всего записей: 3956 | Зарегистр. 29-07-2003 | Отправлено: 03:16 29-01-2007 | Исправлено: VitaliM, 15:47 24-11-2008
HeMet

Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Как можно убрать из Ribbon приложения ненужные втроенные скины? А то приложение очень много весит=(

Всего записей: 212 | Зарегистр. 05-09-2007 | Отправлено: 20:43 15-04-2008
X11



Silver Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
что-то я торможу....
есть строка в ExpressVerticalGrid типа LookupCombobox, как её программно вывалить?
 

Код:
 
(vgAreasID_INFOSOURCE.Properties.EditProperties as TcxLookupComboBoxProperties). .....
 


----------
/не мы такие, жизнь такая/

Всего записей: 3253 | Зарегистр. 24-11-2005 | Отправлено: 22:13 15-04-2008 | Исправлено: X11, 22:14 15-04-2008
VadimLou



Advanced Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
X11
 
see: property TcxCustomDropDownEdit.DroppedDown: Boolean
  and method (cxDropDownEdit.pas):
       procedure TcxCustomDropDownEdit.SetDroppedDown(Value: Boolean);
 
А ващетадлятакого рода задач достаточно алгоритма:
  - делаешь событие OnPoup, ставишь в нём точку останова
  - запускаеш свою прогу
  - вручную инициируешь вываливание - в результате попадаешь в точку останова
  - далее смотришь стек вызова и думаешь
 
Или просто аналишь сорцы:
 
type
  TcxCustomDropDownEditAccess = class(TcxCustomDropDownEdit);
...
begin
 ...
 
   TcxCustomDropDownEditAccess(vgAreasID_INFOSOURCE).DropDown;
 
Есть ещё св-во Properties.ImmediateDropDown.

Всего записей: 702 | Зарегистр. 22-07-2004 | Отправлено: 03:54 16-04-2008 | Исправлено: VadimLou, 03:58 16-04-2008
drunk2



Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Притормаживает приложения на слабых машинах. Формы подвисают(белеют, контролы исчезают), особенно где есть bar-ы. Как уменьшить потребление в ресурсах?
Код:
LookAndFeelController.Kind:=lfStandart;
LookAndFeelController.NativeStyle:=false;
Begin..EndUpdate используется везде.

Всего записей: 204 | Зарегистр. 27-10-2005 | Отправлено: 13:20 16-04-2008
X11



Silver Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
VadimLou, прости не доходят до меня пока ещё всё, что связано с девками:

Код:
 
TcxCustomDropDownEdit(vgAreasID_INFOSOURCE.Properties.EditProperties).DroppedDown := True;
 

 
что здесь не так?
 
Добавлено:

Цитата:
type
  TcxCustomDropDownEditAccess = class(TcxCustomDropDownEdit);
...
begin
 ...
 
   TcxCustomDropDownEditAccess(vgAreasID_INFOSOURCE).DropDown;  

просто вываливается AV при выполнении кода
 
Добавлено:
прка решил проблему так:

Код:
 
   vgAreasID_INFOSOURCE.Focused := true;
   TcxCustomDropDownEdit(vgAreas.InplaceEditor).DroppedDown := True;
 

 
но, думаю, что есть более умный выход
 
Добавлено:
Но если взять строку, у которой EditProperies типа PopupEdit ..... то опять AV

Всего записей: 3253 | Зарегистр. 24-11-2005 | Отправлено: 16:32 16-04-2008
xokc

Full Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
X11
if vgAreas.InplaceEditor is TcxCustomDropDownEdit then  
  TcxCustomDropDownEdit(vgAreas.InplaceEditor).DroppedDown := True;

Всего записей: 477 | Зарегистр. 22-09-2002 | Отправлено: 19:42 16-04-2008
X11



Silver Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
та нет, мну нужно вывалить несфокусированную строку или сначала сфокусировать, а потом вывалить

Всего записей: 3253 | Зарегистр. 24-11-2005 | Отправлено: 20:38 16-04-2008
X11



Silver Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Вопрос по вертикальному гриду. В гриде есть 10 строк. часть из них типа LookupCombobox, так вот, как можно реализовать так, чтобы при получении фокуса список сам вываливался?
 
Добавлено:
ImmediateDropDown равен True, но список выпадает только по нажатию на кнопку мышкой
 
Добавлено:
к сожалению у строки с EditProperties типа lookupcombobox нет события OnEnter ((

----------
/не мы такие, жизнь такая/

Всего записей: 3253 | Зарегистр. 24-11-2005 | Отправлено: 01:11 17-04-2008
afiget



Full Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору

Цитата:
делал в репозитарии стилей, но там нет чего наподобие StoreToIni или SaveToini

В PropertiesStore доступны свойства View.Style для сохранения. Понимаю, что криво, но что поделать.
 
Добавлено:
X11

Цитата:
Вопрос по вертикальному гриду


Код:
procedure TPermitionList.cxDBVerticalGrid1InitEdit(Sender, AItem: TObject;
  AEdit: TcxCustomEdit);
begin
  inherited;
    (AEdit as TcxLookupComboBox).Properties.ImmediatePopup:=true;
end;
 

 
 

Всего записей: 545 | Зарегистр. 31-12-2005 | Отправлено: 02:28 17-04-2008
X11



Silver Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Отлично, спасибо, работает.  
 
 
Добавлено:
Как вы думаете, почему пустое сообщение?
vgAreas - TcxVerticalGrid
[/code]
procedure TfmAreas.vgAreasInitEdit(Sender, AItem: TObject;
  AEdit: TcxCustomEdit);
begin
inherited;
 
  if (AEdit is TcxTextEdit) then ShowMessage(TcxTextEdit(AEdit).Name);
[/code]
 
и как можно идентифицировать эдиты, еслт даже имя узнать нельзя?

Всего записей: 3253 | Зарегистр. 24-11-2005 | Отправлено: 09:41 17-04-2008
GREETINGS_TO_ALL

Newbie
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору

Цитата:
Как вы думаете, почему пустое сообщение?  
vgAreas - TcxVerticalGrid  
[/code]  
procedure TfmAreas.vgAreasInitEdit(Sender, AItem: TObject;  
  AEdit: TcxCustomEdit);  
begin  
inherited;  
 
  if (AEdit is TcxTextEdit) then ShowMessage(TcxTextEdit(AEdit).Name);  
[/code]  

 
 
вроде так  

Код:
 
 
if (AEdit is TcxTextEdit) then ShowMessage((AEdit as TcxTextEdit ).Name);
 
 

Всего записей: 10 | Зарегистр. 20-09-2006 | Отправлено: 11:05 17-04-2008
X11



Silver Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
GREETINGS_TO_ALL, это 2 строки идентичны
 
 if (AEdit is TcxTextEdit) then ShowMessage((AEdit as TcxTextEdit ).Name)
 if (AEdit is TcxTextEdit) then ShowMessage(TcxTextEdit(AEdit).Name);

Всего записей: 3253 | Зарегистр. 24-11-2005 | Отправлено: 12:16 17-04-2008
andrey444

Newbie
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Как можно в PivotGrid Изменять данные. Т.е. по клику на яйчейку получить значение из DataSet и записать его, а потом обновить данные в PivotGrid.

Всего записей: 3 | Зарегистр. 22-12-2006 | Отправлено: 14:42 17-04-2008
afiget



Full Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
X11
Потому что Name действительно пустое
Это можно проверить через Data Inspector или Watch List.
 
А эдиты идентифицировать для чего?
Может быть достаточно будет TcxVerticalGrid.FocusedRow.
 
How to determine which row an in-place editor belongs to
 
How to determine which editor is currently active within a mutlieditor row
 
andrey444
Для нужных полей установить TcxPivotGridField.Area. Думаю, faData.

Всего записей: 545 | Зарегистр. 31-12-2005 | Отправлено: 23:41 17-04-2008
andrey444

Newbie
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
afiget Для нужных полей установил значения но как достучаться до их значений никак не допетрю....

Всего записей: 3 | Зарегистр. 22-12-2006 | Отправлено: 09:18 18-04-2008
afiget



Full Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
andrey444
Стоп. Может быть я неправильно понял вопрос.
В самом PivotGrid значения менять нельзя. Он рид-онли. Для редактирования данных PivotGrid обычно применяют другие редакторы (форма или обычный Grid).
Для того, чтобы получить данные из грида и передать в редактор, можно использовать DataController.Values.

Всего записей: 545 | Зарегистр. 31-12-2005 | Отправлено: 18:38 18-04-2008
andrey444

Newbie
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
afiget, Решил проблему. Написал хранимую процедуру для построения Cross-tab.

Всего записей: 3 | Зарегистр. 22-12-2006 | Отправлено: 16:52 19-04-2008
kash9

Newbie
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Люди помогите! весь и-нет перерыл и нормального конкретного ответа не нашел!
 
вот есть у меня cxGrid в нем скажем 4 столбца(один из столбцов дата) и много строк и вот я хочу чтоб строки в которых дата пустая были бы скажем красного цвета а остальные синего!

Всего записей: 8 | Зарегистр. 28-02-2008 | Отправлено: 22:44 19-04-2008
X11



Silver Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
gvApart - TcxGridTableView

Код:
 
procedure TfmImport.gvApartCustomDrawCell(Sender: TcxCustomGridTableView; ACanvas: TcxCanvas;
  AViewInfo: TcxGridTableDataCellViewInfo; var ADone: Boolean);
Var
 val:boolean;
begin
  try
    if AViewInfo.GridView.DataController.RecordCount <= 0 then exit;
 
    val := (AViewInfo.GridRecord.Values[colType.Index] <> 0) and
           (AViewInfo.GridRecord.Values[colStreet.Index] <> 0) and
           (AViewInfo.GridRecord.Values[colRegion.Index] <> 0) and
           (AViewInfo.GridRecord.Values[colState.Index] <> 0) and
           (AViewInfo.GridRecord.Values[colIS.Index] <> 0);
 
      if not val then begin
        ACanvas.Font.Color := clRed;
      end;
 
 
  except
    abort;
  end;
 
end;
 
 


----------
/не мы такие, жизнь такая/

Всего записей: 3253 | Зарегистр. 24-11-2005 | Отправлено: 23:07 19-04-2008
kash9

Newbie
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
блин чего-то ниче не работает! что такое у тебя colType.index colStreet.index и т.д. и откуда они взялись? на вход процедуре ничего такого не поступает! можешь написать еще разок но чтоб все можно было скопировать и оно бы заработало?

Всего записей: 8 | Зарегистр. 28-02-2008 | Отправлено: 09:31 20-04-2008
   

Страницы: 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122

Компьютерный форум Ru.Board » Компьютеры » Прикладное программирование » Использование DevExpress 2
ShIvADeSt (07-02-2009 14:53): Продолжаем тут
http://forum.ru-board.com/topic.cgi?forum=33&topic=10123#1


Реклама на форуме Ru.Board.

Powered by Ikonboard "v2.1.7b" © 2000 Ikonboard.com
Modified by Ru.B0ard
© Ru.B0ard 2000-2024

BitCoin: 1NGG1chHtUvrtEqjeerQCKDMUi6S6CG4iC

Рейтинг.ru