dmactions.~pas

RichView是Delphi下一个很好用的类rtf格式编辑器

{*******************************************************}
{                                                       }
{       RichViewActions                                 }
{       Datamodule with RichViewActions.                }
{       Used to set default property values for         }
{       actions.                                        }
{                                                       }
{       Copyright (c) 2002-2003, Sergey Tkachenko       }
{       [e-mail]                               }
{       http://www.trichview.com                        }
{                                                       }
{*******************************************************}

{
  It's not recommended to use this module in your applications directly -
  create your own ActionManager with richviewactions instead.
}

unit dmActions;

interface

uses
  SysUtils, Classes, Forms, ActnList, ImgList, Controls, StdActns, RichViewActions,
  RVOfficeCnv;

type
  TrvActionsResource = class(TDataModule)
    ActionList1: TActionList;
    rvActionCut1: TrvActionCut;
    rvActionCopy1: TrvActionCopy;
    rvActionPaste1: TrvActionPaste;
    rvActionUndo1: TrvActionUndo;
    rvActionRedo1: TrvActionRedo;
    rvActionFontBold1: TrvActionFontBold;
    rvActionFontItalic1: TrvActionFontItalic;
    rvActionInsertTable1: TrvActionInsertTable;
    rvActionFontUnderline1: TrvActionFontUnderline;
    rvActionFontStrikeout1: TrvActionFontStrikeout;
    rvActionPrintPreview1: TrvActionPrintPreview;
    rvActionPrint1: TrvActionPrint;
    rvActionWordWrap1: TrvActionWordWrap;
    rvActionNew1: TrvActionNew;
    ImageList1: TImageList;
    rvActionFonts1: TrvActionFonts;
    rvActionAlignLeft1: TrvActionAlignLeft;
    rvActionAlignRight1: TrvActionAlignRight;
    rvActionAlignCenter: TrvActionAlignCenter;
    rvActionSelectAll1: TrvActionSelectAll;
    rvActionIndentInc1: TrvActionIndentInc;
    rvActionIndentDec1: TrvActionIndentDec;
    rvActionTableInsertRowsAbove1: TrvActionTableInsertRowsAbove;
    rvActionTableInsertRowsBelow1: TrvActionTableInsertRowsBelow;
    rvActionAlignJustify1: TrvActionAlignJustify;
    rvActionTableInsertColLeft1: TrvActionTableInsertColLeft;
    rvActionTableInsertColRight1: TrvActionTableInsertColRight;
    rvActionTableDeleteRows1: TrvActionTableDeleteRows;
    rvActionTableDeleteCols1: TrvActionTableDeleteCols;
    rvActionQuickPrint1: TrvActionQuickPrint;
    rvActionTableMergeCells1: TrvActionTableMergeCells;
    rvActionTableSplitCells1: TrvActionTableSplitCells;
    rvActionTableSelectTable1: TrvActionTableSelectTable;
    rvActionTableSelectRows1: TrvActionTableSelectRows;
    rvActionTableSelectCols1: TrvActionTableSelectCols;
    rvActionTableSelectCell1: TrvActionTableSelectCell;
    rvActionFontGrow1: TrvActionFontGrow;
    rvActionFontShrink1: TrvActionFontShrink;
    rvActionFontGrowOnePoint1: TrvActionFontGrowOnePoint;
    rvActionFontShrinkOnePoint1: TrvActionFontShrinkOnePoint;
    rvActionFontAllCaps1: TrvActionFontAllCaps;
    rvActionFontOverline1: TrvActionFontOverline;
    rvActionFind1: TrvActionFind;
    rvActionFindNext1: TrvActionFindNext;
    rvActionReplace1: TrvActionReplace;
    rvActionFontColor1: TrvActionFontColor;
    rvActionFontBackColor1: TrvActionFontBackColor;
    rvActionParaColor1: TrvActionParaColor;
    rvActionColor1: TrvActionColor;
    rvActionTableDeleteTable1: TrvActionTableDeleteTable;
    rvActionParagraph1: TrvActionParagraph;
    rvActionFontEx1: TrvActionFontEx;
    rvActionFillColor1: TrvActionFillColor;
    rvActionSave1: TrvActionSave;
    rvActionSaveAs1: TrvActionSaveAs;
    rvActionOpen1: TrvActionOpen;
    rvActionExport1: TrvActionExport;
    rvActionInsertFile1: TrvActionInsertFile;
    rvActionInsertPicture1: TrvActionInsertPicture;
    rvActionPasteSpecial1: TrvActionPasteSpecial;
    rvActionLineSpacing1001: TrvActionLineSpacing100;
    rvActionLineSpacing1501: TrvActionLineSpacing150;
    rvActionLineSpacing2001: TrvActionLineSpacing200;
    rvActionInsertPageBreak1: TrvActionInsertPageBreak;
    rvActionRemovePageBreak1: TrvActionRemovePageBreak;
    rvActionTableCellVAlignTop1: TrvActionTableCellVAlignTop;
    rvActionTableCellVAlignMiddle1: TrvActionTableCellVAlignMiddle;
    rvActionTableCellVAlignBottom1: TrvActionTableCellVAlignBottom;
    rvActionTableCellVAlignDefault1: TrvActionTableCellVAlignDefault;
    rvActionParaBorder1: TrvActionParaBorder;
    rvActionItemProperties1: TrvActionItemProperties;
    rvActionInsertHLine1: TrvActionInsertHLine;
    rvActionInsertHyperlink1: TrvActionInsertHyperlink;
    rvActionTableProperties1: TrvActionTableProperties;
    rvActionTableGrid1: TrvActionTableGrid;
    rvActionParaList1: TrvActionParaList;
    rvActionInsertSymbol1: TrvActionInsertSymbol;
    rvActionTableCellLeftBorder1: TrvActionTableCellLeftBorder;
    rvActionTableCellRightBorder1: TrvActionTableCellRightBorder;
    rvActionTableCellTopBorder1: TrvActionTableCellTopBorder;
    rvActionTableCellBottomBorder1: TrvActionTableCellBottomBorder;
    rvActionTableCellAllBorders1: TrvActionTableCellAllBorders;
    rvActionTableCellNoBorders1: TrvActionTableCellNoBorders;
    rvActionParaBullets1: TrvActionParaBullets;
    rvActionParaNumbering1: TrvActionParaNumbering;
    rvActionBackground1: TrvActionBackground;
    rvActionPageSetup1: TrvActionPageSetup;
    rvActionTextRTL1: TrvActionTextRTL;
    rvActionTextLTR1: TrvActionTextLTR;
    rvActionParaRTL1: TrvActionParaRTL;
    rvActionParaLTR1: TrvActionParaLTR;
    rvActionCharCase1: TrvActionCharCase;
    RVOfficeConverter1: TRVOfficeConverter;
  private
    { Private declarations }
  public
    { Public declarations }
    procedure ModifyCaption;
  end;

var
  rvActionsResource: TrvActionsResource;

implementation

{$R *.dfm}



procedure TrvActionsResource.ModifyCaption;
begin
    rvActionCut1.Caption := '& 剪切';
    rvActionCopy1.Caption := '& 复制';
    rvActionPaste1.Caption := '& 粘贴';
    rvActionUndo1.Caption := '& 撤销';
    rvActionRedo1.Caption := '& 重做';
    rvActionFontBold1.Caption := '& 黑体';
    rvActionFontItalic1.Caption := '& 斜体';
    rvActionInsertTable1.Caption := '& 插入表格 ...';
    rvActionFontUnderline1.Caption := '& 下划线';
    rvActionFontStrikeout1.Caption := '& 中划线';
    rvActionPrintPreview1.Caption := '& 打印预览';
    rvActionPrint1.Caption := '& 打印 ...';
    rvActionWordWrap1.Caption := '& 单词折行';
    rvActionNew1.Caption := '& 新建';
    rvActionFonts1.Caption := '& 字体设置 ...';
    rvActionAlignLeft1.Caption := '& 左对齐';
    rvActionAlignRight1.Caption := '& 右对齐';
    rvActionAlignCenter.Caption := '& 中心对齐';
    rvActionSelectAll1.Caption := '& 全选择';
    rvActionIndentInc1.Caption := '& 增加缩进';
    rvActionIndentDec1.Caption := '& 减少缩进';
    rvActionTableInsertRowsAbove1.Caption := '& 上插入行';
    rvActionTableInsertRowsBelow1.Caption := '& 下插入行';
    rvActionAlignJustify1.Caption := '& 左右对齐';