Unit: lxHandleX
TXLSXHeaderFooterImages is the typed image collection exposed by TXLSXWorksheet.HeaderFooterImages
Varje sidtyp stöder vänster-, mitten- och högerbilder i både sidhuvud och sidfot, vilket ger arton oberoende bildplatser
Declarations
type
TXLSXHeaderFooterPageKind = (
xlsxHFOddPage, xlsxHFEvenPage, xlsxHFFirstPage);
TXLSXHeaderFooterPicturePosition = (
xlsxHFLeftHeader, xlsxHFCenterHeader, xlsxHFRightHeader,
xlsxHFLeftFooter, xlsxHFCenterFooter, xlsxHFRightFooter);
TXLSXHeaderFooterImage = class
property PageKind: TXLSXHeaderFooterPageKind;
property Position: TXLSXHeaderFooterPicturePosition;
property WidthPt, HeightPt: Double;
property MarginLeftPt, MarginTopPt: Double;
property Format: TXLSXImageFormat;
property Data: AnsiString;
property Title: WideString;
end;
TXLSXHeaderFooterImages = class
function Add(APageKind: TXLSXHeaderFooterPageKind;
APosition: TXLSXHeaderFooterPicturePosition): TXLSXHeaderFooterImage; overload;
function AddFromFile(APageKind: TXLSXHeaderFooterPageKind;
APosition: TXLSXHeaderFooterPicturePosition;
const AFileName: WideString): TXLSXHeaderFooterImage;
function Find(APageKind: TXLSXHeaderFooterPageKind;
APosition: TXLSXHeaderFooterPicturePosition): TXLSXHeaderFooterImage;
function Delete(APageKind: TXLSXHeaderFooterPageKind;
APosition: TXLSXHeaderFooterPicturePosition): Boolean; overload;
procedure Clear;
property Count: Integer;
property Items[Index: Integer]: TXLSXHeaderFooterImage; default;
end;
Behaviour
Add reuses the selected slot and inserts the required &G field into the matching header or footer section
- Even-page and first-page images automatically enable
DifferentOddEven and DifferentFirst
AddFromFile accepts PNG, JPEG, GIF, BMP, EMF, and WMF payloads
- Öppning och sparning bevarar bilddata i byte, format, titel, dimensioner i punkter, marginaler i punkter och den VML-ritning som ägs av relationen
- Bildritningar i sidhuvud och sidfot förblir oberoende av kalkylbladets kommentarsritningar på samma blad
Delete and Clear tar bort motsvarande bildfältkod medan övrig sidhuvuds- och sidfotstext lämnas orörd
Example
var
Image: TXLSXHeaderFooterImage;
begin
Image := Sheet.HeaderFooterImages.AddFromFile(
xlsxHFOddPage, xlsxHFLeftHeader, 'logo.png');
Image.WidthPt := 86;
Image.HeightPt := 42;
Sheet.HeaderFooterImages.AddFromFile(
xlsxHFEvenPage, xlsxHFCenterFooter, 'confidential.png');
end;
See also