X11
Silver Member | Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Цитата: Объясни подробнее, что значит Цитата: Для перехода по контролам использую enter | Цитата: Объясни подробнее, что значит Цитата: Для перехода по контролам использую enter | неверно выразился, не я использую, а пользователи используют, т.е. enter как tab и, соответственно shift+enter как shift+tab Добавлено: Цитата: В твоих силах сделать так, чтобы заказчик хотел, что правильно | в настройках есть чекбокс, пусть пользователь сам определяет, давай не удаляться от темы? Добавлено: Цитата: Я не понял, ты контролами называешь элементы ComboBox'а? %) | нет, комбобокс - это и есть контрол Добавлено: Цитата: И задисабли ввод значение (Properties.DropDownListStile := lsFixedList). У тебя фиксированный список, следовательно, ввод данных и быстрый набор не будет производиться. | да, так и сделано. Спасибо Добавлено: вот так реализовал: Код: procedure TfmAdd.lcbActionEnter(Sender: TObject); var ARecordIndex: Integer; AKey: Variant; begin if fIsAddMode then begin if (sender as TcxLookupComboBox).Properties.DataController.RecordCount > 0 then begin ARecordIndex := 0; // ИНДЕКС_ЭЛЕМЕНТА AKey := (sender as TcxLookupComboBox).Properties.DataController.GetRecordId(ARecordIndex); (sender as TcxLookupComboBox).EditValue := AKey; end; end; (sender as TcxLookupComboBox).DroppedDown := true; end; | Добавлено: Этот код в нескольких списках, которые расположены друг за другом, т.е. клавишей enter пользователь выбирает значения по умолчанию, если это добавление, а если не добавление а редактирование, то не ставим в списке позиционирование на значение по умолчанию, а ставим на конкретные значения, но это уже отдельный код. | Всего записей: 3253 | Зарегистр. 24-11-2005 | Отправлено: 10:45 14-11-2007 | Исправлено: X11, 11:00 14-11-2007 |
|