systools_tlb.pas

条码控件： 一维条码控件 二维条码控件 PDF417Barcode MaxiCodeBarcode

    procedure LoadFromFile(const FileName: WideString); safecall;
    procedure SaveToFile(const FileName: WideString); safecall;
    function  Get_Stream: OleVariant; safecall;
    procedure Set_Stream(Value: OleVariant); safecall;
    procedure Clear; safecall;
    function  License(const Key: WideString): WordBool; safecall;
    property CaseSensitve: WordBool read Get_CaseSensitve write Set_CaseSensitve;
    property CommentMarkers: IStStringList read Get_CommentMarkers write Set_CommentMarkers;
    property EmbeddedHTML: IStStringList read Get_EmbeddedHTML write Set_EmbeddedHTML;
    property FixedLineLength: Integer read Get_FixedLineLength write Set_FixedLineLength;
    property Keywords: IStStringList read Get_Keywords write Set_Keywords;
    property LineTermChar: WideString read Get_LineTermChar write Set_LineTermChar;
    property LineTerminator: TStLineTerminator read Get_LineTerminator write Set_LineTerminator;
    property PageFooter: IStStringList read Get_PageFooter write Set_PageFooter;
    property PageHeader: IStStringList read Get_PageHeader write Set_PageHeader;
    property StringMarkers: IStStringList read Get_StringMarkers write Set_StringMarkers;
    property WordDelimeters: WideString read Get_WordDelimeters write Set_WordDelimeters;
    property Stream: OleVariant read Get_Stream write Set_Stream;
  end;

// *********************************************************************//
// DispIntf:  IStToHTMLDisp
// Flags:     (4416) Dual OleAutomation Dispatchable
// GUID:      {9F64CFCF-E50F-4807-A1AA-1E319B0A1D63}
// *********************************************************************//
  IStToHTMLDisp = dispinterface
    ['{9F64CFCF-E50F-4807-A1AA-1E319B0A1D63}']
    property CaseSensitve: WordBool dispid 1;
    property CommentMarkers: IStStringList dispid 2;
    property EmbeddedHTML: IStStringList dispid 3;
    property FixedLineLength: Integer dispid 4;
    property Keywords: IStStringList dispid 5;
    property LineTermChar: WideString dispid 6;
    property LineTerminator: TStLineTerminator dispid 7;
    property PageFooter: IStStringList dispid 8;
    property PageHeader: IStStringList dispid 9;
    property StringMarkers: IStStringList dispid 10;
    property WordDelimeters: WideString dispid 11;
    procedure GenerateHTML; dispid 12;
    procedure LoadFromFile(const FileName: WideString); dispid 13;
    procedure SaveToFile(const FileName: WideString); dispid 15;
    property Stream: OleVariant dispid 17;
    procedure Clear; dispid 14;
    function  License(const Key: WideString): WordBool; dispid 200;
  end;

// *********************************************************************//
// DispIntf:  IStToHTMLEvents
// Flags:     (4096) Dispatchable
// GUID:      {71DAEE82-3292-4122-8E4A-E1BB58D8D162}
// *********************************************************************//
  IStToHTMLEvents = dispinterface
    ['{71DAEE82-3292-4122-8E4A-E1BB58D8D162}']
    procedure OnProgress(Percent: Integer); dispid 1;
  end;

