systools_tlb.pas

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

                             const OldWord: WideString; const NewWord: WideString; 
                             var Replacements: Integer): WideString; safecall;
    function  ReplaceString(const S: WideString; const OldString: WideString; 
                            const NewString: WideString; N: Integer; var Replacements: Integer): WideString; safecall;
    function  ReplaceStringAll(const S: WideString; const OldString: WideString; 
                               const NewString: WideString; var Replacements: Integer): WideString; safecall;
    function  RightTrimChars(const S: WideString; const Chars: WideString): WideString; safecall;
    function  Scramble(const S: WideString; const Key: WideString): WideString; safecall;
    function  Str2Ext(const S: WideString; var R: OleVariant): WordBool; safecall;
    function  Str2Int16(const S: WideString; var I: Smallint): WordBool; safecall;
    function  Str2Long(const S: WideString; var I: Integer): WordBool; safecall;
    function  Str2Real(const S: WideString; var R: Double): WordBool; safecall;
    function  Str2Word(const S: WideString; var W: Integer): WordBool; safecall;
    function  StrChDelete(const S: WideString; Pos: Integer): WideString; safecall;
    function  StrChInsert(const S: WideString; const C: WideString; Pos: Integer): WideString; safecall;
    function  StrChPos(const P: WideString; const C: WideString; var Pos: Integer): WordBool; safecall;
    function  StrStCopy(const S: WideString; Pos: Integer; Count: Integer): WideString; safecall;
    function  StrStDelete(const S: WideString; Pos: Integer; Count: Integer): WideString; safecall;
    function  StrStInsert(const S1: WideString; const S2: WideString; Pos: Integer): WideString; safecall;
    function  StrStPos(const P: WideString; const S: WideString; var Pos: Integer): WordBool; safecall;
    function  StrWithin(const S: WideString; const SearchStr: WideString; Start: Integer; 
                        var Position: Integer): WordBool; safecall;
    function  Substitute(const S: WideString; const FromStr: WideString; const ToStr: WideString): WideString; safecall;
    function  Trim(const S: WideString): WideString; safecall;
    function  TrimChars(const S: WideString; const Chars: WideString): WideString; safecall;
    function  TrimLead(const S: WideString): WideString; safecall;
    function  TrimSpaces(const S: WideString): WideString; safecall;
    function  TrimTrail(const S: WideString): WideString; safecall;
    function  ValPrep(const S: WideString): WideString; safecall;
    function  WordCount(const S: WideString; const WordDelims: WideString): Integer; safecall;
    function  WordPos(const S: WideString; const WordDelims: WideString; const AWord: WideString; 
                      N: Integer; var Position: Integer): WordBool; safecall;
    function  WordPosition(N: Integer; const S: WideString; const WordDelims: WideString; 
                           var Position: Integer): WordBool; safecall;
    procedure WordWrap(const InSt: WideString; var OutSt: WideString; var Overlap: WideString; 
                       Margin: Integer; PadToMArgin: WordBool); safecall;
    function  License(const Key: WideString): WordBool; safecall;
    function  Soundex(const S: WideString): WideString; safecall;
  end;

