ttf160_tlb.pas
来自「胜天进销存源码,国产优秀的进销存」· PAS 代码 · 共 1,458 行 · 第 1/5 页
PAS
1,458 行
procedure Set_MergeCells(pMergeCells: WordBool); safecall;
function Get_NumberFormat(hSS: Integer): WideString; safecall;
procedure Set_NumberFormat(hSS: Integer; const pNumberFormat: WideString); safecall;
function Get_NumberFormatLocal(hSS: Integer): WideString; safecall;
procedure Set_NumberFormatLocal(hSS: Integer; const pNumberFormatLocal: WideString); safecall;
function Get_PatternStyle: Smallint; safecall;
procedure Set_PatternStyle(pPatternStyle: Smallint); safecall;
function Get_PatternFG: OLE_COLOR; safecall;
procedure Set_PatternFG(pPatternFG: OLE_COLOR); safecall;
function Get_PatternBG: OLE_COLOR; safecall;
procedure Set_PatternBG(pPatternBG: OLE_COLOR); safecall;
function Get_ProtectionLocked: WordBool; safecall;
procedure Set_ProtectionLocked(pProtectionLocked: WordBool); safecall;
function Get_ProtectionHidden: WordBool; safecall;
procedure Set_ProtectionHidden(pProtectionHidden: WordBool); safecall;
function Get_ValidationRule(hSS: Integer): WideString; safecall;
procedure Set_ValidationRule(hSS: Integer; const pValidationRule: WideString); safecall;
function Get_ValidationRuleLocal(hSS: Integer): WideString; safecall;
procedure Set_ValidationRuleLocal(hSS: Integer; const pValidationRuleLocal: WideString); safecall;
function Get_ValidationRuleRC(hSS: Integer; nRow: Integer; nCol: Integer): WideString; safecall;
procedure Set_ValidationRuleRC(hSS: Integer; nRow: Integer; nCol: Integer;
const pValidationRuleRC: WideString); safecall;
function Get_ValidationRuleLocalRC(hSS: Integer; nRow: Integer; nCol: Integer): WideString; safecall;
procedure Set_ValidationRuleLocalRC(hSS: Integer; nRow: Integer; nCol: Integer;
const pValidationRuleLocalRC: WideString); safecall;
function Get_ValidationText: WideString; safecall;
procedure Set_ValidationText(const pValidationText: WideString); safecall;
function Get_IsDefined(Attribute: F1CellAttrConstants): WordBool; safecall;
procedure Set_IsDefined(Attribute: F1CellAttrConstants; pIsDefined: WordBool); safecall;
function Get_IsBorderDefined(Border: F1BorderConstants): WordBool; safecall;
procedure Set_IsBorderDefined(Border: F1BorderConstants; pIsBorderDefined: WordBool); safecall;
property AlignHorizontal: F1HAlignConstants read Get_AlignHorizontal write Set_AlignHorizontal;
property WordWrap: WordBool read Get_WordWrap write Set_WordWrap;
property AlignVertical: F1VAlignConstants read Get_AlignVertical write Set_AlignVertical;
property BorderStyle[WhichBorder: F1BorderConstants]: F1BorderStyleConstants read Get_BorderStyle write Set_BorderStyle;
property BorderColor[WhichBorder: F1BorderConstants]: OLE_COLOR read Get_BorderColor write Set_BorderColor;
property FontName: WideString read Get_FontName write Set_FontName;
property FontCharSet: F1CharSetConstants read Get_FontCharSet write Set_FontCharSet;
property FontSize: Smallint read Get_FontSize write Set_FontSize;
property FontBold: WordBool read Get_FontBold write Set_FontBold;
property FontItalic: WordBool read Get_FontItalic write Set_FontItalic;
property FontUnderline: WordBool read Get_FontUnderline write Set_FontUnderline;
property FontStrikeout: WordBool read Get_FontStrikeout write Set_FontStrikeout;
property FontColor: OLE_COLOR read Get_FontColor write Set_FontColor;
property MergeCells: WordBool read Get_MergeCells write Set_MergeCells;
property NumberFormat[hSS: Integer]: WideString read Get_NumberFormat write Set_NumberFormat;
property NumberFormatLocal[hSS: Integer]: WideString read Get_NumberFormatLocal write Set_NumberFormatLocal;
property PatternStyle: Smallint read Get_PatternStyle write Set_PatternStyle;
property PatternFG: OLE_COLOR read Get_PatternFG write Set_PatternFG;
property PatternBG: OLE_COLOR read Get_PatternBG write Set_PatternBG;
property ProtectionLocked: WordBool read Get_ProtectionLocked write Set_ProtectionLocked;
property ProtectionHidden: WordBool read Get_ProtectionHidden write Set_ProtectionHidden;
property ValidationRule[hSS: Integer]: WideString read Get_ValidationRule write Set_ValidationRule;
property ValidationRuleLocal[hSS: Integer]: WideString read Get_ValidationRuleLocal write Set_ValidationRuleLocal;
property ValidationRuleRC[hSS: Integer; nRow: Integer; nCol: Integer]: WideString read Get_ValidationRuleRC write Set_ValidationRuleRC;
property ValidationRuleLocalRC[hSS: Integer; nRow: Integer; nCol: Integer]: WideString read Get_ValidationRuleLocalRC write Set_ValidationRuleLocalRC;
property ValidationText: WideString read Get_ValidationText write Set_ValidationText;
property IsDefined[Attribute: F1CellAttrConstants]: WordBool read Get_IsDefined write Set_IsDefined;
property IsBorderDefined[Border: F1BorderConstants]: WordBool read Get_IsBorderDefined write Set_IsBorderDefined;
end;
// *********************************************************************//
// DispIntf: IF1CellFormatDisp
// Flags: (4560) Hidden Dual NonExtensible OleAutomation Dispatchable
// GUID: {B047503D-7740-11D1-BDC3-0020AF9F8E6E}
// *********************************************************************//
IF1CellFormatDisp = dispinterface
['{B047503D-7740-11D1-BDC3-0020AF9F8E6E}']
property AlignHorizontal: F1HAlignConstants dispid 1;
property WordWrap: WordBool dispid 2;
property AlignVertical: F1VAlignConstants dispid 3;
property BorderStyle[WhichBorder: F1BorderConstants]: F1BorderStyleConstants dispid 4;
property BorderColor[WhichBorder: F1BorderConstants]: OLE_COLOR dispid 5;
property FontName: WideString dispid 6;
property FontCharSet: F1CharSetConstants dispid 7;
property FontSize: Smallint dispid 8;
property FontBold: WordBool dispid 9;
property FontItalic: WordBool dispid 10;
property FontUnderline: WordBool dispid 11;
property FontStrikeout: WordBool dispid 12;
property FontColor: OLE_COLOR dispid 13;
property MergeCells: WordBool dispid 28;
property NumberFormat[hSS: Integer]: WideString dispid 14;
property NumberFormatLocal[hSS: Integer]: WideString dispid 15;
property PatternStyle: Smallint dispid 16;
property PatternFG: OLE_COLOR dispid 17;
property PatternBG: OLE_COLOR dispid 18;
property ProtectionLocked: WordBool dispid 19;
property ProtectionHidden: WordBool dispid 20;
property ValidationRule[hSS: Integer]: WideString dispid 21;
property ValidationRuleLocal[hSS: Integer]: WideString dispid 22;
property ValidationRuleRC[hSS: Integer; nRow: Integer; nCol: Integer]: WideString dispid 23;
property ValidationRuleLocalRC[hSS: Integer; nRow: Integer; nCol: Integer]: WideString dispid 24;
property ValidationText: WideString dispid 25;
property IsDefined[Attribute: F1CellAttrConstants]: WordBool dispid 26;
property IsBorderDefined[Border: F1BorderConstants]: WordBool dispid 27;
end;
// *********************************************************************//
// Interface: IF1PageSetup
// Flags: (4560) Hidden Dual NonExtensible OleAutomation Dispatchable
// GUID: {B047504D-7740-11D1-BDC3-0020AF9F8E6E}
// *********************************************************************//
IF1PageSetup = interface(IDispatch)
['{B047504D-7740-11D1-BDC3-0020AF9F8E6E}']
function Get_Landscape: WordBool; safecall;
procedure Set_Landscape(pLandscape: WordBool); safecall;
function Get_FitPages: WordBool; safecall;
procedure Set_FitPages(pFitPages: WordBool); safecall;
function Get_PrintScale: Smallint; safecall;
procedure Set_PrintScale(pScale: Smallint); safecall;
function Get_PagesWide: Integer; safecall;
procedure Set_PagesWide(pPagesWide: Integer); safecall;
function Get_PagesTall: Integer; safecall;
procedure Set_PagesTall(pPagesTall: Integer); safecall;
function Get_PaperSize: F1PaperSizeConstants; safecall;
procedure Set_PaperSize(pPaperSize: F1PaperSizeConstants); safecall;
function Get_FirstPageNumber: Integer; safecall;
procedure Set_FirstPageNumber(pFirstPageNumber: Integer); safecall;
function Get_AutoPageNumber: WordBool; safecall;
procedure Set_AutoPageNumber(pAutoPageNumber: WordBool); safecall;
function Get_LeftMargin: Double; safecall;
procedure Set_LeftMargin(pLeftMargin: Double); safecall;
function Get_TopMargin: Double; safecall;
procedure Set_TopMargin(pTopMargin: Double); safecall;
function Get_RightMargin: Double; safecall;
procedure Set_RightMargin(pRightMargin: Double); safecall;
function Get_BottomMargin: Double; safecall;
procedure Set_BottomMargin(pBottomMargin: Double); safecall;
function Get_HeaderMargin: Double; safecall;
procedure Set_HeaderMargin(pHeaderMargin: Double); safecall;
function Get_FooterMargin: Double; safecall;
procedure Set_FooterMargin(pFooterMargin: Double); safecall;
function Get_CenterHoriz: WordBool; safecall;
procedure Set_CenterHoriz(pCenterHoriz: WordBool); safecall;
function Get_CenterVert: WordBool; safecall;
procedure Set_CenterVert(pCenterVert: WordBool); safecall;
function Get_Header: WideString; safecall;
procedure Set_Header(const pHeader: WideString); safecall;
function Get_Footer: WideString; safecall;
procedure Set_Footer(const pFooter: WideString); safecall;
function Get_GridLines: WordBool; safecall;
procedure Set_GridLines(pGridLines: WordBool); safecall;
function Get_BlackAndWhite: WordBool; safecall;
procedure Set_BlackAndWhite(pBlackAndWhite: WordBool); safecall;
function Get_RowHeadings: WordBool; safecall;
procedure Set_RowHeadings(pRowHeadings: WordBool); safecall;
function Get_ColHeadings: WordBool; safecall;
procedure Set_ColHeadings(pColHeadings: WordBool); safecall;
function Get_LeftToRight: WordBool; safecall;
procedure Set_LeftToRight(pLeftToRight: WordBool); safecall;
function Get_IsDefined(Attribute: F1PgSetupAttrConstants): WordBool; safecall;
procedure Set_IsDefined(Attribute: F1PgSetupAttrConstants; pIsDefined: WordBool); safecall;
function Get_PrintArea: WideString; safecall;
procedure Set_PrintArea(const pPrintArea: WideString); safecall;
function Get_PrintAreaLocal: WideString; safecall;
procedure Set_PrintAreaLocal(const pPrintAreaLocal: WideString); safecall;
function Get_PrintTitles: WideString; safecall;
procedure Set_PrintTitles(const pPrintTitles: WideString); safecall;
function Get_PrintTitlesLocal: WideString; safecall;
procedure Set_PrintTitlesLocal(const pPrintTitlesLocal: WideString); safecall;
property Landscape: WordBool read Get_Landscape write Set_Landscape;
property FitPages: WordBool read Get_FitPages write Set_FitPages;
property PrintScale: Smallint read Get_PrintScale write Set_PrintScale;
property PagesWide: Integer read Get_PagesWide write Set_PagesWide;
property PagesTall: Integer read Get_PagesTall write Set_PagesTall;
property PaperSize: F1PaperSizeConstants read Get_PaperSize write Set_PaperSize;
property FirstPageNumber: Integer read Get_FirstPageNumber write Set_FirstPageNumber;
property AutoPageNumber: WordBool read Get_AutoPageNumber write Set_AutoPageNumber;
property LeftMargin: Double read Get_LeftMargin write Set_LeftMargin;
property TopMargin: Double read Get_TopMargin write Set_TopMargin;
property RightMargin: Double read Get_RightMargin write Set_RightMargin;
property BottomMargin: Double read Get_BottomMargin write Set_BottomMargin;
property HeaderMargin: Double read Get_HeaderMargin write Set_HeaderMargin;
property FooterMargin: Double read Get_FooterMargin write Set_FooterMargin;
property CenterHoriz: WordBool read Get_CenterHoriz write Set_CenterHoriz;
property CenterVert: WordBool read Get_CenterVert write Set_CenterVert;
property Header: WideString read Get_Header write Set_Header;
property Footer: WideString read Get_Footer write Set_Footer;
property GridLines: WordBool read Get_GridLines write Set_GridLines;
property BlackAndWhite: WordBool read Get_BlackAndWhite write Set_BlackAndWhite;
property RowHeadings: WordBool read Get_RowHeadings write Set_RowHeadings;
property ColHeadings: WordBool read Get_ColHeadings write Set_ColHeadings;
property LeftToRight: WordBool read Get_LeftToRight write Set_LeftToRight;
property IsDefined[Attribute: F1PgSetupAttrConstants]: WordBool read Get_IsDefined write Set_IsDefined;
property PrintArea: WideString read Get_PrintArea write Set_PrintArea;
property PrintAreaLocal: WideString read Get_PrintAreaLocal write Set_PrintAreaLocal;
property PrintTitles: WideString read Get_PrintTitles write Set_PrintTitles;
property PrintTitlesLocal: WideString read Get_PrintTitlesLocal write Set_PrintTitlesLocal;
end;
// *********************************************************************//
// DispIntf: IF1PageSetupDisp
// Flags: (4560) Hidden Dual NonExtensible OleAutomation Dispatchable
// GUID: {B047504D-7740-11D1-BDC3-0020AF9F8E6E}
// *********************************************************************//
IF1PageSetupDisp = dispinterface
['{B047504D-7740-11D1-BDC3-0020AF9F8E6E}']
property Landscape: WordBool dispid 1;
property FitPages: WordBool dispid 2;
property PrintScale: Smallint dispid 3;
property PagesWide: Integer dispid 4;
property PagesTall: Integer dispid 5;
property PaperSize: F1PaperSizeConstants dispid 6;
property FirstPageNumber: Integer dispid 7;
property AutoPageNumber: WordBool dispid 8;
property LeftMargin: Double dispid 9;
property TopMargin: Double dispid 10;
property RightMargin: Double dispid 11;
property BottomMargin: Double dispid 12;
property HeaderMargin: Double dispid 13;
property FooterMargin: Double dispid 14;
property CenterHoriz: WordBool dispid 15;
property CenterVert: WordBool dispid 16;
property Header: WideString dispid 17;
property Footer: WideString dispid 18;
property GridLines: WordBool dispid 19;
property BlackAndWhite: WordBool dispid 20;
property RowHeadings: WordBool dispid 21;
property ColHeadings: WordBool dispid 22;
property LeftToRight: WordBool dispid 23;
property IsDefined[Attribute: F1PgSetupAttrConstants]: WordBool dispid 24;
property PrintArea: WideString dispid 25;
property PrintAreaLocal: WideString dispid 26;
property PrintTitles: WideString dispid 27;
property PrintTitlesLocal: WideString dispid 28;
end;
// *********************************************************************//
// Interface: IF1Rect
// Flags: (4560) Hidden Dual NonExtensible OleAutomation Dispatchable
// GUID: {B0475040-7740-11D1-BDC3-0020AF9F8E6E}
// *********************************************************************//
IF1Rect = interface(IDispatch)
['{B0475040-7740-11D1-BDC3-0020AF9F8E6E}']
function Get_Top: Integer; safecall;
function Get_Left: Integer; safecall;
function Get_Bottom: Integer; safecall;
function Get_Right: Integer; safecall;
function Get_Height: Integer; safecall;
function Get_Width: Integer; safecall;
property Top: Integer read Get_Top;
property Left: Integer read Get_Left;
property Bottom: Integer read Get_Bottom;
property Right: Integer read Get_Right;
property Height: Integer read Get_Height;
property Width: Integer read Get_Width;
end;
// *********************************************************************//
// DispIntf: IF1RectDisp
// Flags: (4560) Hidden Dual NonExtensible OleAutomation Dispatchable
// GUID: {B0475040-7740-11D1-BDC3-0020AF9F8E6E}
// *********************************************************************//
IF1RectDisp = dispinterface
['{B0475040-7740-11D1-BDC3-0020AF9F8E6E}']
property Top: Integer readonly dispid 1;
property Left: Integer readonly dispid 2;
property Bottom: Integer readonly dispid 3;
property Right: Integer readonly dispid 4;
property Height: Integer readonly dispid 5;
property Width: Integer readonly dispid 6;
end;
// *********************************************************************//
// Interface: IF1ObjPos
// Flags: (4560) Hidden Dual NonExtensible OleAutomation Dispatchable
// GUID: {B0475042-7740-11D1-BDC3-0020AF9F8E6E}
// *********************************************************************//
IF1ObjPos = interface(IDispatch)
['{B0475042-7740-11D1-BDC3-0020AF9F8E6E}']
function Get_StartRow: Single; safecall;
function Get_StartCol: Single; safecall;
function Get_EndRow: Single; safecall;
function Get_EndCol: Single; safecall;
function Get_Rows: Single; safecall;
function Get_Cols: Single; safecall;
property StartRow: Single read Get_StartRow;
property StartCol: Single read Get_StartCol;
property EndRow: Single read Get_EndRow;
property EndCol: Single read Get_EndCol;
property Rows: Single read Get_Rows;
property Cols: Single read Get_Cols;
end;
// *********************************************************************//
// DispIntf: IF1ObjPosDisp
// Flags: (4560) Hidden Dual NonExtensible OleAutomation Dispatchable
// GUID: {B0475042-7740-11D1-BDC3-0020AF9F8E6E}
// *********************************************************************//
IF1ObjPosDisp = dispinterface
['{B0475042-7740-11D1-BDC3-0020AF9F8E6E}']
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?