docs.txt

来自「Rich Text Format (.RTF) 格式資料的非視覺化元件」· 文本 代码 · 共 1,032 行 · 第 1/5 页

object TDocsCompCont
  List = <
    item
      Title = 'Introduction'
      ImageIndex = 1
      MacroBack = <>
      MacroDemo = <
        item
          Cmd = mcMouseToPoint
          Point = 'DesignPoint1'
        end
        item
          Cmd = mcSelect
          SelectDocIndex = -5
        end>
      MacroNext = <>
      MacroPrev = <>
      RTF = 
        '{\rtf1\ansi\ansicpg1252\deff0\deftab720{\fonttbl{\f0\fswiss MS S' +
        'ans Serif;}{\f1\froman\fcharset2 Symbol;}{\f2\fswiss\fcharset1 M' +
        'S Sans Serif;}{\f3\fswiss\fcharset1 Arial;}{\f4\fswiss\fcharset1' +
        ' Arial Black;}{\f5\fswiss\fcharset1 Arial;}}'#13#10'{\colortbl\red0\gr' +
        'een0\blue0;}'#13#10'\deflang1053\pard\plain\f4\fs32 Introduction'#13#10'\par' +
        ' \plain\f5\fs16 The StreamSec TDocs component for Delphi is a co' +
        'ntainer for rich text documents. \plain\f4\fs24 '#13#10'\par \pard\li2' +
        '00\fi-200{\*\pn\pnlvlblt\pnf1\pnindent200{\pntxtb\'#39'b7}}\plain\f5' +
        '\fs16 {\pntext\f1\'#39'b7\tab}It facilitates the use of pre-defined ' +
        'rich text in Delphi applications, by making it possible to store' +
        ' these documents in the code of the application EXE.\plain\f4\fs' +
        '24 '#13#10'\par \plain\f5\fs16 {\pntext\f1\'#39'b7\tab}It lets you organiz' +
        'e your documents in a tree structure, and displays the contents ' +
        'of your document collection in accordance with this structure.\p' +
        'lain\f4\fs24 '#13#10'\par \plain\f5\fs16 {\pntext\f1\'#39'b7\tab}It provid' +
        'es means for associating each document with four unique macros, ' +
        'providing control over the mouse, selection of documents, notify' +
        ' events and more.\plain\f4\fs24 '#13#10'\par }'#13#10#0
      StateIndex = 0
    end
    item
      Title = 'License'
      ImageIndex = 2
      Level = 1
      MacroBack = <>
      MacroDemo = <>
      MacroNext = <>
      MacroPrev = <>
      RTF = 
        '{\rtf1\ansi\ansicpg1252\deff0\deftab720{\fonttbl{\f0\fswiss MS S' +
        'ans Serif;}{\f1\froman\fcharset2 Symbol;}{\f2\fswiss\fcharset1 M' +
        'S Sans Serif;}{\f3\fswiss\fcharset1 Arial;}{\f4\fswiss\fcharset1' +
        ' Arial Black;}{\f5\fswiss\fprq2 System;}{\f6\fnil\fcharset1 Defa' +
        'ult;}{\f7\fmodern\fcharset1 Courier New;}}'#13#10'{\colortbl\red0\gree' +
        'n0\blue0;\red0\green0\blue255;}'#13#10'\deflang1053\pard\plain\f4\fs24' +
        '\cf1 Copyright\plain\f6\fs16 '#13#10'\par '#13#10'\par \plain\f3\fs16 Copyri' +
        'ght \'#39'a9 2000, StreamSec HB - http://www.streamsec.com/'#13#10'\par Al' +
        'l rights reserved.'#13#10'\par '#13#10'\par \plain\f4\fs24\cf1 License\plain' +
        '\f3\fs16 '#13#10'\par '#13#10'\par Redistribution and use in source and bina' +
        'ry forms, with or without modification, are permitted provided t' +
        'hat the following conditions are met:'#13#10'\par '#13#10'\par \pard\li200\f' +
        'i-200{\*\pn\pnlvlblt\pnf1\pnindent200{\pntxtb\'#39'b7}}\plain\f3\fs1' +
        '6 {\pntext\f1\'#39'b7\tab}Redistribution of the source and binary co' +
        'de in the files DocsReg.pas/DocsReg.dcu and MacroReg.pas/MacroRe' +
        'g.dcu is \plain\f3\fs18\b\i not\plain\f3\fs16  permitted under a' +
        'ny circumstances. (These files are not included in the freely re' +
        'distributable trialware version of this product.)\plain\f3\fs24 ' +
        #13#10'\par \plain\f3\fs16 {\pntext\f1\'#39'b7\tab}Redistributions of sou' +
        'rce code must retain the above copyright notice, this list of co' +
        'nditions and the following.\plain\f3\fs24 '#13#10'\par \plain\f3\fs16 ' +
        '{\pntext\f1\'#39'b7\tab}Redistributions in binary form must reproduc' +
        'e the above copyright notice, this list of conditions and the fo' +
        'llowing in the documentation and/or other materials provided wit' +
        'h the distribution.\plain\f3\fs24 '#13#10'\par \plain\f3\fs16 {\pntext' +
        '\f1\'#39'b7\tab}All advertising materials mentioning features or use' +
        ' of this software must display the following acknowledgement:\pl' +
        'ain\f3\fs24 '#13#10'\par \pard\plain\f3\fs16 '#13#10'\par \pard\li500\plain\' +
        'f7\fs20 This product includes software developed by StreamSec HB' +
        ' - http://www.streamsec.com/\plain\f7\fs24 '#13#10'\par \pard\plain\f3' +
        '\fs16 '#13#10'\par \pard\li200\fi-200{\*\pn\pnlvlblt\pnf1\pnindent200{' +
        '\pntxtb\'#39'b7}}\plain\f3\fs16 {\pntext\f1\'#39'b7\tab}No personal name' +
        's or organization names associated with StreamSec HB may be used' +
        ' to endorse or promote products derived from this software witho' +
        'ut specific prior written permission of the specific individual ' +
        'or organization.\plain\f3\fs24 '#13#10'\par \pard\plain\f3\fs16 '#13#10'\par' +
        ' \plain\f4\fs24\cf1 Liability disclaimer\plain\f3\fs16 '#13#10'\par '#13#10 +
        '\par THIS SOFTWARE IS PROVIDED BY StreamSec HB AS IS AND ANY EXP' +
        'RESSED OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE' +
        ' IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICU' +
        'LAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CON' +
        'TRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIA' +
        'L, EXEMPLARY,OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITE' +
        'D TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, ' +
        'DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND O' +
        'N ANY THEORY OF LIABILITY, WHETHER IN CONTRACT,STRICT LIABILITY,' +
        ' OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY ' +
        'OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBIL' +
        'ITY OF SUCH DAMAGE.'#13#10'\par }'#13#10#0
      StateIndex = 0
    end
    item
      Title = 'Freeware version'
      ImageIndex = 2
      Level = 1
      MacroBack = <>
      MacroDemo = <>
      MacroNext = <>
      MacroPrev = <>
      RTF = 
        '{\rtf1\ansi\ansicpg1252\deff0\deftab720{\fonttbl{\f0\fswiss MS S' +
        'ans Serif;}{\f1\froman\fcharset2 Symbol;}{\f2\fswiss\fcharset1 M' +
        'S Sans Serif;}{\f3\fswiss\fcharset1 Arial Black;}{\f4\fswiss\fch' +
        'arset1 Arial;}{\f5\fnil\fcharset1 Default;}{\f6\fmodern\fcharset' +
        '1 Courier New;}{\f7\fswiss\fcharset1 Arial Black;}{\f8\fmodern C' +
        'ourier New;}}'#13#10'{\colortbl\red0\green0\blue0;}'#13#10'\deflang1053\pard' +
        '\plain\f3\fs32 Freeware version'#13#10'\par \plain\f4\fs16 The freewar' +
        'e version of this product consists of the following units:'#13#10'\par' +
        ' '#13#10'\par \pard\li200\fi-200{\*\pn\pnlvlblt\pnf1\pnindent200{\pntx' +
        'tb\'#39'b7}}\plain\f6\fs16 {\pntext\f1\'#39'b7\tab}Docs.pas\plain\f4\fs1' +
        '6 , '#13#10'\par \plain\f8\fs16 {\pntext\f1\'#39'b7\tab}Macro.pas\plain\f4' +
        '\fs16 , '#13#10'\par \plain\f8\fs16 {\pntext\f1\'#39'b7\tab}FilerSup.pas\p' +
        'lain\f4\fs16  and '#13#10'\par \plain\f6\fs16 {\pntext\f1\'#39'b7\tab}Desi' +
        'gnPoint.pas\plain\f4\fs16 .\plain\f5\fs16 '#13#10'\par \pard\plain\f4\' +
        'fs16 '#13#10'\par These units are sufficient to install complete versi' +
        'ons of the TDocs and TDesignPoint components. They do however no' +
        't include full design time support for creating document collect' +
        'ions. If you are using this version of the product you will have' +
        ' to create document collections with an external application and' +
        ' manually import the code into the Delphi IDE.\plain\f5\fs16 '#13#10'\' +
        'par '#13#10'\par }'#13#10#0
    end
    item
      Title = 'Commersial version'
      ImageIndex = 2
      Level = 1
      MacroBack = <>
      MacroDemo = <>
      MacroNext = <>
      MacroPrev = <>
      RTF = 
        '{\rtf1\ansi\ansicpg1252\deff0\deftab720{\fonttbl{\f0\fswiss MS S' +
        'ans Serif;}{\f1\froman\fcharset2 Symbol;}{\f2\fswiss\fcharset1 M' +
        'S Sans Serif;}{\f3\fmodern\fcharset1 Courier New;}{\f4\fswiss\fp' +
        'rq2 System;}{\f5\fswiss\fcharset1 Arial;}{\f6\fmodern Courier Ne' +
        'w;}{\f7\fnil\fcharset1 Default;}{\f8\fswiss\fcharset1 Arial Blac' +
        'k;}}'#13#10'{\colortbl\red0\green0\blue0;}'#13#10'\deflang1053\pard\plain\f8' +
        '\fs32 Commersial version'#13#10'\par \plain\f5\fs16 The commersial ver' +
        'sion of this product consists of the following units:'#13#10'\par '#13#10'\p' +
        'ar \pard\li200\fi-200{\*\pn\pnlvlblt\pnf1\pnindent200{\pntxtb\'#39'b' +
        '7}}\plain\f3\fs16 {\pntext\f1\'#39'b7\tab}Docs.pas\plain\f5\fs16 , '#13 +
        #10'\par \plain\f3\fs16 {\pntext\f1\'#39'b7\tab}DocsReg.pas\plain\f5\fs' +
        '16 , '#13#10'\par \plain\f6\fs16 {\pntext\f1\'#39'b7\tab}Macro.pas\plain\f' +
        '5\fs16 , '#13#10'\par \plain\f6\fs16 {\pntext\f1\'#39'b7\tab}MacroReg.pas\' +
        'plain\f5\fs16 ,'#13#10'\par \plain\f6\fs16 {\pntext\f1\'#39'b7\tab}REMain.' +
        'pas\plain\f5\fs16 ,'#13#10'\par \plain\f6\fs16 {\pntext\f1\'#39'b7\tab}REA' +
        'bout.pas\plain\f5\fs16 ,'#13#10'\par \plain\f6\fs16 {\pntext\f1\'#39'b7\ta' +
        'b}FilerSup.pas\plain\f5\fs16  and '#13#10'\par \plain\f3\fs16 {\pntext' +
        '\f1\'#39'b7\tab}DesignPoint.pas\plain\f5\fs16 .\plain\f7\fs16 '#13#10'\par' +
        ' \pard\plain\f5\fs16 '#13#10'\par These units are sufficient to instal' +
        'l complete versions of the TDocs and TDesignPoint components and' +
        ' include full design time support for creating document collecti' +
        'ons. Documents, document collections and macros are easily creat' +
        'ed and maintained inside the Delphi IDE.\plain\f7\fs16 '#13#10'\par '#13#10 +
        '\par \pard\plain\f7\fs16 '#13#10'\par }'#13#10#0
    end
    item
      Title = 'Docs.pas unit'
      ImageIndex = 5
      MacroBack = <>
      MacroDemo = <>
      MacroNext = <>
      MacroPrev = <>
      RTF = 
        '{\rtf1\ansi\ansicpg1252\deff0\deftab720{\fonttbl{\f0\fswiss MS S' +
        'ans Serif;}{\f1\froman\fcharset2 Symbol;}{\f2\fswiss\fcharset1 M' +
        'S Sans Serif;}{\f3\fnil\fcharset1 Default;}{\f4\fswiss\fcharset1' +
        ' Arial Black;}{\f5\fswiss\fcharset1 Arial;}{\f6\fswiss\fcharset1' +
        ' Arial;}{\f7\fswiss\fprq2 System;}}'#13#10'{\colortbl\red0\green0\blue' +
        '0;}'#13#10'\deflang1053\pard\plain\f4\fs32 Docs.pas Unit\plain\f3\fs16' +
        ' '#13#10'\par \plain\f6\fs16 This unit contains the declaration and im' +
        'plementation of the TDocs component, as well as the declaration ' +
        'and implementation of some related classes and subclasses.'#13#10'\par' +
        ' '#13#10'\par Registred components:'#13#10'\par \pard\li200\fi-200{\*\pn\pnl' +
        'vlblt\pnf1\pnindent200{\pntxtb\'#39'b7}}\plain\f6\fs16 {\pntext\f1\'#39 +
        'b7\tab}TDocs'#13#10'\par \pard\plain\f6\fs16 '#13#10'\par Subclasses to TDoc' +
        's:'#13#10'\par \pard\li200\fi-200{\*\pn\pnlvlblt\pnf1\pnindent200{\pnt' +
        'xtb\'#39'b7}}\plain\f6\fs16 {\pntext\f1\'#39'b7\tab}TDocList'#13#10'\par {\pnt' +
        'ext\f1\'#39'b7\tab}TDoc'#13#10'\par {\pntext\f1\'#39'b7\tab}TRTFStream'#13#10'\par \' +
        'pard\plain\f6\fs16 '#13#10'\par Registred actions:'#13#10'\par \pard\li200\f' +
        'i-200{\*\pn\pnlvlblt\pnf1\pnindent200{\pntxtb\'#39'b7}}\plain\f6\fs1' +
        '6 {\pntext\f1\'#39'b7\tab}TDocBack'#13#10'\par {\pntext\f1\'#39'b7\tab}TDocDem' +
        'o'#13#10'\par {\pntext\f1\'#39'b7\tab}TDocNext'#13#10'\par {\pntext\f1\'#39'b7\tab}T' +
        'DocPrev'#13#10'\par \pard\plain\f6\fs16 '#13#10'\par Filer support classes (' +
        'internal use only):'#13#10'\par \pard\li200\fi-200{\*\pn\pnlvlblt\pnf1' +
        '\pnindent200{\pntxtb\'#39'b7}}\plain\f6\fs16 {\pntext\f1\'#39'b7\tab}TDo' +
        'cCollection'#13#10'\par {\pntext\f1\'#39'b7\tab}TDocCollectionItem'#13#10'\par \' +
        'pard\plain\f6\fs16 '#13#10'\par Base classes (internal use only):'#13#10'\pa' +
        'r \pard\li200\fi-200{\*\pn\pnlvlblt\pnf1\pnindent200{\pntxtb\'#39'b7' +
        '}}\plain\f6\fs16 {\pntext\f1\'#39'b7\tab}TDocAction'#13#10'\par \pard\plai' +
        'n\f6\fs16 '#13#10'\par Interfaces:'#13#10'\par \pard\li200\fi-200{\*\pn\pnlv' +
        'lblt\pnf1\pnindent200{\pntxtb\'#39'b7}}\plain\f6\fs16 {\pntext\f1\'#39'b' +
        '7\tab}IRTFDesigner\plain\f3\fs16 '#13#10'\par \plain\f6\fs16 {\pntext\' +
        'f1\'#39'b7\tab}IDocsDesigner\plain\f3\fs16 '#13#10'\par \pard\plain\f3\fs1' +
        '6 '#13#10'\par }'#13#10#0
      StateIndex = 0
    end
    item
      Title = 'TDocs component'
      ImageIndex = 4