Доработки Rx

Модераторы: alexs, Модераторы

Re: Доработки Rx

Сообщение alexs » 12.01.2018 14:29:23

rtn писал(а):1. Убрать или сделать опциональной отображение Caption у RxMDICloseButton (FCloseButton.FInfoLabel.Caption). (ChildWindow.Caption и так отображается на вкладке в RxMDITasks);

Готово. Смотри RxMDICloseButton.ShowInfoLabel
rtn писал(а):2. Сделать закрытие чайлдов щелчком средней кнопки мыши по вкладке (RxMDIButton). Как во многих браузерах;

В свойстве RxMDITasks1.Options смотри флаг rxtoMidleClickClose
rtn писал(а):3. После закрытия ChildWindow на RxMDITasks часто остаются вертикальные полоски. Воспроизводится легко. Создаем 1 чайлд с длинным Caption, второй с коротким. Закрываем первый и видим эту полоску. Invalidate в конце TRxMDITasks.UpdateScrollBtnStatus помогает;

Добавил дополнительную отрисовку. Надо тестировать.
rtn писал(а):4. Хотелось бы свойство-событие у TRxMDIPanel, что-то типа OnChangeCurrentChild (из названия наверно понятно);

Добавил.
rtn писал(а):5. Мне кажется когда нет ни одного чалда RxMDICloseButton лучше делать невидимой, а не неактивной, т.е. в FCloseButton.Enabled:=Assigned(FCurrentChildWindow) заменить на Visible.

Смотри RxMDIPanel.HideCloseButton

Спасибо за предложения :-)
Смотри ревизию 6128.
Аватара пользователя
alexs
долгожитель
 
Сообщения: 4060
Зарегистрирован: 15.05.2005 23:17:07
Откуда: г.Ставрополь

Re: Доработки Rx

Сообщение rtn » 12.01.2018 18:12:27

оперативно :)
1. Не хочет работать ShowInfoLabel. Всегда видно. м.б. потому, что в процедуре TRxMDICloseButton.DoPositionLabel FInfoLabel.Visible := Visible?
2.OnChangeCurrentChild не срабатывает когда закрывается последний Child. Он ведь становится совсем не Current.
может в конце TRxMDIPanel.SetCurrentChildWindow(AValue: TForm) просто добавить if Assigned(FOnChangeCurrentChild) then FOnChangeCurrentChild...
а то как то много где DoOnChangeCurrentChild появилось
И если можно Сolor у RxMDITasks в published вынести. В приложении на одну строчку кода меньше будет
Последний раз редактировалось rtn 12.01.2018 18:54:08, всего редактировалось 1 раз.
rtn
новенький
 
Сообщения: 15
Зарегистрирован: 09.01.2015 13:59:38
Откуда: Архангельск

Re: Доработки Rx

Сообщение zoltanleo » 12.01.2018 18:51:41

Алекс, привет

Не нашел, в гриде есть опция, позволяющая выравнивать текст и чекбоксы по высоте? Или использовать OnDrawCell?
Аватара пользователя
zoltanleo
постоялец
 
Сообщения: 458
Зарегистрирован: 17.10.2013 10:55:01

Re: Доработки Rx

Сообщение alexs » 13.01.2018 09:56:19

rtn писал(а):оперативно

Я посмотрю замечания.
zoltanleo писал(а):Не нашел, в гриде есть опция, позволяющая выравнивать текст и чекбоксы по высоте?

Сейчас нет. Но можно сделать. У меня не практикуются 2-х строчные строки.
Аватара пользователя
alexs
долгожитель
 
Сообщения: 4060
Зарегистрирован: 15.05.2005 23:17:07
Откуда: г.Ставрополь

Re: Доработки Rx

Сообщение zoltanleo » 13.01.2018 12:02:58

Сделай, плз.
Аватара пользователя
zoltanleo
постоялец
 
Сообщения: 458
Зарегистрирован: 17.10.2013 10:55:01

Re: Доработки Rx

Сообщение alexs » 15.01.2018 10:16:01

rtn писал(а):1. Не хочет работать ShowInfoLabel. Всегда видно.

Пример давай - как не работает. У меня вроде всё ок. Я на примере demos/RxMDI тестирую. Вроде всё отображается когда надо.
rtn писал(а):2.OnChangeCurrentChild не срабатывает когда закрывается последний Child.

Добавил вызов при закрытии последнего окна.
rtn писал(а):И если можно Сolor у RxMDITasks в published вынести.

Готово. 6132.

Добавлено спустя 37 минут 5 секунд:
zoltanleo писал(а):Не нашел, в гриде есть опция, позволяющая выравнивать текст и чекбоксы по высоте?

Посмотри у колонки свойство .Layout
В ревизии 6133 поправил отображение чекбокса в зависимости от этого свойства.
Аватара пользователя
alexs
долгожитель
 
