Добавление элемента в комбинированный список в Delphi XE4 и Devexpress VCL 13.1

Question

У меня есть следующий код:

var
cbMyCombo: TcxLookupComboBox;

У меня есть набор данных, который имеет следующий запрос:

SELECT ID, NAME from MYTABLE;

Этот запрос работает нормально.

Теперь я сделал связывание в cbMyCombo в файле DFM следующим образом:

object cbMyCombo: TcxLookupComboBox
  Properties.KeyFieldNames = 'ID'
  Properties.ListColumns = <
    item
      FieldName = 'NAME'
    end>
end

Работает нормально, а выпадающий список привязан. Моя проблема в том, что по умолчанию ничего не выбрано. Я хочу, чтобы изначально комбобокс содержал опцию "Просмотреть все".

Я пытаюсь так:

cbMyCombo.Text := 'View All'

Но это ничего не устанавливает, потому что "Просмотреть все" не является частью списка, который я связал с ним. Я хочу вручную добавить "Просмотреть все" как FieldName и 0 как KeyFieldName и это должно быть выбрано по умолчанию. Как я могу это сделать?

Answer 1

Вы должны добавить 'View all', 0 строка вашего набора данных и установите EditValue вашего комбобокса до 0 в вашей инициализации.