Здравствуйте! Помогите! я не знаю что делать, вот код...
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
|