forked from jackokring/rub
-
Notifications
You must be signed in to change notification settings - Fork 2
/
Copy pathstrtxt.inc
216 lines (208 loc) · 9.67 KB
/
strtxt.inc
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
type standard_string=record
nr:word;
text:Pchar;
end;
const standard_string_count=107;
standard_strings:array[0..standard_string_count-1] of standard_string=(
(nr:sVideoFailed;text:'Video initialization failed.'),
(nr:sButtonDefault;text:'Button default'),
(nr:sButtonDisabled;text:'Button disabled'),
(nr:sButtonNormal;text:'Button normal'),
(nr:sButtonSelected;text:'Button selected'),
(nr:sButtonShadow;text:'Button shadow'),
(nr:sButtonShortcut;text:'Button shortcut'),
(nr:sChangeDirectory;text:'Change Directory'),
(nr:sClipboard;text:'Clipboard'),
(nr:sClusterNormal;text:'Cluster normal'),
(nr:sClusterSelected;text:'Cluster selected'),
(nr:sClusterShortcut;text:'Cluster shortcut'),
(nr:sColor;text:'Color'),
(nr:sColors;text:'Colors'),
(nr:sConfirm;text:'Confirm'),
(nr:sDeleteFile;text:'Delete file?'#13#10#13#3'%s'),
(nr:sDirectory;text:'Directory'),
(nr:sDisabled;text:'Disabled'),
(nr:sDrives;text:'Drives'),
(nr:sError;text:'Error'),
(nr:sFileAlreadyOpen;text:''#3'%s'#13#10#13#3'is already open in window %d.'),
(nr:sFileCreateError;text:'Error creating file %s'),
(nr:sFileReadError;text:'Error reading file %s'),
(nr:sFileUntitled;text:'Save untitled file?'),
(nr:sFileWriteError;text:'Error writing to file %s'),
(nr:sFind;text:'Find'),
(nr:sFrameActive;text:'Frame active'),
(nr:sFrameBackground;text:'Frame/background'),
(nr:sFrameIcons;text:'Frame icons'),
(nr:sFramePassive;text:'Frame passive'),
(nr:sHighlight;text:'Highlight'),
(nr:sHistoryBarIcons;text:'History bar icons'),
(nr:sHistoryBarPage;text:'History bar page'),
(nr:sHistoryButton;text:'History button'),
(nr:sHistorySides;text:'History sides'),
(nr:sInformation;text:'Information'),
(nr:sInformationPane;text:'Information pane'),
(nr:sInputArrow;text:'Input arrow'),
(nr:sInputNormal;text:'Input normal'),
(nr:sInputSelected;text:'Input selected'),
(nr:sInvalidCharacter;text:'Invalid character in input'),
(nr:sInvalidDirectory;text:'Invalid directory.'),
(nr:sInvalidDriveOrDir;text:'Invalid drive or directory.'),
(nr:sInvalidFileName;text:'Invalid file name.'),
(nr:sInvalidPicture;text:'Input does not conform to picture: %s'),
(nr:sInvalidValue;text:'Value not in the range %d to %d'),
(nr:sInverse;text:'Inverse'),
(nr:sJumpTo;text:'Jump To'),
(nr:sLabelNormal;text:'Label normal'),
(nr:sLabelSelected;text:'Label selected'),
(nr:sLabelShortcut;text:'Label shortcut'),
(nr:sListDivider;text:'List divider'),
(nr:sListFocused;text:'List focused'),
(nr:sListNormal;text:'List normal'),
(nr:sListSelected;text:'List selected'),
(nr:sModified;text:''#3'%s'#13#10#13#3'has been modified. Save?'),
(nr:sNoName;text:'NONAME'),
(nr:sNormal;text:'Normal'),
(nr:sNormalText;text:'Normal text'),
(nr:sNotInList;text:'Input not in valid-list'),
(nr:sOpen;text:'Open'),
(nr:sOutOfMemory;text:'Not enough memory for this operation.'),
(nr:sOutOfUnNamedWindows;text:'Out of unnamed window numbers. Save or discard some unnamed files and try again.'),
(nr:sPasteNotPossible;text:'Wordwrap on: Paste not possible in current margins when at end of line.'),
(nr:sReformatDocument;text:'Reformat Document'),
(nr:sReformatNotPossible;text:'Paragraph reformat not possible while trying to wrap current line with current margins.'),
(nr:sReformattingTheDocument;text:'Reformatting the document:'),
(nr:sReplace;text:'Replace'),
(nr:sReplaceFile;text:'Replace file?'#13#10#13#3'%s'),
(nr:sReplaceNotPossible;text:'Wordwrap on: Replace not possible in current margins when at end of line.'),
(nr:sReplaceThisOccurence;text:'Replace this occurence?'),
(nr:sRightMargin;text:'Right Margin'),
(nr:sSaveAs;text:'Save As'),
(nr:sScrollbarIcons;text:'Scroll bar icons'),
(nr:sScrollbarPage;text:'Scroll bar page'),
(nr:sSearchStringNotFound;text:'Search string not found.'),
(nr:sSelectFormatStart;text:'Select Format Start'),
(nr:sSelectWhereToBegin;text:'Please select where to begin.'),
(nr:sSelected;text:'Selected'),
(nr:sSelectedDisabled;text:'Selected disabled'),
(nr:sSetting;text:'Setting:'),
(nr:sShortcut;text:'Shortcut'),
(nr:sShortcutSelected;text:'ShortcutSelected'),
(nr:sStaticText;text:'Static text'),
(nr:sTabSettings;text:'Tab Settings'),
(nr:sText;text:'Text'),
(nr:sTooManyFiles;text:'Too many files.'),
(nr:sTypeExitOnReturn;text:'Type EXIT to return...'),
(nr:sUnderline;text:'Underline'),
(nr:sUnknownDialog;text:'Unknown dialog requested!'),
(nr:sUntitled;text:'Untitled'),
(nr:sWarning;text:'Warning'),
(nr:sWindowList;text:'Window List'),
(nr:sWordWrapNotPossible;text:'Wordwrap on: Wordwrap not possible in current margins with continuous line.'),
(nr:sWordWrapOff;text:'You must turn on wordwrap before you can reformat.'),
(nr:smApr;text:'Apr'),
(nr:smAug;text:'Aug'),
(nr:smDec;text:'Dec'),
(nr:smFeb;text:'Feb'),
(nr:smJan;text:'Jan'),
(nr:smJul;text:'Jul'),
(nr:smJun;text:'Jun'),
(nr:smMar;text:'Mar'),
(nr:smMay;text:'May'),
(nr:smNov;text:'Nov'),
(nr:smOct;text:'Oct'),
(nr:smSep;text:'Sep'));
procedure InitResStrings;
var i:word;
begin
for i:=0 to standard_string_count-1 do
strings^.put(standard_strings[i].nr,strpas(standard_strings[i].text));
end;
const standard_label_count=81;
standard_labels:array[0..standard_label_count-1] of standard_string=(
(nr:slAbout;text:'~A~bout'),
(nr:slAltF1;text:'Alt+F1'),
(nr:slAltF3Close;text:'~Alt+F3~ Close'),
(nr:slAltXExit;text:'~Alt-X~ Exit'),
(nr:slBackground;text:'~B~ackground'),
(nr:slCancel;text:'Cancel'),
(nr:slCascade;text:'C~a~scade'),
(nr:slCaseSensitive;text:'~C~ase sensitive'),
(nr:slChDir;text:'~C~hdir'),
(nr:slChangeDir;text:'~C~hange dir...'),
(nr:slClear;text:'C~l~ear'),
(nr:slClose;text:'~C~lose'),
(nr:slCloseAll;text:'Cl~o~se all'),
(nr:slColor;text:'~C~olor'),
(nr:slContents;text:'~C~ontents'),
(nr:slCopy;text:'~C~opy'),
(nr:slCtrlF1;text:'Ctrl+F1'),
(nr:slCurrentLine;text:'~C~urrent line'),
(nr:slCut;text:'Cu~t~'),
(nr:slDOSShell;text:'~D~OS shell'),
(nr:slDelete;text:'~D~elete'),
(nr:slDirectoryName;text:'Directory ~n~ame'),
(nr:slDirectoryTree;text:'Directory ~t~ree'),
(nr:slEdit;text:'~E~dit'),
(nr:slEntireDocument;text:'~E~ntire document'),
(nr:slExit;text:'E~x~it'),
(nr:slF10Menu;text:'~F10~ Menu'),
(nr:slF1Help;text:'~F1~ Help'),
(nr:slF3Open;text:'~F3~ Open'),
(nr:slFile;text:'~F~ile'),
(nr:slFiles;text:'~F~iles'),
(nr:slForeground;text:'~F~oreground'),
(nr:slGroup;text:'~G~roup'),
(nr:slHelp;text:'~H~elp'),
(nr:slIndex;text:'~I~ndex'),
(nr:slItem;text:'~I~tem'),
(nr:slLineNumber;text:'~L~ine number'),
(nr:slName;text:'~N~ame'),
(nr:slNew;text:'~N~ew'),
(nr:slNewText;text:'~N~ew text'),
(nr:slNext;text:'~N~ext'),
(nr:slNo;text:'~N~o'),
(nr:slOk;text:'O~k~'),
(nr:slOpen;text:'~O~pen'),
(nr:slOpenDots;text:'~O~pen...'),
(nr:slPaste;text:'~P~aste'),
(nr:slPrevious;text:'~P~revious'),
(nr:slPreviousTopic;text:'~P~revious topic'),
(nr:slPromptOnReplace;text:'~P~rompt on replace'),
(nr:slReformatDocument;text:'~R~eformat document'),
(nr:slReplace;text:'~R~eplace'),
(nr:slReplaceAll;text:'~R~eplace all'),
(nr:slRevert;text:'~R~evert'),
(nr:slSave;text:'~S~ave'),
(nr:slSaveAll;text:'Save a~l~l'),
(nr:slSaveAs;text:'S~a~ve as...'),
(nr:slSaveFileAs;text:'~S~ave file as'),
(nr:slShiftF1;text:'Shift+F1'),
(nr:slSizeMove;text:'~S~ize/Move'),
(nr:slTextToFind;text:'~T~ext to find'),
(nr:slTile;text:'~T~ile'),
(nr:slTopicSearch;text:'~T~opic search'),
(nr:slUndo;text:'~U~ndo'),
(nr:slUsingHelp;text:'~U~sing help'),
(nr:slWholeWordsOnly;text:'~W~hole words only'),
(nr:slWindow;text:'~W~indow'),
(nr:slWindows;text:'~W~indows'),
(nr:slYes;text:'~Y~es'),
(nr:slZoom;text:'~Z~oom'),
(nr:slAltF3;text:'Alt+F3'),
(nr:slAltX;text:'Alt+X'),
(nr:slF2;text:'F2'),
(nr:slF3;text:'F3'),
(nr:slF5;text:'F5'),
(nr:slF6;text:'F6'),
(nr:slCtrlDel;text:'Ctrl+Del'),
(nr:slCtrlF5;text:'Ctrl+F5'),
(nr:slCtrlIns;text:'Ctrl+Ins'),
(nr:slShiftDel;text:'Shift+Del'),
(nr:slShiftF6;text:'Shift+F6'),
(nr:slShiftIns;text:'Shift+Ins'));
procedure InitResLabels;
var i:word;
begin
for i:=0 to standard_label_count-1 do
labels^.put(standard_labels[i].nr,strpas(standard_labels[i].text));
end;