TXLSXImages is the worksheet image collection exposed by TXLSXWorksheet.Images and each TXLSXImage carries image bytes, format and drawing anchor geometry
Declarations
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;
Key medlemmar
| Row and Col | 1-baserad förankringscell i övre vänstra hörnet |
| WidthEMU and HeightEMU | Ritningens naturliga mått i English Metric Units |
| WidthInch, WidthCM and WidthPt | Bekväma geometrivyer som uppdaterar de underliggande EMU-måtten |
| AnchorType | Väljer flytta och storleksändra med celler, endast flytta eller absolut ritningsplacering |
| CropLeft, CropTop, CropRight and CropBottom | Beskärningskanter för källbilden i procent från 0 till 100 |
| Transparency | Enhetlig bildtransparens från 0 till 100 procent |
| Brightness and Contrast | Luminansjusteringar från -100 till 100 procent |
| Rotation | Medurs rotation i grader, begränsad till -360 till 360 |
| AltText | Alternativ text för hjälpmedel som läses av skärmläsare och andra stödfunktioner |
| AltTextTitle | Tillgänglig titel för bilden |
| FillMode | Sträcker ut bilden en gång eller lägger den som plattor över formen |
| HasPreservedXml and ClearPreservedXml | Inspekterar eller förkastar redigeringssäker importerad DrawingML för en bild |
| FindAt | Finner bilden som är förankrad vid en 1-baserad cellkoordinat |
Exempel
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;
Se även