procedure InitResStrings; begin Strings^.Put(sButtonDefault,'Button default'); Strings^.Put(sButtonDisabled,'Button disabled'); Strings^.Put(sButtonNormal,'Button normal'); Strings^.Put(sButtonSelected,'Button selected'); Strings^.Put(sButtonShadow,'Button shadow'); Strings^.Put(sButtonShortcut,'Button shortcut'); Strings^.Put(sChangeDirectory,'Change Directory'); Strings^.Put(sClipboard,'Clipboard'); Strings^.Put(sClusterNormal,'Cluster normal'); Strings^.Put(sClusterSelected,'Cluster selected'); Strings^.Put(sClusterShortcut,'Cluster shortcut'); Strings^.Put(sColor,'Color'); Strings^.Put(sColors,'Colors'); Strings^.Put(sConfirm,'Confirm'); Strings^.Put(sDeleteFile,'Delete file?'#13#10#13#3'%s'); Strings^.Put(sDirectory,'Directory'); Strings^.Put(sDisabled,'Disabled'); Strings^.Put(sDrives,'Drives'); Strings^.Put(sError,'Error'); Strings^.Put(sFileAlreadyOpen,''#3'%s'#13#10#13#3'is already open in window %d.'); Strings^.Put(sFileCreateError,'Error creating file %s'); Strings^.Put(sFileReadError,'Error reading file %s'); Strings^.Put(sFileUntitled,'Save untitled file?'); Strings^.Put(sFileWriteError,'Error writing to file %s'); Strings^.Put(sFind,'Find'); Strings^.Put(sFrameActive,'Frame active'); Strings^.Put(sFrameBackground,'Frame/background'); Strings^.Put(sFrameIcons,'Frame icons'); Strings^.Put(sFramePassive,'Frame passive'); Strings^.Put(sHighlight,'Highlight'); Strings^.Put(sHistoryBarIcons,'History bar icons'); Strings^.Put(sHistoryBarPage,'History bar page'); Strings^.Put(sHistoryButton,'History button'); Strings^.Put(sHistorySides,'History sides'); Strings^.Put(sInformation,'Information'); Strings^.Put(sInformationPane,'Information pane'); Strings^.Put(sInputArrow,'Input arrow'); Strings^.Put(sInputNormal,'Input normal'); Strings^.Put(sInputSelected,'Input selected'); Strings^.Put(sInvalidCharacter,'Invalid character in input'); Strings^.Put(sInvalidDirectory,'Invalid directory.'); Strings^.Put(sInvalidDriveOrDir,'Invalid drive or directory.'); Strings^.Put(sInvalidFileName,'Invalid file name.'); Strings^.Put(sInvalidPicture,'Input does not conform to picture: %s'); Strings^.Put(sInvalidValue,'Value not in the range %d to %d'); Strings^.Put(sInverse,'Inverse'); Strings^.Put(sJumpTo,'Jump To'); Strings^.Put(sLabelNormal,'Label normal'); Strings^.Put(sLabelSelected,'Label selected'); Strings^.Put(sLabelShortcut,'Label shortcut'); Strings^.Put(sListDivider,'List divider'); Strings^.Put(sListFocused,'List focused'); Strings^.Put(sListNormal,'List normal'); Strings^.Put(sListSelected,'List selected'); Strings^.Put(sModified,''#3'%s'#13#10#13#3'has been modified. Save?'); Strings^.Put(sNoName,'NONAME'); Strings^.Put(sNormal,'Normal'); Strings^.Put(sNormalText,'Normal text'); Strings^.Put(sNotInList,'Input not in valid-list'); Strings^.Put(sOpen,'Open'); Strings^.Put(sOutOfMemory,'Not enough memory for this operation.'); Strings^.Put(sOutOfUnNamedWindows,'Out of unnamed window numbers. Save or discard some unnamed files and try again.'); Strings^.Put(sPasteNotPossible,'Wordwrap on: Paste not possible in current margins when at end of line.'); Strings^.Put(sReformatDocument,'Reformat Document'); Strings^.Put(sReformatNotPossible,'Paragraph reformat not possible while trying to wrap current line with current margins.'); Strings^.Put(sReformattingTheDocument,'Reformatting the document:'); Strings^.Put(sReplace,'Replace'); Strings^.Put(sReplaceFile,'Replace file?'#13#10#13#3'%s'); Strings^.Put(sReplaceNotPossible,'Wordwrap on: Replace not possible in current margins when at end of line.'); Strings^.Put(sReplaceThisOccurence,'Replace this occurence?'); Strings^.Put(sRightMargin,'Right Margin'); Strings^.Put(sSaveAs,'Save As'); Strings^.Put(sScrollbarIcons,'Scroll bar icons'); Strings^.Put(sScrollbarPage,'Scroll bar page'); Strings^.Put(sSearchStringNotFound,'Search string not found.'); Strings^.Put(sSelectFormatStart,'Select Format Start'); Strings^.Put(sSelectWhereToBegin,'Please select where to begin.'); Strings^.Put(sSelected,'Selected'); Strings^.Put(sSelectedDisabled,'Selected disabled'); Strings^.Put(sSetting,'Setting:'); Strings^.Put(sShortcut,'Shortcut'); Strings^.Put(sShortcutSelected,'ShortcutSelected'); Strings^.Put(sStaticText,'Static text'); Strings^.Put(sTabSettings,'Tab Settings'); Strings^.Put(sText,'Text'); Strings^.Put(sTooManyFiles,'Too many files.'); Strings^.Put(sTypeExitOnReturn,'Type EXIT to return...'); Strings^.Put(sUnderline,'Underline'); Strings^.Put(sUnknownDialog,'Unknown dialog requested!'); Strings^.Put(sUntitled,'Untitled'); Strings^.Put(sWarning,'Warning'); Strings^.Put(sWindowList,'Window List'); Strings^.Put(sWordWrapNotPossible,'Wordwrap on: Wordwrap not possible in current margins with continuous line.'); Strings^.Put(sWordWrapOff,'You must turn on wordwrap before you can reformat.'); Strings^.Put(smApr,'Apr'); Strings^.Put(smAug,'Aug'); Strings^.Put(smDec,'Dec'); Strings^.Put(smFeb,'Feb'); Strings^.Put(smJan,'Jan'); Strings^.Put(smJul,'Jul'); Strings^.Put(smJun,'Jun'); Strings^.Put(smMar,'Mar'); Strings^.Put(smMay,'May'); Strings^.Put(smNov,'Nov'); Strings^.Put(smOct,'Oct'); Strings^.Put(smSep,'Sep'); end; procedure InitResLabels; begin Labels^.Put(slAbout,'~A~bout'); Labels^.Put(slAltF1,'Alt+F1'); Labels^.Put(slAltF3Close,'~Alt+F3~ Close'); Labels^.Put(slAltXExit,'~Alt-X~ Exit'); Labels^.Put(slBackground,'~B~ackground'); Labels^.Put(slCancel,'Cancel'); Labels^.Put(slCascade,'C~a~scade'); Labels^.Put(slCaseSensitive,'~C~ase sensitive'); Labels^.Put(slChDir,'~C~hdir'); Labels^.Put(slChangeDir,'~C~hange dir...'); Labels^.Put(slClear,'C~l~ear'); Labels^.Put(slClose,'~C~lose'); Labels^.Put(slCloseAll,'Cl~o~se all'); Labels^.Put(slColor,'~C~olor'); Labels^.Put(slContents,'~C~ontents'); Labels^.Put(slCopy,'~C~opy'); Labels^.Put(slCtrlF1,'Ctrl+F1'); Labels^.Put(slCurrentLine,'~C~urrent line'); Labels^.Put(slCut,'Cu~t~'); Labels^.Put(slDOSShell,'~D~OS shell'); Labels^.Put(slDelete,'~D~elete'); Labels^.Put(slDirectoryName,'Directory ~n~ame'); Labels^.Put(slDirectoryTree,'Directory ~t~ree'); Labels^.Put(slEdit,'~E~dit'); Labels^.Put(slEntireDocument,'~E~ntire document'); Labels^.Put(slExit,'E~x~it'); Labels^.Put(slF10Menu,'~F10~ Menu'); Labels^.Put(slF1Help,'~F1~ Help'); Labels^.Put(slF3Open,'~F3~ Open'); Labels^.Put(slFile,'~F~ile'); Labels^.Put(slFiles,'~F~iles'); Labels^.Put(slForeground,'~F~oreground'); Labels^.Put(slGroup,'~G~roup'); Labels^.Put(slHelp,'~H~elp'); Labels^.Put(slIndex,'~I~ndex'); Labels^.Put(slItem,'~I~tem'); Labels^.Put(slLineNumber,'~L~ine number'); Labels^.Put(slName,'~N~ame'); Labels^.Put(slNew,'~N~ew'); Labels^.Put(slNewText,'~N~ew text'); Labels^.Put(slNext,'~N~ext'); Labels^.Put(slNo,'~N~o'); Labels^.Put(slOk,'O~k~'); Labels^.Put(slOpen,'~O~pen'); Labels^.Put(slOpenDots,'~O~pen...'); Labels^.Put(slPaste,'~P~aste'); Labels^.Put(slPrevious,'~P~revious'); Labels^.Put(slPreviousTopic,'~P~revious topic'); Labels^.Put(slPromptOnReplace,'~P~rompt on replace'); Labels^.Put(slReformatDocument,'~R~eformat document'); Labels^.Put(slReplace,'~R~eplace'); Labels^.Put(slReplaceAll,'~R~eplace all'); Labels^.Put(slRevert,'~R~evert'); Labels^.Put(slSave,'~S~ave'); Labels^.Put(slSaveAll,'Save a~l~l'); Labels^.Put(slSaveAs,'S~a~ve as...'); Labels^.Put(slSaveFileAs,'~S~ave file as'); Labels^.Put(slShiftF1,'Shift+F1'); Labels^.Put(slSizeMove,'~S~ize/Move'); Labels^.Put(slTextToFind,'~T~ext to find'); Labels^.Put(slTile,'~T~ile'); Labels^.Put(slTopicSearch,'~T~opic search'); Labels^.Put(slUndo,'~U~ndo'); Labels^.Put(slUsingHelp,'~U~sing help'); Labels^.Put(slWholeWordsOnly,'~W~hole words only'); Labels^.Put(slWindow,'~W~indow'); Labels^.Put(slWindows,'~W~indows'); Labels^.Put(slYes,'~Y~es'); Labels^.Put(slZoom,'~Z~oom'); Labels^.Put(slAltF3,'Alt+F3'); Labels^.Put(slAltX,'Alt+X'); Labels^.Put(slF2,'F2'); Labels^.Put(slF3,'F3'); Labels^.Put(slF5,'F5'); Labels^.Put(slF6,'F6'); Labels^.Put(slCtrlDel,'Ctrl+Del'); Labels^.Put(slCtrlF5,'Ctrl+F5'); Labels^.Put(slCtrlIns,'Ctrl+Ins'); Labels^.Put(slShiftDel,'Shift+Del'); Labels^.Put(slShiftF6,'Shift+F6'); Labels^.Put(slShiftIns,'Shift+Ins'); end;