// *********************************************************************//
// Interface: IStStringList
// Flags:     (4416) Dual OleAutomation Dispatchable
// GUID:      {7A005B00-EE90-4034-B05A-64579C0A7837}
// *********************************************************************//
  IStStringList = interface(IDispatch)
    ['{7A005B00-EE90-4034-B05A-64579C0A7837}']
    function  Get__NewEnum: IUnknown; safecall;
    function  Get_Item(Index: Integer): WideString; safecall;
    procedure Set_Item(Index: Integer; const Value: WideString); safecall;
    function  Get_CommaText: WideString; safecall;
    procedure Set_CommaText(const Value: WideString); safecall;
    function  Get_Count: Integer; safecall;
    function  Get_Duplicates: Integer; safecall;
    procedure Set_Duplicates(Value: Integer); safecall;
    function  Get_Names(Index: Integer): WideString; safecall;
    function  Get_Sorted: WordBool; safecall;
    procedure Set_Sorted(Value: WordBool); safecall;
    function  Get_Strings(Index: Integer): WideString; safecall;
    procedure Set_Strings(Index: Integer; const Value: WideString); safecall;
    function  Get_Text: WideString; safecall;
    procedure Set_Text(const Value: WideString); safecall;
    function  Get_Values(const Name: WideString): WideString; safecall;
    procedure Set_Values(const Name: WideString; const Value: WideString); safecall;
    function  Add(const S: WideString): Integer; safecall;
    procedure Append(const S: WideString); safecall;
    procedure Clear; safecall;
    procedure Delete(Index: Integer); safecall;
    function  Equals(const Strings: IStStringList): WordBool; safecall;
    procedure Exchange(Index1: Integer; Index2: Integer); safecall;
    function  Find(const S: WideString; var Index: Integer): WordBool; safecall;
    function  IndexOf(const S: WideString): Integer; safecall;
    function  IndexOfName(const Name: WideString): Integer; safecall;
    procedure Insert(Index: Integer; const S: WideString); safecall;
    procedure LoadFromFile(const FileName: WideString); safecall;
    procedure Move(CurIndex: Integer; NewIndex: Integer); safecall;
    procedure SaveToFile(const FileName: WideString); safecall;
    procedure Sort; safecall;
    function  Get_Stream: OleVariant; safecall;
    procedure Set_Stream(Value: OleVariant); safecall;
    function  License(const Key: WideString): WordBool; safecall;
    property _NewEnum: IUnknown read Get__NewEnum;
    property Item[Index: Integer]: WideString read Get_Item write Set_Item; default;
    property CommaText: WideString read Get_CommaText write Set_CommaText;
    property Count: Integer read Get_Count;
    property Duplicates: Integer read Get_Duplicates write Set_Duplicates;
    property Names[Index: Integer]: WideString read Get_Names;
    property Sorted: WordBool read Get_Sorted write Set_Sorted;
    property Strings[Index: Integer]: WideString read Get_Strings write Set_Strings;
    property Text: WideString read Get_Text write Set_Text;
    property Values[const Name: WideString]: WideString read Get_Values write Set_Values;
    property Stream: OleVariant read Get_Stream write Set_Stream;
  end;

// *********************************************************************//
// DispIntf:  IStStringListDisp
// Flags:     (4416) Dual OleAutomation Dispatchable
// GUID:      {7A005B00-EE90-4034-B05A-64579C0A7837}
// *********************************************************************//
  IStStringListDisp = dispinterface
    ['{7A005B00-EE90-4034-B05A-64579C0A7837}']
    property _NewEnum: IUnknown readonly dispid -4;
    property Item[Index: Integer]: WideString dispid 0; default;
    property CommaText: WideString dispid 1;
    property Count: Integer readonly dispid 2;
    property Duplicates: Integer dispid 3;
    property Names[Index: Integer]: WideString readonly dispid 4;
    property Sorted: WordBool dispid 6;
    property Strings[Index: Integer]: WideString dispid 7;
    property Text: WideString dispid 8;
    property Values[const Name: WideString]: WideString dispid 9;
    function  Add(const S: WideString): Integer; dispid 10;
    procedure Append(const S: WideString); dispid 12;
    procedure Clear; dispid 13;
    procedure Delete(Index: Integer); dispid 15;
    function  Equals(const Strings: IStStringList): WordBool; dispid 16;
    procedure Exchange(Index1: Integer; Index2: Integer); dispid 17;
    function  Find(const S: WideString; var Index: Integer): WordBool; dispid 18;
    function  IndexOf(const S: WideString): Integer; dispid 19;
    function  IndexOfName(const Name: WideString): Integer; dispid 20;
    procedure Insert(Index: Integer; const S: WideString); dispid 22;
    procedure LoadFromFile(const FileName: WideString); dispid 24;
    procedure Move(CurIndex: Integer; NewIndex: Integer); dispid 26;
    procedure SaveToFile(const FileName: WideString); dispid 27;
    procedure Sort; dispid 29;
    property Stream: OleVariant dispid 21;
    function  License(const Key: WideString): WordBool; dispid 200;
  end;

