компонет DBGrid

[Black_Guru]

Дорого время суток. Подскажите пожалуйста как извлечь данные из компонента DBGrid (например первый столбец таблицы) и записать его в массив? Заранее спасибо.

[code doctor]

в цикле идем по столбце

[0][j]

[Black_Guru]

Я имею в виду какими нужно пользоваться свойствами компонента что бы извлечь данные, а уже потом записать их в массив. Если можно напишите код поподробней.

[psycho-coder]

Сообщение от Black_Guru

Дорого время суток. Подскажите пожалуйста как извлечь данные из компонента DBGrid (например первый столбец таблицы) и записать его в массив? Заранее спасибо.

Пройтись можно например так (на Delphi, билдера нет под рукой):

var
  i: Integer;
  tmp: String;
begin
  tmp := '';
  for i := 1 to DBGrid1.DataSource.DataSet.RecordCount - 1 do
  begin
    DBGrid1.DataSource.DataSet.RecNo := i;
    tmp := tmp + DBGrid1.DataSource.DataSet.Fields[0].AsString + #13#10;
  end;

  MessageBox(0, PChar(tmp), '', 0);
end;