| HotXLS Delphi Excel Read Write Library / Component Developers Guide |
![]() |
Workbook.Sheets[1].UsedRange.Select;
Workbook.Sheets[1].UsedRange.Font.Italic := True;
With Workbook.Sheets[1].UsedRange do begin
for i := 1 to Rows.Count do
if (i mod 2) = 0 then Rows[i].Font.Bold := True;
end;
| Copyright©2014 loslab.com |