// *********************************************************************//
// DispIntf:  IStStringDisp
// Flags:     (4416) Dual OleAutomation Dispatchable
// GUID:      {B622F701-6E3F-4875-A574-201F0DB002F3}
// *********************************************************************//
  IStStringDisp = dispinterface
    ['{B622F701-6E3F-4875-A574-201F0DB002F3}']
    function  AddBackSlash(const DirName: WideString): WideString; dispid 1;
    function  AsciiCount(const S: WideString; const WordDelims: WideString; const Quote: WideString): Integer; dispid 2;
    function  AsciiPosition(N: Integer; const S: WideString; const WordDelims: WideString; 
                            const Quote: WideString; var Pos: Integer): WordBool; dispid 3;
    function  BinaryB(B: Byte): WideString; dispid 4;
    function  BinaryW(W: Integer): WideString; dispid 5;
    function  BinaryL(L: Integer): WideString; dispid 6;
    function  Center(const S: WideString; Len: Integer): WideString; dispid 7;
    function  CenterCh(const S: WideString; const C: WideString; Len: Integer): WideString; dispid 8;
    function  CharCount(const S: WideString; const C: WideString): Integer; dispid 9;
    function  CharExists(const S: WideString; const C: WideString): WordBool; dispid 10;
    function  CharStr(const C: WideString; Len: Integer): WideString; dispid 11;
    function  CleanPathName(const PathName: WideString): WideString; dispid 12;
    function  Commaize(L: Integer): WideString; dispid 13;
    function  CommaizeCh(L: Integer; const Ch: WideString): WideString; dispid 14;
    function  CompString(const S1: WideString; const S2: WideString): Integer; dispid 15;
    function  CompUCString(const S1: WideString; const S2: WideString): Integer; dispid 16;
    function  ContainsOnly(const S: WideString; const Chars: WideString; var BadPos: Integer): WordBool; dispid 17;
    function  ContainsOtherThan(const S: WideString; const Chars: WideString; var BadPos: Integer): WordBool; dispid 18;
    function  CopyFromNthWord(const S: WideString; const WordDelims: WideString; 
                              const AWord: WideString; N: Integer; var SubString: WideString): WordBool; dispid 19;
    function  CopyFromToWord(const S: WideString; const WordDelims: WideString; 
                             const Word1: WideString; const Word2: WideString; N1: Integer; 
                             N2: Integer; var SubString: WideString): WordBool; dispid 20;
    function  CopyLeft(const S: WideString; Len: Integer): WideString; dispid 21;
    function  CopyMid(const S: WideString; First: Integer; Len: Integer): WideString; dispid 22;
    function  CopyRight(const S: WideString; First: Integer): WideString; dispid 23;
    function  CopyWithin(const S: WideString; const Delimiter: WideString; Strip: WordBool): WideString; dispid 24;
    function  DefaultExtension(const Name: WideString; const Ext: WideString): WideString; dispid 25;
    function  DeleteFromNthWord(const S: WideString; const WordDelims: WideString; 
                                const AWord: WideString; N: Integer; var SubString: WideString): WordBool; dispid 26;
    function  DeleteFromToWord(const S: WideString; const WordDelims: WideString; 
                               const Word1: WideString; const Word2: WideString; N1: Integer; 
                               N2: Integer; var SubString: WideString): WordBool; dispid 27;
    function  DeleteWithin(const S: WideString; const Delimeter: WideString): WideString; dispid 28;
    function  Detab(const S: WideString; TabSize: Byte): WideString; dispid 29;
    function  Entab(const S: WideString; TabSize: Byte): WideString; dispid 30;
    function  Ext2Str(R: OleVariant; Width: Byte; Places: Byte): WideString; dispid 31;
    function  ExtractAscii(N: Integer; const S: WideString; const WordDelims: WideString; 
                           const Quote: WideString): WideString; dispid 32;
    function  ExtractTokens(const S: WideString; const Delims: WideString; 
                            const QuoteChar: WideString; AllowNulls: WordBool; 
                            out Tokens: IStStringList): Integer; dispid 33;
    function  ExtractWord(N: Integer; const S: WideString; const WordDelims: WideString): WideString; dispid 34;
    function  Filter(const S: WideString; const Filters: WideString): WideString; dispid 35;
    function  FloatForm(const Mask: WideString; R: Double; L: Integer; const LtCurr: WideString; 
                        const RtCurr: WideString; const Sep: WideString; const DecPt: WideString): WideString; dispid 36;
    function  ForceExtension(const Name: WideString; const Ext: WideString): WideString; dispid 37;
    function  HasExtension(const Name: WideString; var DotPos: Integer): WordBool; dispid 38;
    function  HexB(B: Byte): WideString; dispid 39;
    function  HexW(W: Integer): WideString; dispid 40;
    function  HexL(L: Integer): WideString; dispid 41;
    function  IsChAlpha(const C: WideString): WordBool; dispid 42;
    function  IsChAlphaNumeric(const C: WideString; const Numbers: WideString): WordBool; dispid 43;
    function  IsChNumeric(const C: WideString; const Numbers: WideString): WordBool; dispid 44;
    function  IsStrAlpha(const S: WideString): WordBool; dispid 45;
    function  IsStrAlphaNumeric(const S: WideString; const Numbers: WideString): WordBool; dispid 46;
    function  IsStrNumeric(const S: WideString; const Numbers: WideString): WordBool; dispid 47;
    function  JustExtension(const Name: WideString): WideString; dispid 48;
    function  JustFilename(const PathName: WideString): WideString; dispid 49;
    function  JustName(const PathName: WideString): WideString; dispid 50;
    function  JustPathname(const PathName: WideString): WideString; dispid 51;
    function  KeepChars(const S: WideString; const Chars: WideString): WideString; dispid 52;
    function  LastString(const S: WideString; const AString: WideString; var Position: Integer): WordBool; dispid 53;
    function  LastWord(const S: WideString; const WordDelims: WideString; const AWord: WideString; 
                       var Position: Integer): WordBool; dispid 54;
    function  LastWordAbs(const S: WideString; const WordDelims: WideString; var Position: Integer): WordBool; dispid 55;
    function  LeftPad(const S: WideString; Len: Integer): WideString; dispid 56;
    function  LeftPadCh(const S: WideString; const C: WideString; Len: Integer): WideString; dispid 57;
    function  LeftTrimChars(const S: WideString; const Chars: WideString): WideString; dispid 58;
    function  Long2Str(L: Integer): WideString; dispid 59;
    function  LongIntForm(const Mask: WideString; L: Integer; const LtCurr: WideString; 
                          const RtCurr: WideString; const Sep: WideString): WideString; dispid 60;
    function  OctalB(B: Byte): WideString; dispid 61;
    function  OctalW(W: Integer): WideString; dispid 62;
    function  OctalL(L: Integer): WideString; dispid 63;
    function  Pad(const S: WideString; Len: Integer): WideString; dispid 64;
    function  PadCh(const S: WideString; const C: WideString; Len: Integer): WideString; dispid 65;
    function  Real2Str(R: Double; Width: Byte; Places: Byte): WideString; dispid 66;
    function  RepeatString(const S: WideString; var Repetitions: Integer; MaxLen: Integer): WideString; dispid 67;
    function  ReplaceWord(const S: WideString; const WordDelims: WideString; 
                          const OldWord: WideString; const NewWord: WideString; N: Integer; 
                          var Replacements: Integer): WideString; dispid 68;
    function  ReplaceWordAll(const S: WideString; const WordDelims: WideString; 
                             const OldWord: WideString; const NewWord: WideString; 
                             var Replacements: Integer): WideString; dispid 69;
    function  ReplaceString(const S: WideString; const OldString: WideString; 
                            const NewString: WideString; N: Integer; var Replacements: Integer): WideString; dispid 70;
    function  ReplaceStringAll(const S: WideString; const OldString: WideString; 
                               const NewString: WideString; var Replacements: Integer): WideString; dispid 71;
    function  RightTrimChars(const S: WideString; const Chars: WideString): WideString; dispid 72;
    function  Scramble(const S: WideString; const Key: WideString): WideString; dispid 73;
    function  Str2Ext(const S: WideString; var R: OleVariant): WordBool; dispid 74;
    function  Str2Int16(const S: WideString; var I: Smallint): WordBool; dispid 75;
    function  Str2Long(const S: WideString; var I: Integer): WordBool; dispid 76;
    function  Str2Real(const S: WideString; var R: Double): WordBool; dispid 77;
    function  Str2Word(const S: WideString; var W: Integer): WordBool; dispid 78;
    function  StrChDelete(const S: WideString; Pos: Integer): WideString; dispid 79;
    function  StrChInsert(const S: WideString; const C: WideString; Pos: Integer): WideString; dispid 80;
    function  StrChPos(const P: WideString; const C: WideString; var Pos: Integer): WordBool; dispid 81;
    function  StrStCopy(const S: WideString; Pos: Integer; Count: Integer): WideString; dispid 82;
    function  StrStDelete(const S: WideString; Pos: Integer; Count: Integer): WideString; dispid 83;
    function  StrStInsert(const S1: WideString; const S2: WideString; Pos: Integer): WideString; dispid 84;
    function  StrStPos(const P: WideString; const S: WideString; var Pos: Integer): WordBool; dispid 85;
    function  StrWithin(const S: WideString; const SearchStr: WideString; Start: Integer; 
                        var Position: Integer): WordBool; dispid 86;
    function  Substitute(const S: WideString; const FromStr: WideString; const ToStr: WideString): WideString; dispid 87;
    function  Trim(const S: WideString): WideString; dispid 88;
    function  TrimChars(const S: WideString; const Chars: WideString): WideString; dispid 89;
    function  TrimLead(const S: WideString): WideString; dispid 90;
    function  TrimSpaces(const S: WideString): WideString; dispid 91;
    function  TrimTrail(const S: WideString): WideString; dispid 92;
    function  ValPrep(const S: WideString): WideString; dispid 93;
    function  WordCount(const S: WideString; const WordDelims: WideString): Integer; dispid 94;
    function  WordPos(const S: WideString; const WordDelims: WideString; const AWord: WideString; 
                      N: Integer; var Position: Integer): WordBool; dispid 95;
    function  WordPosition(N: Integer; const S: WideString; const WordDelims: WideString; 
                           var Position: Integer): WordBool; dispid 96;
    procedure WordWrap(const InSt: WideString; var OutSt: WideString; var Overlap: WideString; 
                       Margin: Integer; PadToMArgin: WordBool); dispid 97;
    function  License(const Key: WideString): WordBool; dispid 200;
    function  Soundex(const S: WideString): WideString; dispid 98;
  end;

