Hola cmfab.
No uso devexpress, pero quizá con poco puedas adaptar este código para un
TDBGrid:
Código Delphi
[-]
var
i: Integer;
begin
if (ComboBox1.ItemIndex >= 0)and(DBGrid1.SelectedRows.Count>0) then
begin
for i:= 0 to DBGrid1.SelectedRows.Count-1 do
begin
DBGrid1.DataSource.DataSet.GotoBookmark(Pointer(DBGrid1.SelectedRows.Items[i]));
DBGrid1.DataSource.DataSet.Edit;
DBGrid1.DataSource.DataSet.FieldByName('tuCampo').AsString := ComboBox1.Items[ComboBox1.ItemIndex];
DBGrid1.DataSource.DataSet.Post;
end;
end;
end;
Lógicamente para que funcione debe estar:
DBGrid1 -> Options -> dgMultiSelect =
True
Saludos.