Сообщения: 4060
Зарегистрирован: 15.05.2005 23:17:07
Откуда: г.Ставрополь

Re: Доработки Rx

Сообщение rtn » 15.01.2018 15:40:06

по ShowInfoLabel. Если в DisignTime установить в False, при запуске все равно будет показывать InfoLabel. т.к. в процедуре TRxMDICloseButton.DoPositionLabel устанавливается FInfoLabel.Visible := Visible. (215 стр.). Если ее закомментировать, тогда работает. м.б. так FInfoLabel.Visible := Visible and FShowInfoLabel ?
rtn
новенький
 
Сообщения: 15
Зарегистрирован: 09.01.2015 13:59:38
Откуда: Архангельск

Re: Доработки Rx

Сообщение alexs » 15.01.2018 16:39:13

Понял. Согласен. Смотри 6135.
Аватара пользователя
alexs
долгожитель
 
Сообщения: 4060
Зарегистрирован: 15.05.2005 23:17:07
Откуда: г.Ставрополь

Re: Доработки Rx

Сообщение zoltanleo » 16.01.2018 01:35:12

alexs писал(а):Посмотри у колонки свойство .Layout
В ревизии 6133 поправил отображение чекбокса в зависимости от этого свойства.

Спасибо, все робит
Аватара пользователя
zoltanleo
постоялец
 
Сообщения: 458
Зарегистрирован: 17.10.2013 10:55:01

Re: Доработки Rx

Сообщение brick08 » 14.02.2018 13:36:27

В форме фильтра TrxFilterByForm при выборе полей из списка комбобокса не влезают названия, и поэтому иногда при длинных наименованиях или двойных/тройных заголовках непонятно что выбрать. Предлагаю доработку:
Код: Выделить всё
procedure TrxFilterByForm.ClearALL(AGrid: TRxDBGrid);
var
  i : Integer;
  w : Integer;
  wt : Integer;
  wsb : Integer;
  //ncm: TNonCLientMetrics;
begin
  //*****************************************************************************
  Combo_1[1].Items.Clear;
  Combo_1[1].Items.Add('');
  //ncm.cbSize:=SizeOf(ncm);
  //SystemParametersInfo(SPI_GetNonClientMetrics,0,@ncm,0);
  //wsb:=ncm.iScrollWidth;
  wsb:= 30;  //ширина скроллбара
  w := Combo_1[1].Width - wsb;
  for i := 0 To AGrid.Columns.Count-1 do
  begin
    if Assigned(AGrid.Columns[i].Field) and (AGrid.Columns[i].Field.FieldKind=fkData) and (AGrid.Columns[i].Visible) then
    begin
      Combo_1[1].Items.Objects[Combo_1[1].Items.Add(AGrid.Columns[i].Title.Caption)]:=AGrid.Columns[i].Field;
      wt := Canvas.TextWidth(AGrid.Columns[i].Title.Caption);
      if wt > w then
        w := wt;
    end;
  end;
  Combo_1[1].ItemWidth := w + wsb;
  Combo_1[1].ItemIndex := 0;

  for i := 2 To 9 do
  begin
    Combo_1[i].Items.Assign(Combo_1[1].Items);
    Combo_1[i].ItemIndex := 0;
    Combo_1[i].ItemWidth := w + wsb;
  end; 
brick08
новенький
 
Сообщения: 12
Зарегистрирован: 05.09.2016 15:39:08

Re: Доработки Rx

Сообщение alexs » 14.02.2018 17:27:45

Чего то не могу закомитеть. Что-то с свн случилось
Аватара пользователя
alexs
долгожитель
 
Сообщения: 4060
Зарегистрирован: 15.05.2005 23:17:07
Откуда: г.Ставрополь

Re: Доработки Rx

Сообщение alexs » 19.02.2018 09:28:56

ревизия 6206
Аватара пользователя
alexs
долгожитель
 
Сообщения: 4060
Зарегистрирован: 15.05.2005 23:17:07
Откуда: г.Ставрополь

Re: Доработки Rx

Сообщение kit » 29.03.2018 12:05:53

Как в фильтре RxDBGrid сделать "Колонка 1 > Колонка 2" ?
kit
постоялец
 
Сообщения: 156
Зарегистрирован: 29.09.2016 09:39:07

Re: Доработки Rx

Сообщение alexs » 29.03.2018 16:13:53

Пока никак :-)
Аватара пользователя
alexs
долгожитель
 
Сообщения: 4060
Зарегистрирован: 15.05.2005 23:17:07
Откуда: г.Ставрополь

Re: Доработки Rx

Сообщение kit » 30.03.2018 10:31:33

Реально доработать?
kit
постоялец
 
Сообщения: 156
Зарегистрирован: 29.09.2016 09:39:07

Пред.След.

Вернуться в RxLib

Кто сейчас на конференции

Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 2

Рейтинг@Mail.ru