xlsrwii2.inc

来自「一个经典的读写Excel的控件」· INC 代码 · 共 26 行

{$ifdef ver130}
{$define OLD_COMPILER}
{$endif}
{$ifdef ver120}
{$define OLD_COMPILER}
{$endif}

// Use ZLib to decompress metafile pictures.
// BCB don't seems to have (delphi) zlib installed.
{$ifndef BCB}
  {$define USE_ZLIB}
{$endif}

// Use TPNGImage in order to store (non-destructive) pictures. Excel only
// accepts bitmaps (BMP) smaller than 32k.
// TPNGImage can be found at: http://pngdelphi.sourceforge.net

// If you install TPNGImage, and receives an error with TByteArray, replace
// the section at line 216 in pngimage.pas with this:
// {$ifndef UseDelphi}
//   TByteArray = Array[Word] of Byte;
//   pByteArray = ^TByteArray;
// {$endif}

{.$define USE_PNGIMAGE}