// *********************************************************************//
// Interface: IStToHTML
// Flags:     (4416) Dual OleAutomation Dispatchable
// GUID:      {9F64CFCF-E50F-4807-A1AA-1E319B0A1D63}
// *********************************************************************//
  IStToHTML = interface(IDispatch)
    ['{9F64CFCF-E50F-4807-A1AA-1E319B0A1D63}']
    function  Get_CaseSensitve: WordBool; safecall;
    procedure Set_CaseSensitve(Value: WordBool); safecall;
    function  Get_CommentMarkers: IStStringList; safecall;
    procedure Set_CommentMarkers(const Value: IStStringList); safecall;
    function  Get_EmbeddedHTML: IStStringList; safecall;
    procedure Set_EmbeddedHTML(const Value: IStStringList); safecall;
    function  Get_FixedLineLength: Integer; safecall;
    procedure Set_FixedLineLength(Value: Integer); safecall;
    function  Get_Keywords: IStStringList; safecall;
    procedure Set_Keywords(const Value: IStStringList); safecall;
    function  Get_LineTermChar: WideString; safecall;
    procedure Set_LineTermChar(const Value: WideString); safecall;
    function  Get_LineTerminator: TStLineTerminator; safecall;
    procedure Set_LineTerminator(Value: TStLineTerminator); safecall;
    function  Get_PageFooter: IStStringList; safecall;
    procedure Set_PageFooter(const Value: IStStringList); safecall;
    function  Get_PageHeader: IStStringList; safecall;
    procedure Set_PageHeader(const Value: IStStringList); safecall;
    function  Get_StringMarkers: IStStringList; safecall;
    procedure Set_StringMarkers(const Value: IStStringList); safecall;
    function  Get_WordDelimeters: WideString; safecall;
    procedure Set_WordDelimeters(const Value: WideString); safecall;
    procedure GenerateHTML; safecall;