⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 worddecs.pas

📁 Delphi写的Microsoft Word模板程序,可以在Word中加入选单。用法:将编译好的testwll.dll改名为test.wll
💻 PAS
📖 第 1 页 / 共 5 页
字号:
  errCommandNotFunction   = 149;
  errDuplDlgControlId     = 150;
  errDocMaximized         = 151;
  errNoDocOpen            = 152;
  errDocMinimized         = 153;
  errAppMinimized         = 154;
  errNotInField           = 155;
  errFieldHasNoData       = 156;
  errNotDataField         = 157;
  errParamTooLow          = 158;
  errParamTooHigh         = 159 ;
  errWrongNumOfParams     = 160 ;
  errCantCallDlg          = 161 ;
  errCommandOnlyFunction  = 162  ;
  errDlgActiveOnly        = 163   ;
  errArrayNotDimed        = 164   ;
  errCannotInitiate       = 500   ;
  errBogusDcl             = 501   ;
  errNoResponse           = 502;
  errAppNacked            = 503;
  errNoSuchWin            = 504;
  errCantActivate         = 505;
  errCannotSendKeys       = 506;
  errAppBusyed            = 508;
  errModeError            = 509;
  errNoMacro              = 511;
  errOutOfRange           = 512;
  errStringTooBig         = 513;
  errDocNotOpen           = 514;
  errUnableToLoadSpeller  = 528;
  errCannotOpenDictionary = 529;
  errDlgBoxTooComplex     = 530;
  errUnknownLoc           = 532;
  errNoWordkey            = 534;
  errMacroAlreadyRunning  = 535;
  errBadMacroName         = 536;
  errCantRun              = 537;
  errCantEdit             = 538;
  errCantRename           = 539;
  errCantDelete           = 540;
  errCantSetDesc          = 541;
  errCantEditDesc         = 542;
  errCantFindLib          = 543;
  errNoScrollBar          = 544;
  errStatementDisabled    = 545;
  errFtnEdnNotContinuous  = 546;
  errNoNetPerm            = 547;
  errMenuDoesntExist      = 549;
  errCantRecord           = 550;
  errGlsyDocLocked        = 551;
  errNoTemplate           = 552;
  errCantCreate           = 553;
  errNoDrawingRangeSet    = 554;
  errInvalidDrawingRangeBookmark = 555;
  errWrongDrawnObjectType = 556;
  errCouldntInsertDO      = 557;
  errChapterLock          = 558;
  errBlockSel             = 559;
  errRevisionsHidden      = 560;
  errProtectedDoc         = 561;
  errGramStatsMultLang    = 562;
  errNotMaster            = 563;
  errGotoInvalid          = 564;
  errNotAnAddInFile       = 565;
  errFileInUse            = 566;
  errListMaxReached       = 567;
  errFontNotExist         = 568;
  errFindSearchType       = 569;
  errSortArrayDim         = 570;
  errTooManyAccelKey      = 571;
  errIllegalFirstAccel    = 572;
  errIllegalSecondAccel   = 573;
  errCAPINoError             =  0;       { No error                                }
  errWLLNoWordFound          =  5000;    { I added this }
  errCAPIBadCommandId        =  5001;    { Command Id is invalid                   }
  errCAPIOddParamBlock       =  5002;    { parameter block has odd number of bytes }
  errCAPICmdNotAvailable     =  5003;    { command is not available                }
  errCAPIBadArgCount         =  5004;    { too many or too few arguments           }
  errCAPIInternalError       =  5005;    { error in our own data or handling       }
  errCAPIByteCountMismatch   =  5006;    { pb doesn't have acceptable # of bytes  }
  errCAPINotFunction         =  5007;    { non function called as function        }
  errCAPIBadType             =  5008;    { parameter type passed or expected is wrong }
  errCAPIStringTooLong       =  5009;    { string is longer than 255 characters       }
  errCAPINullReturnBuffer    =  5010;    { pointer for output is Nil                  }
  errCAPICantLock            =  5011;    { can't lock global handle                   }
  errCAPICantAllocate        =  5012;    { can't allocate global handle               }
  errCAPINoDialog            =  5013;    { commmand has no dialog                     }
  errCAPIOutOfMemory         =  5014;    { CAPI is out of memory                     }
  errCAPIFieldIdOutOfRange   =  5015;    { too many parameters passed to function }
  errCAPIBadFieldId          =  5016;    { Field Id not in Dialog                 }
  errCAPIBadHandle           =  5017;    { Handle has not been allocated          }
  errCAPIArrayExpected       =  5018;    { parameter takes an array only          }
  errCAPITooManyDimensions   =  5019;    { too many dimesions for array           }
  errCAPIExpectedNumericType =  5020;    { parameter passed was not a short long or num}
  errCAPIExpectedStringType  =  5021;    { parameter passed was not a string           }
  errCAPIParameterOutOfRange =  5022;    { parameter value was out of acceptable range }
  errCAPICantReturnString    =  5023;    { String Type requested for numeric only field}
  errCAPICantReturnNumeric   =  5024;    { Numeric Type requested for string only field}
  errCAPIReturnOverflow      =  5025;    { Buffer for return string is too small}
  errCAPIArrayOverflow       =  5026;    { Array string buffer is too small    }
  errCAPIDlgCommandOverflow  =  5027;    { Dialog command string buffer too small}
  errCAPIOverflowNotHandled  =  5028;    { BufferTooSmall bit set on input      }
  errCAPICantParse           =  5029;    { String Passed can't be parsed        }
  errCAPIBadMessage          =  5030;    { Bad pointer in message (CMI)         }
  errCAPICommandFailed       =  5031;    { CAPI command failed                  }
  errCAPIBadDocRef           =  5032;    { Document Reference Number is Invalid}
  errCAPIInsufficientStack   =  5033;   { Minimum Stack not available         }
  errCAPIUninitializedString =  5034;    { 0 was passed as string pointer    }

{ turn the errors around }

function errorDesc(i:integer):shortstring;

const
{****************************** Word Field codes *****************************}

  fidAccent                  = 902;
  fidAcceptAll               = 728;
  fidAcceptRevisions         = 211;
  fidActivateAs              = 934;
  fidAdd                     = 152;
  fidAddBelow                = 665;
  fidAddedStyles             = 656;
  fidAddRecipient            = 892;
  fidAddress                 = 491;
  fidAddrFromLeft            = 832;
  fidAddrFromTop             = 833;
  fidAddSlip                 = 894;
  fidAddToDictionary         = 153;
  fidAddToDocument           = 517;
  fidAddToMru                = 597;
  fidAddToTemplate           = 95;
  fidAdjustEmptyParas        = 903;
  fidAdjustParaMarks         = 862;
  fidAdjustTabsSpaces        = 863;
  fidAfter                   = 165;
  fidAlign                   = 251;
  fidAlignment               = 160;
  fidAlignRows               = 280;
  fidAllAtOnce               = 813;
  fidAllCaps                 = 315;
  fidAllowAccentedUppercase  = 927;
  fidAllowRowSplit           = 708;
  fidAlways                  = 397;
  fidAlwaysSuggest           = 240;
  fidAnchors                 = 247;
  fidAndOr1                  = 567;
  fidAndOr2                  = 568;
  fidAndOr3                  = 569;
  fidAndOr4                  = 570;
  fidAndOr5                  = 571;
  fidAngle                   = 784;
  fidAnnotations             = 193;
  fidAPPCOPYRIGHT            = 85;
  fidAppendPrFile            = 643;
  fidApplication             = 467;
  fidApply                   = 401;
  fidApplyColsTo             = 469;
  fidApplyPropsTo            = 463;
  fidApplyStylesBodyText     = 860;
  fidApplyStylesHeadings     = 858;
  fidApplyStylesLists        = 859;
  fidApplyStylesOtherParas   = 861;
  fidApplyTo                 = 281;
  fidAPPNAME                 = 25;
  fidAppName_2               = 340;
  fidAPPORGANIZATION         = 10;
  fidAPPSERIALNUMBER         = 86;
  fidAPPUSERNAME             = 9;
  fidAPPVERSION              = 26;
  fidArrowLength             = 822;
  fidArrowStyle              = 824;
  fidArrowWidth              = 823;
  fidAskOnce                 = 882;
  fidAssign                  = 5;
  fidAttach                  = 666;
  fidAttributeControls       = 462;
  fidAuthor                  = 100;
  fidAutoAttach              = 901;
  fidAutoCaption             = 636;
  fidAutoCorrectInitialCaps  = 625;
  fidAutoCorrectTyping       = 259;
  fidAutoDelete              = 56;
  fidAutoExpand              = 241;
  fidAutoFit                 = 387;
  fidAutoHyphenation         = 804;
  fidAutoMark                = 886;
  fidAutoSave                = 52;
  fidAutoUpdate              = 307;
  fidAutoWordSelection       = 761;
  fidBackground              = 424;
  fidBackgroundSpellChecking = 260;
  fidBasedOn                 = 123;
  fidBefore                  = 164;
  fidBlankLines              = 486;
  fidBlueScreen              = 880;
  fidBold                    = 36;
  fidBookMarks               = 800;
  fidBorder                  = 170;
  fidBorders                 = 770;
  fidBordShadThinBlack       = 914;
  fidBottomBorder            = 276;
  fidBottomColor             = 357;
  fidBottomMargin            = 74;
  fidBottomWidth             = 363;
  fidBreadth                 = 572;
  fidButton                  = 436;
  fidButtonFieldClicks       = 32;
  fidCalc1                   = 301;
  fidCannotFind              = 92;
  fidCaps                    = 38;
  fidCaption                 = 654;
  fidCaseSensitive           = 234;
  fidCategory                = 328;
  fidCategoryName            = 917;
  fidChange                  = 151;
  fidChangeAll               = 348;
  fidChangeTo                = 131;
  fidChapterNumber           = 809;
  fidCharacter               = 30;
  fidCharacters              = 542;
  fidCharNum                 = 388;
  fidCharPosition            = 316;
  fidCharSpace               = 317;
  fidCheckDefault            = 856;
  fidCheckErrors             = 680;
  fidCheckSize               = 854;
  fidCheckSpelling           = 675;
  fidCheckWidth              = 855;
  fidClass                   = 474;
  fidClear                   = 253;
  fidClearAll                = 254;
  fidClearRecipients         = 891;
  fidClearRouteSlip          = 829;
  fidClearSlip               = 896;
  fidCollate                 = 433;
  fidColLine                 = 220;
  fidColor                   = 35;
  fidColorButtons            = 764;
  fidColumn                  = 309;
  fidColumnNo                = 606;
  fidColumns                 = 218;
  fidColumnSpacing           = 219;
  fidColumnWidth             = 236;
  fidCommandKeyHelp          = 723;
  fidCommandValue            = 749;
  fidComments                = 102;
  fidCompany                 = 492;
  fidComparedTo1             = 554;
  fidComparedTo2             = 555;
  fidComparedTo3             = 556;
  fidComparedTo4             = 557;
  fidComparedTo5             = 558;
  fidComparedTo6             = 559;
  fidCompareTo               = 878;
  fidComparison              = 877;
  fidCompatOptions           = 741;
  fidCompOp1                 = 549;
  fidCompOp2                 = 550;
  fidCompOp3                 = 551;
  fidCompOp4                 = 552;
  fidCompOp5                 = 553;
  fidCompOp6                 = 560;
  fidCondition1              = 519;
  fidCondition2              = 520;
  fidCondition3              = 521;
  fidCondition4              = 522;
  fidCondition5              = 523;
  fidConfirm                 = 142;
  fidConfirmConversions      = 329;
  fidConfirmFormat           = 183;
  fidConnection              = 600;
  fidContext                 = 3;
  fidContNotice              = 50;
  fidControl                 = 390;
  fidContSeparator           = 49;
  fidCONVENTIONALMEMORY      = 87;
  fidConvertFrom             = 285;
  fidConvertTo               = 286;
  fidConvFrom                = 426;
  fidConvMailMergeEsc        = 921;
  fidCopy                    = 647;
  fidCountBy                 = 125;
  fidCountFootnotes          = 573;
  fidCreate                  = 250;
  fidCreateBackup            = 215;
  fidCreated                 = 535;
  fidCreateDate              = 105;
  fidCropBottom              = 181;
  fidCropLeft                = 180;
  fidCropMarks               = 709;
  fidCropRight               = 182;
  fidCropTop                 = 179;
  fidCrossReference          = 788;
  fidCrossReferenceAutoText  = 867;
  fidCursorBlink             = 291;
  fidCustomDict1             = 427;
  fidCustomDict10            = 634;
  fidCustomDict2             = 428;
  fidCustomDict3             = 429;
  fidCustomDict4             = 430;
  fidCustomDict5             = 629;
  fidCustomDict6             = 630;
  fidCustomDict7             = 631;
  fidCustomDict8             = 632;
  fidCustomDict9             = 633;
  fidCustomZoomPercent       = 497;
  fidDataSource              = 487;
  fidDataType                = 318;
  fidDateCreatedFrom         = 20;
  fidDateCreatedTo           = 21;
  fidDateSavedFrom           = 22;

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -