Wie erhalten Sie ausgewählten Zellentext von TcxGrid?

Question

Ich verwende Devexpress TcxGrid und ich versuche, ausgewählten Zellentext zu erhalten. Mein TcxGrid ist mit einer Art von DataSource verbunden - ich denke, es ist DataControler.

Mein Ziel ist es, den Text von Zellen in der gesamten Zeile zu erhalten und in eine Zeichenfolge mit Kommas geteilt.

Answer 1

Wenn Sie Werte mit Mehrfachauswahl wollen und von einem TcxGridDbTableView: In meinem Ergebnis, ich habe keine Trennung zwischen den Reihen.

function GetSelectedValuesFrmGrid: String; 
var 
    intSelectLoop, 
    intRowLoop: Integer; 
    oTableView: TcxGridDbTableView; 
    strValue: Variant; 
    oList: TStringList; 
begin 
    Result:= ''; 
    // Kind Of TableView 
    if <TcxGrid>.ActiveView is TcxGridDbTableView then 
    begin 
    oTableView:= <TcxGrid>.ActiveView as TcxGridDbTableView; 
    oList:= TStringList.Create(); 
    try 
     for intSelectLoop:= 0 to oTableView.Controller.SelectedRowCount-1 do 
     begin 
     for intRowLoop:= 0 to oTableView.Controller.SelectedRows[intSelectLoop].ValueCount-1 do 
     begin 
      strValue:= oTableView.Controller.SelectedRows[intSelectLoop].Values[intRowLoop]; 
      // Value can be Null 
      if VarIsNull(strValue) then 
      begin 
      strValue:= ''; 
      end; 
      oList.Add(strValue); 
     end; 
     end; 
     Result:= oList.CommaText; 
    finally 
     oList.Free; 
    end; 
    end; 
end; 

Answer 2

Sie benötigen den Text von allen Zellen in ausgewählten Zeilen?

for I := 0 to cxGridDBTableView.Controller.SelectedRowCount -1 do 
    for J := 0 to cxGridDBTableView.Controller.SelectedRows[I].ValueCount -1 do 
     SelectedRowStr := SelectedRowStr + VarToStr(cxGrid1DBTableView1.Controller.SelectedRows[I].Values[J]) + ','; 
SelectedRowStr := Copy(SelectedRowStr,1,length(SelectedRowStr)-1); 

Answer 3

Das Gitter wird einen DataControler-Nachfolger haben. Sie können die Elemente im DataController durchlaufen und abhängig davon, wie Ihr Grid konfiguriert ist, können die Elemente im DataController den einzelnen "Spalten" entsprechen, die in Ihrem Grid angezeigt werden. Davon abgesehen bleiben die Elemente in einem DataController erhalten.

Mit diesem Code können Sie durch jede Spalte im Raster navigieren und die Zeichenfolge basierend auf den DataController-Werten aufbauen.

var 
    i: Integer; 
    DC: TcxCustomDataController; 
    s: string; 
begin 
    s := ''; 
    DC := <yourgrid>.DataController; 
    for i := 0 to <yourgrid>.ColumnCount -1 do begin 
     s := s + vartostr(DC.Values[DC.FocusedRecordIndex, <yourgrid>.Columns[i].Index]) + ','; 
    end; 
    if Length(s) > 0 then 
     s := Copy(s,1,Length(s)-1); 
end;