Последний отзыв
отлично написал
По всем вопросам обращайтесь на: info@litportal.ru
(©) 2003-2025.
✖
Иcпользование API на Delphi 7
Настройки чтения
Размер шрифта
Высота строк
Поля
// Экспорт данных из StringGrid в Excel
var e,r: Variant; i: integer;
begin
e:=CreateOleObject('Excel.Application');
e.Visible:=true; e.WorkBooks.Add;
r:=e.Workbooks[1].WorkSheets[1];
r.Columns[1].ColumnWidth := 12;
r.Columns[2].ColumnWidth := 22;
for i:=0 to StringGrid1.RowCount-1 do begin
e.Cells.Item[i+1, 2]:=StringGrid1.Cells[0, i];
e.Cells.Item[i+1, 3]:=StringGrid1.Cells[1, i];
end;
//e.Quit;
end;
end.
Другие электронные книги автора Сергей Николаевич Талипов
Последний отзыв
отлично написал