Использование DevExpress 2 - [78] :: Прикладное программирование

AndreyAgrh

Цитата:

Как у выбранного поля получить значение второй не ключевой колонки?

Задача несколько сложней на самом деле чем кажется на первый взгляд, в свое время я писал под это дело следующую функцию:

Код:

function GetValueByFieldNameFromLookupCombo(ACombo: TcxCustomLookupComboBox; AFieldName: string): variant;
var
FColumn: TObject;
FColumnIndex: integer;
FRecordIndex: integer;
begin
// Эксперементально получено равенство:
// ACombo.ItemIndex = ACombo.Properties.DataController.FocusedRecordIndex
// Но есть одно но. Если EditValue при создании комбо инициализуруется каким-либо
// значением, то ItemIndex остается равным -1, а получает значение только после того,
// как пользователь ввел его вручну. Поэтому лучше использовать способ через датаконтроллер.
Result := Null;

if ACombo.Text = '' then
Exit;
if ACombo.Properties.DataController.RecordCount = 0 then
Exit;

// Получаем номер колонки
FColumn := ACombo.Properties.DataController.GetItemByFieldName(AFieldName);
if (not Assigned(FColumn)) or (not (FColumn is TcxLookupDBGridColumn)) then
Exit;
FColumnIndex := TcxLookupDBGridColumn(FColumn).Index;

// Получаем номер записи
if (ACombo.Properties.DataController.FocusedRecordIndex = -1) then
begin
if ACombo.EditModified then
FRecordIndex := ACombo.Properties.DataController.FindRecordIndexByKey(ACombo.EditingValue)
else
FRecordIndex := ACombo.Properties.DataController.FindRecordIndexByKey(ACombo.EditValue);
end
else
FRecordIndex := ACombo.Properties.DataController.FocusedRecordIndex;

if FRecordIndex = -1 then
Exit;

Result := ACombo.Properties.DataController.GetValue(FRecordIndex, FColumnIndex);
end;

Модерирует : 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