// *********************************************************************//
// DispIntf:  IStStringListEvents
// Flags:     (4096) Dispatchable
// GUID:      {2457A45F-311D-4E0F-A370-AAD85C6C922E}
// *********************************************************************//
  IStStringListEvents = dispinterface
    ['{2457A45F-311D-4E0F-A370-AAD85C6C922E}']
    procedure OnChange; dispid 1;
    procedure OnChanging; dispid 2;
  end;

// *********************************************************************//
// Interface: IStRegEx
// Flags:     (4416) Dual OleAutomation Dispatchable
// GUID:      {6498218A-2A04-4B0F-AD99-AD1D551997E8}
// *********************************************************************//
  IStRegEx = interface(IDispatch)
    ['{6498218A-2A04-4B0F-AD99-AD1D551997E8}']
    function  Get_Avoid: WordBool; safecall;
    procedure Set_Avoid(Value: WordBool); safecall;
    function  Get_IgnoreCase: WordBool; safecall;
    procedure Set_IgnoreCase(Value: WordBool); safecall;
    function  Get_InFixedLineLength: Integer; safecall;
    procedure Set_InFixedLineLength(Value: Integer); safecall;
    function  Get_InLineTermChar: WideString; safecall;
    procedure Set_InLineTermChar(const Value: WideString); safecall;
    function  Get_InLineTerminator: TStLineTerminator; safecall;
    procedure Set_InLineTerminator(Value: TStLineTerminator); safecall;
    function  Get_LineCount: Integer; safecall;
    function  Get_LineNumbers: WordBool; safecall;
    procedure Set_LineNumbers(Value: WordBool); safecall;
    function  Get_LinesMatched: Integer; safecall;
    function  Get_LinesPerSecond: Integer; safecall;
    function  Get_LinesReplaced: Integer; safecall;
    function  Get_LinesSelected: Integer; safecall;
    function  Get_MatchPattern: IStStringList; safecall;
    procedure Set_MatchPattern(const Value: IStStringList); safecall;
    function  Get_OutFixedLineLength: Integer; safecall;
    procedure Set_OutFixedLineLength(Value: Integer); safecall;
    function  Get_OutLineTermChar: WideString; safecall;
    procedure Set_OutLineTermChar(const Value: WideString); safecall;
    function  Get_OutLineTerminitor: Integer; safecall;
    procedure Set_OutLineTerminitor(Value: Integer); safecall;
    function  Get_OutputOptions: TStOutputOption; safecall;
    procedure Set_OutputOptions(Value: TStOutputOption); safecall;
    function  Get_ReplacePattern: IStStringList; safecall;
    procedure Set_ReplacePattern(const Value: IStStringList); safecall;
    function  Get_SelAvoidPattern: IStStringList; safecall;
    procedure Set_SelAvoidPattern(const Value: IStStringList); safecall;
    function  CheckString(const S: WideString; var StartPos: Integer; var EndPos: Integer; 
                          var Length: Integer): WordBool; safecall;
    function  DOSMaskToRegEx(const Masks: WideString): WordBool; safecall;
    function  Execute: WordBool; safecall;
    procedure LoadFromFile(const FileName: WideString); safecall;
    procedure SaveToFile(const FileName: WideString); safecall;
    function  Get_Stream: OleVariant; safecall;