Есть пивотгрид, там несколько полей по строкам и несколько по колонкам.
Еще там мультиселект.
Задача найти пары значений конкретных полей строка-колонка для мультиселекта.
Как для строк, нашел.
Но про колонки вообще никакого примера нет :(
Аналогичных свойств .Column.ColumnIndex тоже нет.
var
RecordIndex: integer;
i,x,y: integer;
Selection: TRect;
CellVal: string;
begin
CellVal := '';
for i := 0 to dbpMain.ViewData.Selection.Count - 1 do
begin
Selection := dbpMain.ViewData.Selection.Regions[i];
for x := Selection.Left to Selection.Right do
begin
for y := Selection.Top to Selection.Bottom do
begin
RecordIndex := dbpMain.ViewData.Cells[y , x].Owner.Row.RecordIndex;
CellVal := CellVal + VarToStr(dbpMain.ViewData.Cells[y, x].Owner.Row.DataController.Values[RecordIndex, dbpMainArticleOID.Index]) + #1013;
end;
end;
end;
ShowMessage(CellVal);