Cargar datos en TGrid en tiempo de ejecución
 

Buenas Gente! Mi consulta seria, como cargar datos de un TGrid en tiempo de ejecución recorriendo un ClientDataset con items definidos en tiempo diseño. Sin utilizar el Bind Visually

Tenes que usar el evento OnGetValue

Ejemplo con un TGrid con dos columnas de tipo TStringColumn creadas en tiempo de diseño

Código Delphi [-]
type
  TForm1 = class(TForm)
    Grid1: TGrid;
    StringColumn1: TStringColumn;
    StringColumn2: TStringColumn;
    procedure FormCreate(Sender: TObject);
    procedure Grid1GetValue(Sender: TObject; const ACol, ARow: Integer; var Value: TValue);
  end;

var
  Form1: TForm1;

implementation

{$R *.fmx}

const
  Datos: array[0..1, 0..4] of string =
  (('A', 'B', 'C', 'D', 'E'),
  ('Uno', 'Dos', 'Tres', 'Cuatro', 'Cinco'));

procedure TForm1.FormCreate(Sender: TObject);
begin
  Grid1.RowCount := 5;
end;

procedure TForm1.Grid1GetValue(Sender: TObject; const ACol, ARow: Integer; var Value: TValue);
begin
  Value := TValue.From<string>(Datos[ACol, ARow]);
end;