Добро пожаловать в форум, Guest  >>   Войти | Регистрация | Поиск | Правила | В избранное | Подписаться
Все форумы / Delphi Новый топик    Ответить
 Помогите с Ribbon  [new]
Lord Kain
Member

Откуда:
Сообщений: 90
Доброго всем времени суток.
Нужно чтобы при переходе на риббоновскую вкладку открывалась одноименная вкладка в PageControl

procedure TMainForm.RmenuTabChange(Sender: TObject; const NewIndex,
  OldIndex: Integer; var AllowChange: Boolean);
begin
case Rmenu.TabIndex of
  0: Telo.ActivePage:=Tzampage;
  1: Telo.ActivePage:=TcontaktPage;
  2: Telo.ActivePage:=TsitesPage;
  3: Telo.ActivePage:=TorgPage;
end;
end;


такое не прокатывает, вкладки пейдж контрола переключаются вразнобой
Подскажите, как правильно определить в рибббоне активную вкладку?
30 апр 13, 23:33    [14251757]     Ответить | Цитировать Сообщить модератору
 Re: Помогите с Ribbon  [new]
DimaBr
Member

Откуда:
Сообщений: 10744
Чисто логически

procedure TMainForm.RmenuTabChange(Sender: TObject; const NewIndex,
  OldIndex: Integer; var AllowChange: Boolean);
begin
case NewIndex of
  0: Telo.ActivePage:=Tzampage;
  1: Telo.ActivePage:=TcontaktPage;
  2: Telo.ActivePage:=TsitesPage;
  3: Telo.ActivePage:=TorgPage;
end;
end;
30 апр 13, 23:45    [14251786]     Ответить | Цитировать Сообщить модератору
 Re: Помогите с Ribbon  [new]
DimaBr
Member

Откуда:
Сообщений: 10744
А если порядок и количество совпадает, то проще так
procedure TMainForm.RmenuTabChange(Sender: TObject; const NewIndex,
  OldIndex: Integer; var AllowChange: Boolean);
begin
  Telo.ActivePageIndex := NewIndex;
end;
30 апр 13, 23:47    [14251789]     Ответить | Цитировать Сообщить модератору
 Re: Помогите с Ribbon  [new]
Lord Kain
Member

Откуда:
Сообщений: 90
DimaBr,
ты гений)) спасибо
а мне минус за невнимательность
30 апр 13, 23:54    [14251798]     Ответить | Цитировать Сообщить модератору
Между сообщениями интервал более 1 года.
 Re: Помогите с Ribbon  [new]
jonybest
Member

Откуда:
Сообщений: 246
Доброго дня! Чтобы не плодить темы напишу здесь.
Небольшая проблемка с dxRibbon. Заполняю TEXT в dxBarEdit, dxBarCombo и др. в скомпилированной программе, при смене фокуса на другой компонент значения из text удаляются. Не могу понять как это исправить...
11 сен 18, 11:56    [21670743]     Ответить | Цитировать Сообщить модератору
 Re: Помогите с Ribbon  [new]
JaDi
Member

Откуда: Сызрань, Россия
Сообщений: 3846
jonybest,

там есть настройка в баре где-то -- сохранять ли текст после увода фокуса.
11 сен 18, 12:15    [21670779]     Ответить | Цитировать Сообщить модератору
 Re: Помогите с Ribbon  [new]
jonybest
Member

Откуда:
Сообщений: 246
JaDi
jonybest,

там есть настройка в баре где-то -- сохранять ли текст после увода фокуса.


Подозревал что дело обстоит именно так. Но не смог найти...
11 сен 18, 12:52    [21670831]     Ответить | Цитировать Сообщить модератору
 Re: Помогите с Ribbon  [new]
JaDi
Member

Откуда: Сызрань, Россия
Сообщений: 3846
jonybest,

Она называется AlwaysSaveText, тут подробнее 20863934
11 сен 18, 13:05    [21670851]     Ответить | Цитировать Сообщить модератору
 Re: Помогите с Ribbon  [new]
jonybest
Member

Откуда:
Сообщений: 246
JaDi
jonybest,

Она называется AlwaysSaveText, тут подробнее 20863934


Спасибо огромное - то что нужно!!!
11 сен 18, 14:05    [21670948]     Ответить | Цитировать Сообщить модератору
Все форумы / Delphi Ответить