следующая тема »

[19 Июль 2025, 18:03:51]

Новости, реклама:

[19 Июль 2025, 18:03:51]

Новости, реклама:

[Tal]

ну правильно, что типа
procedure TForm1.Button1Click(Sender: TObject);
var
 wb : _WorkBook;
 ws : _Worksheet;
begin
 ExcelApplication1.Connect;
 try
   ExcelApplication1.Visible[0] := true;
   {wb := ExcelApplication1.Workbooks.Open('d:\test.xls', EmptyParam,
     EmptyParam, EmptyParam, EmptyParam, EmptyParam, EmptyParam, EmptyParam,
     EmptyParam, EmptyParam, EmptyParam, EmptyParam, EmptyParam, EmptyParam);}
   wb := ExcelApplication1.Workbooks.Add('d:\test.xls', 0);
   ws := wb.Worksheets.Item[1] as _Worksheet;
   ws.Cells.Item[1, 1] := 'blabla';
 finally
   ExcelApplication1.Disconnect;
 end;
end;