TXLSXImage と TXLSXImages クラス - HotXLS リファレンス

TXLSXImages が公開する画像コレクションです TXLSXWorksheet.Images が公開する画像コレクションです TXLSXImage 主なメンバー

主なメンバー

type
  TXLSXImageFillMode = (xlsxImageFillStretch, xlsxImageFillTile);

  TXLSXImage = class
    procedure Assign(Source: TXLSXImage);
    procedure Scale(APercent: Double; AKeepAspect: Boolean = True);
    procedure ClearPreservedXml;
    property Row, Col: Integer;
    property WidthEMU, HeightEMU: Integer;
    property WidthInch, HeightInch: Double;
    property WidthCM, HeightCM: Double;
    property WidthPt, HeightPt: Double;
    property Format: TXLSXImageFormat;
    property Data: AnsiString;
    property AnchorType: TXLSXAnchorEditAs;
    property CropLeft, CropTop, CropRight, CropBottom: Double;
    property Transparency, Brightness, Contrast: Double;
    property Rotation: Double;
    property AltText: WideString;
    property AltTextTitle: WideString;
    property FillMode: TXLSXImageFillMode;
    property HasPreservedXml: Boolean;
  end;

  TXLSXImages = class
    function Add: TXLSXImage; overload;
    function Add(Source: TXLSXImage): Integer; overload;
    function FindAt(ARow, ACol: Integer): TXLSXImage;
    function DeleteAt(ARow, ACol: Integer): Boolean;
    function DeleteInRange(ARow1, ACol1, ARow2, ACol2: Integer): Integer;
    property Items[Index: Integer]: TXLSXImage; default;
  end;

主なメンバー

Row and Col	Row and Col
WidthEMU and HeightEMU	1 始まりの左上アンカーセル
WidthInch, WidthCM and WidthPt	1 始まりの左上アンカーセル
AnchorType	Row and Col
CropLeft, CropTop, CropRight and CropBottom	English Metric Units の描画サイズ
Transparency	0〜100 パーセントの一様な画像透明度
Brightness and Contrast	-100〜100 パーセントの輝度調整
Rotation	時計回りのシェイプ回転角 (度)。-360〜360 にクランプされます
AltText	画像のアクセシビリティ用代替テキスト。スクリーンリーダーや支援技術から使用されます
AltTextTitle	Accessible title for the picture
FillMode	画像を 1 回引き伸ばすか、シェイプ全体にタイル表示します
HasPreservedXml and ClearPreservedXml	1 つの画像に対する、編集安全なインポート済み DrawingML の調査または破棄
FindAt	1 始まりのセル座標にアンカーされた画像を検索します

English Metric Units の描画サイズ

var Image: TXLSXImage;
begin
  Image := Sheet.Images.Add;
  Image.Row := 2;
  Image.Col := 4;
  Image.Data := PngBytes;
  Image.Format := xlsxImagePng;
  Image.WidthCM := 6;
  Image.AnchorType := xaOneCell;
  Image.CropLeft := 12.5;
  Image.Transparency := 20;
  Image.Brightness := 10;
  Image.Contrast := -5;
  Image.FillMode := xlsxImageFillStretch;
  Image.Rotation := 15;
end;