You've already forked lazarus-ccr
fpspreadsheet: Building a number format list which allows to drop most of the restrictions of the previous versions like number of decimal places. New number format "nfCustom" which passes the format string directly to the file.
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@3044 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
wp_xxyyzz
@@ -20,6 +20,8 @@ var
|
||||
number: Double;
|
||||
lCol: TCol;
|
||||
lRow: TRow;
|
||||
r: Integer;
|
||||
fmt: String;
|
||||
begin
|
||||
// Open the output file
|
||||
MyDir := ExtractFilePath(ParamStr(0));
|
||||
@@ -34,7 +36,7 @@ begin
|
||||
MyWorksheet.WriteRowHeight(0, 30); // 30 mm
|
||||
|
||||
// Turn off grid lines and hide headers
|
||||
MyWorksheet.Options := MyWorksheet.Options - [soShowGridLines, soShowHeaders];
|
||||
//MyWorksheet.Options := MyWorksheet.Options - [soShowGridLines, soShowHeaders];
|
||||
|
||||
{ -- currently not working
|
||||
//MyWorksheet.Options := MyWorksheet.Options + [soHasFrozenPanes];
|
||||
@@ -108,67 +110,240 @@ begin
|
||||
MyWorksheet.WriteNumber(6, 3, 2017);
|
||||
MyWorksheet.WriteFont(6, 3, 'Arial', 18, [fssBold], scBlue);
|
||||
|
||||
// Write current date/time to cells B11:B16
|
||||
MyWorksheet.WriteUTF8Text(10, 0, 'nfShortDate');
|
||||
MyWorksheet.WriteDateTime(10, 1, now, nfShortDate);
|
||||
MyWorksheet.WriteUTF8Text(11, 0, 'nfShortTime');
|
||||
MyWorksheet.WriteDateTime(11, 1, now, nfShortTime);
|
||||
MyWorksheet.WriteUTF8Text(12, 0, 'nfLongTime');
|
||||
MyWorksheet.WriteDateTime(12, 1, now, nfLongTime);
|
||||
MyWorksheet.WriteUTF8Text(13, 0, 'nfShortDateTime');
|
||||
MyWorksheet.WriteDateTime(13, 1, now, nfShortDateTime);
|
||||
MyWorksheet.WriteUTF8Text(14, 0, 'nfFmtDateTime, DM');
|
||||
MyWorksheet.WriteDateTime(14, 1, now, nfFmtDateTime, 'DM');
|
||||
MyWorksheet.WriteUTF8Text(15, 0, 'nfFmtDateTime, MY');
|
||||
MyWorksheet.WriteDateTime(15, 1, now, nfFmtDateTime, 'MY');
|
||||
MyWorksheet.WriteUTF8Text(16, 0, 'nfShortTimeAM');
|
||||
MyWorksheet.WriteDateTime(16, 1, now, nfShortTimeAM);
|
||||
MyWorksheet.WriteUTF8Text(17, 0, 'nfLongTimeAM');
|
||||
MyWorksheet.WriteDateTime(17, 1, now, nfLongTimeAM);
|
||||
MyWorksheet.WriteUTF8Text(18, 0, 'nfFmtDateTime, MS');
|
||||
MyWorksheet.WriteDateTime(18, 1, now, nfFmtDateTime, 'MS');
|
||||
MyWorksheet.WriteUTF8Text(19, 0, 'nfFmtDateTime, MSZ');
|
||||
MyWorksheet.WriteDateTime(19, 1, now, nfFmtDateTime, 'MSZ');
|
||||
r:= 10;
|
||||
// Write current date/time and test numbers for various formatting options
|
||||
|
||||
MyWorksheet.WriteUTF8Text(r, 1, 'Formats in gray cells are not supported by BIFF2');
|
||||
|
||||
inc(r, 2);
|
||||
MyWorksheet.WriteUTF8Text(r, 0, 'nfShortDate');
|
||||
MyWorksheet.WriteDateTime(r, 1, now, nfShortDate);
|
||||
inc(r);
|
||||
MyWorksheet.WriteUTF8Text(r, 0, 'nfLongDate');
|
||||
MyWorksheet.WriteDateTime(r, 1, now, nfLongDate);
|
||||
inc(r);
|
||||
MyWorksheet.WriteUTF8Text(r, 0, 'nfShortTime');
|
||||
MyWorksheet.WriteDateTime(r, 1, now, nfShortTime);
|
||||
inc(r);
|
||||
MyWorksheet.WriteUTF8Text(r, 0, 'nfLongTime');
|
||||
MyWorksheet.WriteDateTime(r, 1, now, nfLongTime);
|
||||
inc(r);
|
||||
MyWorksheet.WriteUTF8Text(r, 0, 'nfShortDateTime');
|
||||
MyWorksheet.WriteDateTime(r, 1, now, nfShortDateTime);
|
||||
inc(r);
|
||||
MyWorksheet.WriteUTF8Text(r, 0, 'nfFmtDateTime, DM');
|
||||
MyWorksheet.WriteDateTime(r, 1, now, nfFmtDateTime, 'DM');
|
||||
inc(r);
|
||||
MyWorksheet.WriteUTF8Text(r, 0, 'nfFmtDateTime, MY');
|
||||
MyWorksheet.WriteDateTime(r, 1, now, nfFmtDateTime, 'MY');
|
||||
inc(r);
|
||||
MyWorksheet.WriteUTF8Text(r, 0, 'nfShortTimeAM');
|
||||
MyWorksheet.WriteDateTime(r, 1, now, nfShortTimeAM);
|
||||
inc(r);
|
||||
MyWorksheet.WriteUTF8Text(r, 0, 'nfLongTimeAM');
|
||||
MyWorksheet.WriteDateTime(r, 1, now, nfLongTimeAM);
|
||||
inc(r);
|
||||
MyWorksheet.WriteUTF8Text(r, 0, 'nfFmtDateTime, MS');
|
||||
MyWorksheet.WriteDateTime(r, 1, now, nfFmtDateTime, 'MS');
|
||||
MyWorksheet.WriteFontColor(r, 1, scGray);
|
||||
inc(r);
|
||||
MyWorksheet.WriteUTF8Text(r, 0, 'nfFmtDateTime, MSZ');
|
||||
MyWorksheet.WriteDateTime(r, 1, now, nfFmtDateTime, 'MSZ');
|
||||
MyWorksheet.WriteFontColor(r, 1, scGray);
|
||||
inc(r);
|
||||
MyWorksheet.WriteUTF8Text(r, 0, 'nfFmtDateTime, mm:ss.zzz');
|
||||
MyWorksheet.WriteDateTime(r, 1, now, nfFmtDateTime, 'mm:ss.zzz');
|
||||
MyWorksheet.WriteFontColor(r, 1, scGray);
|
||||
|
||||
// Write formatted numbers
|
||||
number := 12345.67890123456789;
|
||||
MyWorksheet.WriteUTF8Text(24, 1, '12345.67890123456789');
|
||||
MyWorksheet.WriteUTF8Text(24, 2, '-12345.67890123456789');
|
||||
MyWorksheet.WriteUTF8Text(25, 0, 'nfFixed, 0 decs');
|
||||
MyWorksheet.WriteNumber(25, 1, number, nfFixed, 0);
|
||||
MyWorksheet.WriteNumber(25, 2, -number, nfFixed, 0);
|
||||
MyWorksheet.WriteUTF8Text(26, 0, 'nfFixed, 2 decs');
|
||||
MyWorksheet.WriteNumber(26, 1, number, nfFixed, 2);
|
||||
MyWorksheet.WriteNumber(26, 2, -number, nfFixed, 2);
|
||||
MyWorksheet.WriteUTF8Text(27, 0, 'nfFixedTh, 0 decs');
|
||||
MyWorksheet.WriteNumber(27, 1, number, nfFixedTh, 0);
|
||||
MyWorksheet.WriteNumber(27, 2, -number, nfFixedTh, 0);
|
||||
MyWorksheet.WriteUTF8Text(28, 0, 'nfFixedTh, 2 decs');
|
||||
MyWorksheet.WriteNumber(28, 1, number, nfFixedTh, 2);
|
||||
MyWorksheet.WriteNumber(28, 2, -number, nfFixedTh, 2);
|
||||
MyWorksheet.WriteUTF8Text(29, 0, 'nfSci, 1 dec');
|
||||
MyWorksheet.WriteNumber(29, 1, number, nfSci);
|
||||
MyWorksheet.WriteNumber(29, 2, -number, nfSci);
|
||||
MyWorksheet.WriteNumber(29, 3, 1.0/number, nfSci);
|
||||
MyWorksheet.WriteNumber(29, 4, -1.0/number, nfSci);
|
||||
MyWorksheet.WriteUTF8Text(30, 0, 'nfExp, 2 decs');
|
||||
MyWorksheet.WriteNumber(30, 1, number, nfExp, 2);
|
||||
MyWorksheet.WriteNumber(30, 2, -number, nfExp, 2);
|
||||
MyWorksheet.WriteNumber(30, 3, 1.0/number, nfExp, 2);
|
||||
MyWorksheet.WriteNumber(30, 4, -1.0/number, nfExp, 2);
|
||||
|
||||
inc(r, 2);
|
||||
MyWorksheet.WriteUTF8Text(r, 1, '12345.67890123456789');
|
||||
MyWorksheet.WriteUTF8Text(r, 2, '-12345.67890123456789');
|
||||
inc(r);
|
||||
MyWorksheet.WriteUTF8Text(r, 0, 'nfGeneral');
|
||||
MyWorksheet.WriteNumber(r, 1, number, nfGeneral);
|
||||
MyWorksheet.WriteNumber(r, 2, -number, nfGeneral);
|
||||
inc(r);
|
||||
MyWorksheet.WriteUTF8Text(r, 0, 'nfFixed, 0 decs');
|
||||
MyWorksheet.WriteNumber(r, 1, number, nfFixed, 0);
|
||||
MyWorksheet.WriteNumber(r, 2, -number, nfFixed, 0);
|
||||
inc(r);
|
||||
MyWorksheet.WriteUTF8Text(r, 0, 'nfFixed, 1 decs');
|
||||
MyWorksheet.WriteNumber(r, 1, number, nfFixed, 1);
|
||||
MyWorksheet.WriteFontColor(r, 1, scGray);
|
||||
MyWorksheet.WriteNumber(r, 2, -number, nfFixed, 1);
|
||||
MyWorksheet.WriteFontColor(r, 2, scGray);
|
||||
inc(r);
|
||||
MyWorksheet.WriteUTF8Text(r, 0, 'nfFixed, 2 decs');
|
||||
MyWorksheet.WriteNumber(r, 1, number, nfFixed, 2);
|
||||
MyWorksheet.WriteNumber(r, 2, -number, nfFixed, 2);
|
||||
inc(r);
|
||||
MyWorksheet.WriteUTF8Text(r, 0, 'nfFixed, 3 decs');
|
||||
MyWorksheet.WriteNumber(r, 1, number, nfFixed, 3);
|
||||
MyWorksheet.WriteFontColor(r, 1, scGray);
|
||||
MyWorksheet.WriteNumber(r, 2, -number, nfFixed, 3);
|
||||
MyWorksheet.WriteFontColor(r, 2, scGray);
|
||||
inc(r);
|
||||
MyWorksheet.WriteUTF8Text(r, 0, 'nfFixedTh, 0 decs');
|
||||
MyWorksheet.WriteNumber(r, 1, number, nfFixedTh, 0);
|
||||
MyWorksheet.WriteNumber(r, 2, -number, nfFixedTh, 0);
|
||||
inc(r);
|
||||
MyWorksheet.WriteUTF8Text(r, 0, 'nfFixedTh, 1 decs');
|
||||
MyWorksheet.WriteNumber(r, 1, number, nfFixedTh, 1);
|
||||
MyWorksheet.WriteFontColor(r, 1, scGray);
|
||||
MyWorksheet.WriteNumber(r, 2, -number, nfFixedTh, 1);
|
||||
MyWorksheet.WriteFontColor(r, 2, scGray);
|
||||
inc(r);
|
||||
MyWorksheet.WriteUTF8Text(r, 0, 'nfFixedTh, 2 decs');
|
||||
MyWorksheet.WriteNumber(r, 1, number, nfFixedTh, 2);
|
||||
MyWorksheet.WriteNumber(r, 2, -number, nfFixedTh, 2);
|
||||
inc(r);
|
||||
MyWorksheet.WriteUTF8Text(r, 0, 'nfFixedTh, 3 decs');
|
||||
MyWorksheet.WriteNumber(r, 1, number, nfFixedTh, 3);
|
||||
MyWorksheet.WriteFontColor(r, 1, scGray);
|
||||
MyWorksheet.WriteNumber(r, 2, -number, nfFixedTh, 3);
|
||||
MyWorksheet.WriteFontColor(r, 2, scGray);
|
||||
inc(r);
|
||||
MyWorksheet.WriteUTF8Text(r, 0, 'nfSci, 1 dec');
|
||||
MyWorksheet.WriteNumber(r, 1, number, nfSci, 1);
|
||||
MyWorksheet.WriteFontColor(r, 1, scGray);
|
||||
MyWorksheet.WriteNumber(r, 2, -number, nfSci, 1);
|
||||
MyWorksheet.WriteFontColor(r, 2, scGray);
|
||||
MyWorksheet.WriteNumber(r, 3, 1.0/number, nfSci, 1);
|
||||
MyWorksheet.WriteFontColor(r, 3, scGray);
|
||||
MyWorksheet.WriteNumber(r, 4, -1.0/number, nfSci, 1);
|
||||
MyWorksheet.WriteFontColor(r, 4, scGray);
|
||||
inc(r);
|
||||
MyWorksheet.WriteUTF8Text(r, 0, 'nfSci, 2 dec');
|
||||
MyWorksheet.WriteNumber(r, 1, number, nfSci, 2);
|
||||
MyWorksheet.WriteFontColor(r, 1, scGray);
|
||||
MyWorksheet.WriteNumber(r, 2, -number, nfSci, 2);
|
||||
MyWorksheet.WriteFontColor(r, 2, scGray);
|
||||
MyWorksheet.WriteNumber(r, 3, 1.0/number, nfSci, 2);
|
||||
MyWorksheet.WriteFontColor(r, 3, scGray);
|
||||
MyWorksheet.WriteNumber(r, 4, -1.0/number, nfSci, 2);
|
||||
MyWorksheet.WriteFontColor(r, 4, scGray);
|
||||
inc(r);
|
||||
MyWorksheet.WriteUTF8Text(r, 0, 'nfSci, 3 dec');
|
||||
MyWorksheet.WriteNumber(r, 1, number, nfSci, 3);
|
||||
MyWorksheet.WriteFontColor(r, 1, scGray);
|
||||
MyWorksheet.WriteNumber(r, 2, -number, nfSci, 3);
|
||||
MyWorksheet.WriteFontColor(r, 2, scGray);
|
||||
MyWorksheet.WriteNumber(r, 3, 1.0/number, nfSci, 3);
|
||||
MyWorksheet.WriteFontColor(r, 3, scGray);
|
||||
MyWorksheet.WriteNumber(r, 4, -1.0/number, nfSci, 3);
|
||||
MyWorksheet.WriteFontColor(r, 4, scGray);
|
||||
inc(r);
|
||||
MyWorksheet.WriteUTF8Text(r, 0, 'nfExp, 1 dec');
|
||||
MyWorksheet.WriteNumber(r, 1, number, nfExp, 1);
|
||||
MyWorksheet.WriteFontColor(r, 1, scGray);
|
||||
MyWorksheet.WriteNumber(r, 2, -number, nfExp, 1);
|
||||
MyWorksheet.WriteFontColor(r, 2, scGray);
|
||||
MyWorksheet.WriteNumber(r, 3, 1.0/number, nfExp, 1);
|
||||
MyWorksheet.WriteFontColor(r, 3, scGray);
|
||||
MyWorksheet.WriteNumber(r, 4, -1.0/number, nfExp, 1);
|
||||
MyWorksheet.WriteFontColor(r, 4, scGray);
|
||||
inc(r);
|
||||
MyWorksheet.WriteUTF8Text(r, 0, 'nfExp, 2 decs');
|
||||
MyWorksheet.WriteNumber(r, 1, number, nfExp, 2);
|
||||
MyWorksheet.WriteNumber(r, 2, -number, nfExp, 2);
|
||||
MyWorksheet.WriteNumber(r, 3, 1.0/number, nfExp, 2);
|
||||
MyWorksheet.WriteNumber(r, 4, -1.0/number, nfExp, 2);
|
||||
inc(r);
|
||||
MyWorksheet.WriteUTF8Text(r, 0, 'nfExp, 3 decs');
|
||||
MyWorksheet.WriteNumber(r, 1, number, nfExp, 3);
|
||||
MyWorksheet.WriteFontColor(r, 1, scGray);
|
||||
MyWorksheet.WriteNumber(r, 2, -number, nfExp, 3);
|
||||
MyWorksheet.WriteFontColor(r, 2, scGray);
|
||||
MyWorksheet.WriteNumber(r, 3, 1.0/number, nfExp, 3);
|
||||
MyWorksheet.WriteFontColor(r, 3, scGray);
|
||||
MyWorksheet.WriteNumber(r, 4, -1.0/number, nfExp, 3);
|
||||
MyWorksheet.WriteFontColor(r, 4, scGray);
|
||||
inc(r);
|
||||
MyWorksheet.WriteUTF8Text(r, 0, 'nfCustom, "$"#,##0_);("$"#,##0)');
|
||||
MyWorksheet.WriteNumber(r, 1, number);
|
||||
MyWorksheet.WriteFontColor(r, 1, scGray);
|
||||
MyWorksheet.WriteNumberFormat(r, 1, nfCustom, '"$"#,##0_);("$"#,##0)');
|
||||
MyWorksheet.WriteNumber(r, 2, -number);
|
||||
MyWorksheet.WriteNumberFormat(r, 2, nfCustom, '"$"#,##0_);("$"#,##0)');
|
||||
MyWorksheet.WriteFontColor(r, 2, scGray);
|
||||
inc(r);
|
||||
MyWorksheet.WriteUTF8Text(r, 0, 'nfCustom, "$"#,##0.0_);[Red]("$"#,##0.0)');
|
||||
MyWorksheet.WriteNumber(r, 1, number);
|
||||
MyWorksheet.WriteFontColor(r, 1, scGray);
|
||||
MyWorksheet.WriteNumberFormat(r, 1, nfCustom, '"$"#,##0.0_);[Red]("$"#,##0.0)');
|
||||
MyWorksheet.WriteNumber(r, 2, -number);
|
||||
MyWorksheet.WriteNumberFormat(r, 2, nfCustom, '"$"#,##0.0_);[Red]("$"#,##0.0)');
|
||||
MyWorksheet.WriteFontColor(r, 2, scGray);
|
||||
inc(r);
|
||||
fmt := '"€"#,##0.0_);[Red]("€"#,##0.0)';
|
||||
MyWorksheet.WriteUTF8Text(r, 0, 'nfCustom, '+fmt);
|
||||
MyWorksheet.WriteNumber(r, 1, number);
|
||||
MyWorksheet.WriteNumberFormat(r, 1, nfCustom, UTF8ToAnsi(fmt));
|
||||
MyWorksheet.WriteFontColor(r, 1, scGray);
|
||||
MyWorksheet.WriteNumber(r, 2, -number);
|
||||
MyWorksheet.WriteNumberFormat(r, 2, nfCustom, UTF8ToAnsi(fmt));
|
||||
MyWorksheet.WriteFontColor(r, 2, scGray);
|
||||
inc(r);
|
||||
fmt := '[Green]"¥"#,##0.0_);[Red]-"¥"#,##0.0';
|
||||
MyWorksheet.WriteUTF8Text(r, 0, 'nfCustom, '+fmt);
|
||||
MyWorksheet.WriteNumber(r, 1, number);
|
||||
MyWorksheet.WriteNumberFormat(r, 1, nfCustom, UTF8ToAnsi(fmt));
|
||||
MyWorksheet.WriteFontColor(r, 1, scGray);
|
||||
MyWorksheet.WriteNumber(r, 2, -number);
|
||||
MyWorksheet.WriteNumberFormat(r, 2, nfCustom, UTF8ToAnsi(fmt));
|
||||
MyWorksheet.WriteFontColor(r, 2, scGray);
|
||||
inc(r);
|
||||
MyWorksheet.WriteUTF8Text(r, 0, 'nfCustom, _("$"* #,##0_);_("$"* (#,##0);_("$"* "-"_);_(@_)');
|
||||
MyWorksheet.WriteNumber(r, 1, number);
|
||||
MyWorksheet.WriteFontColor(r, 1, scGray);
|
||||
MyWorksheet.WriteNumberFormat(r, 1, nfCustom, '_("$"* #,##0_);_("$"* (#,##0);_("$"* "-"_);_(@_)');
|
||||
MyWorksheet.WriteNumber(r, 2, -number);
|
||||
MyWorksheet.WriteNumberFormat(r, 2, nfCustom, '_("$"* #,##0_);_("$"* (#,##0);_("$"* "-"_);_(@_)');
|
||||
MyWorksheet.WriteFontColor(r, 2, scGray);
|
||||
inc(r, 2);
|
||||
number := 1.333333333;
|
||||
MyWorksheet.WriteUTF8Text(35, 0, 'nfPercentage, 0 decs');
|
||||
MyWorksheet.WriteNumber(35, 1, number, nfPercentage, 0);
|
||||
MyWorksheet.WriteUTF8Text(36, 0, 'nfPercentage, 2 decs');
|
||||
MyWorksheet.WriteNumber(36, 1, number, nfPercentage, 2);
|
||||
MyWorksheet.WriteUTF8Text(37, 0, 'nfTimeInterval');
|
||||
MyWorksheet.WriteDateTime(37, 1, number, nfTimeInterval);
|
||||
MyWorksheet.WriteUTF8Text(r, 0, 'nfPercentage, 0 decs');
|
||||
MyWorksheet.WriteNumber(r, 1, number, nfPercentage, 0);
|
||||
inc(r);
|
||||
MyWorksheet.WriteUTF8Text(r, 0, 'nfPercentage, 1 decs');
|
||||
MyWorksheet.WriteNumber(r, 1, number, nfPercentage, 1);
|
||||
MyWorksheet.WriteFontColor(r, 1, scGray);
|
||||
inc(r);
|
||||
MyWorksheet.WriteUTF8Text(r, 0, 'nfPercentage, 2 decs');
|
||||
MyWorksheet.WriteNumber(r, 1, number, nfPercentage, 2);
|
||||
inc(r);
|
||||
MyWorksheet.WriteUTF8Text(r, 0, 'nfPercentage, 3 decs');
|
||||
MyWorksheet.WriteNumber(r, 1, number, nfPercentage, 3);
|
||||
MyWorksheet.WriteFontColor(r, 1, scGray);
|
||||
inc(r);
|
||||
MyWorksheet.WriteUTF8Text(r, 0, 'nfTimeInterval, hh:mm:ss');
|
||||
MyWorksheet.WriteDateTime(r, 1, number, nfTimeInterval);
|
||||
MyWorksheet.WriteFontColor(r, 1, scGray);
|
||||
inc(r);
|
||||
MyWorksheet.WriteUTF8Text(r, 0, 'nfTimeInterval, h:m:s');
|
||||
MyWorksheet.WriteDateTime(r, 1, number, nfTimeInterval, 'H:M:s');
|
||||
MyWorksheet.WriteFontColor(r, 1, scGray);
|
||||
inc(r);
|
||||
MyWorksheet.WriteUTF8Text(r, 0, 'nfTimeInterval, hh:mm');
|
||||
MyWorksheet.WriteDateTime(r, 1, number, nfTimeInterval, 'hh:mm');
|
||||
MyWorksheet.WriteFontColor(r, 1, scGray);
|
||||
inc(r);
|
||||
MyWorksheet.WriteUTF8Text(r, 0, 'nfTimeInterval, h:m');
|
||||
MyWorksheet.WriteDateTime(r, 1, number, nfTimeInterval, 'h:m');
|
||||
MyWorksheet.WriteFontColor(r, 1, scGray);
|
||||
inc(r);
|
||||
MyWorksheet.WriteUTF8Text(r, 0, 'nfTimeInterval, h');
|
||||
MyWorksheet.WriteDateTime(r, 1, number, nfTimeInterval, 'h');
|
||||
MyWorksheet.WriteFontColor(r, 1, scGray);
|
||||
|
||||
// Set width of columns 0 and 1
|
||||
MyWorksheet.WriteColWidth(0, 40);
|
||||
lCol.Width := 35;
|
||||
// Set width of columns 0 to 3
|
||||
MyWorksheet.WriteColWidth(0, 50);
|
||||
lCol.Width := 15;
|
||||
MyWorksheet.WriteColInfo(1, lCol);
|
||||
MyWorksheet.WriteColInfo(2, lCol);
|
||||
MyWorksheet.WriteColInfo(3, lCol);
|
||||
|
||||
// Set height of rows 5 and 6
|
||||
lRow.Height := 10;
|
||||
|
||||
Reference in New Issue
Block a user