Axolot Data

KenWhite

To add a new sheet

  // XLS is an XLSReadWriteII5 component
  XLS.Add;
  // Name it
  XLS[XLS.Count - 1].Name := 'NewName';

To get the sheet count

Code: Select all

var
  NumSheets: Integer;
begin
  NumSheets := XLS.Count;
end;

KenWhite

Same as you would using Excel 2007, using the XLS Workbook's WorkspaceOptions, where XLS is a TXLSReadWriteII5:

Code: Select all

  XLS[0].WorkspaceOptions := [woFitToPage];

KenWhite

What you're asking is now done with the PrintSettings.

Code: Select all

var
  Col1, Col2, Row1, Row2: Integer;
begin
  AreaStrToColRow('$A$1:$IV$10', Col1, Col2, Row1, Row2);
  Sheet.PrintSettings.PrintTitles(Col1, Col2, Row1, Row2);
end;

KenWhite

Lars: FYI, this question was asked at StackOverflow (http://stackoverflow.com/q/35917113/62576), and I provided code there that demonstrates that the problem is not in XLSRWII5, both by using an array of Unicode strings and an ADO table with the strings in Unicode fields. The code for both methods (...

KenWhite

Thanks, Lars. Works perfectly.

KenWhite

Thanks, Lars.

KenWhite

XLSReadWriteII5 v5.20.69 I've been trying for the last several hours to apply simple DataBar conditional formatting to a range of cells without success. I've tried various combinations of values in everything I can find to no avail. I've been looking inside the workbook at the resulting XML to see i...

KenWhite

I'm using XLSReadWriteII5 v5.20.69. I'm getting an exception when I try to set PrintTitles after the sheet is renamed. It works fine if I set PrintTitles first. Here's an example that demonstrates: program Project1; {$APPTYPE CONSOLE} uses SysUtils, XLSReadWriteII5; var XLS: TXLSReadWriteII5; i: Int...

KenWhite

There is a typo in XLSSheetData5, in a method name for TXLSWorksheet: procedure ClearCell(const ACol, ARow: integer); procedure CelarCells(const ACol1, ARow1, ACol2, ARow2: integer); // Should be ClearCells As this not only hides the method name from Code Insight in the IDE, but makes it impossible ...

KenWhite

You really should learn to read source code.

Code: Select all

XLS[0].Cells[2,3].FillPatternForeColorRGB := $AFAFAF;

KenWhite

XLS.CmdFormat.Border - use

Code: Select all

XLS.CmdFormat.BeginEdit[XLS[0]);
XLS.CmdFormat.Border.Preset(cbspOutline);

See the other properties of

Code: Select all

CmdFormat

, such as

Code: Select all

BorderLeftColor

.

KenWhite

Ken,

Remove the AnsiString typecast. You're converting it basically the same way AsString would.

Axolot Data

Search found 12 matches

Re: Adding worksheets

Re: Page Setup

Re: How to set BuiltInName to bnPrintTitles in Version 5?

Re: XLSReadWriteII 5 destroys xls strings when writing TWideMemo

Re: Unable to create DataBar conditional formatting

Re: Misspelled procedure name in XLSSheetData5 (v5.20.69)

Unable to create DataBar conditional formatting

Exception raised when setting PrintTitles after sheet rename

Misspelled procedure name in XLSSheetData5 (v5.20.69)

Re: XlsReadwriteII5 FillPatternForeColor use

Re: XlsReadWriteII5 > ApplyFormat.Box