Показать сообщение отдельно
  #21  
Старый 31.05.2012, 09:25
Gayka Gayka вне форума
Прохожий
 
Регистрация: 31.05.2012
Сообщения: 1
Репутация: 10
По умолчанию

Здравствуйте! Помогите! я не знаю что делать, вот код...
procedure TForm3.BitBtn2Click(Sender: TObject);
var
Excel,Range, Cell1, Cell2, VData:Variant;WorkBk: _WorkBook;
WorkSheet : _WorkSheet;
begin Excel:= CreateOleObject('Excel.Application');
Excel.Workbooks.Open[extractfilepath(paramstr(0))+'Личнаякарточка.xlt', 0, True];
Excel.WorkBooks[1].WorkSheets[2].Range['B13:B16']:=form3.DBGrid1.DataSource.DataSet.FieldByName('Ро дство').AsString;


мне нужно чтобы все строки, содержащиеся в столбце "родство", вывелись в введенном выше диапазоне ячеек... попробовала так, как показано здесь, но у меня почему-то выводятся данные только из первой строки DBGrid
Ответить с цитированием