Browse Source

* new files from Gabor

pierre 25 years ago
parent
commit
3dac495249
3 changed files with 254 additions and 0 deletions
  1. 38 0
      ide/text/wconsts.pas
  2. 108 0
      ide/text/wconstse.inc
  3. 108 0
      ide/text/wconstsh.inc

+ 38 - 0
ide/text/wconsts.pas

@@ -0,0 +1,38 @@
+{
+    $Id$
+    This file is part of the Free Pascal Integrated Development Environment
+    Copyright (c) 2000 by B‚rczi G bor
+
+    Strings for common utilities
+
+    This program is distributed in the hope that it will be useful,
+    but WITHOUT ANY WARRANTY; without even the implied warranty of
+    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+
+ **********************************************************************}
+{$i globdir.inc}
+unit wconsts;
+
+  interface
+
+  uses Dos;
+
+{$ifdef LANG_HUN}
+{$i wconstsh.inc}    { Hungarian language file }
+{$else}
+ {$ifdef LANG_GER}
+ {$i wconstsg.inc}    { German language file }
+ {$else}
+   {$i wconstse.inc}  { English language file }
+ {$endif}
+{$endif}
+
+  implementation
+
+end.
+{
+  $Log$
+  Revision 1.1  2000-06-16 09:30:01  pierre
+   * new files from Gabor
+
+}

+ 108 - 0
ide/text/wconstse.inc

@@ -0,0 +1,108 @@
+{
+    $Id$
+    This file is part of the Free Pascal Integrated Development Environment
+    Copyright (c) 2000 by Berczi Gabor
+
+    Strings for utilities
+
+    This program is distributed in the hope that it will be useful,
+    but WITHOUT ANY WARRANTY; without even the implied warranty of
+    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+
+ **********************************************************************}
+
+{$undef USERESSTRINGS} { this doesn't compile under FP!!! why? }
+
+{$ifdef USERESSTRINGS}
+    resourcestring
+{$else}
+    const
+{$endif}
+
+    btn_OK = 'O~K';
+    btn_Cancel = 'Cancel';
+
+    dialog_find = 'Find';
+    label_find_options = 'Options';
+    label_find_texttofind = '~T~ext to find';
+    label_find_casesensitive = '~C~ase sensitive';
+    label_find_wholewordsonly = '~W~hole words only';
+    label_find_direction = 'Direction';
+    label_find_forward = 'Forwar~d~';
+    label_find_backward = '~B~ackward';
+    label_find_scope = 'Scope';
+    label_find_global = '~G~lobal';
+    label_find_selectedtext = '~S~elected text';
+    label_find_origin = 'Origin';
+    label_find_fromcursor = '~F~rom cursor';
+    label_find_entirescope = '~E~ntire scope';
+
+    dialog_replace = 'Replace';
+    label_replace_texttofind = label_find_texttofind;
+    label_replace_newtext = '    ~N~ew text';
+    label_replace_options = label_find_options;
+    label_replace_casesensitive = label_find_casesensitive;
+    label_replace_wholewordsonly = label_find_wholewordsonly;
+    label_replace_promptonreplace = '~P~rompt on replace';
+    label_replace_direction = label_find_direction;
+    label_replace_forward = label_find_forward;
+    label_replace_backward = label_find_backward;
+    label_replace_scope = label_find_scope;
+    label_replace_global = label_find_global;
+    label_replace_selectedtext = label_find_selectedtext;
+    label_replace_origin = label_find_origin;
+    label_replace_fromcursor = label_find_fromcursor;
+    label_replace_entirescope = label_find_entirescope;
+    btn_replace_changeall = 'Change ~a~ll';
+
+    dialog_gotoline = 'Goto line';
+    label_gotoline_linenumber = 'Enter new line ~n~umber';
+
+    msg_invalidmarkindex = 'Invalid mark index (%d)';
+    msg_marknotset = 'Mark %d not set.';
+
+    msg_notenoughmemoryforthisoperation = 'Not enough memory for this operation.';
+    msg_errorreadingfile = 'Error reading file %s.';
+    msg_errorwritingfile = 'Error writing file %s.';
+    msg_errorsavingfile = 'Error saving file %s.';
+    msg_errorcreatingfile = 'Error creating file %s.';
+    msg_filehasbeenmodifiedsave = '%s has been modified. Save?';
+    msg_saveuntitledfile = 'Save untitled file?';
+    msg_filehadtoolonglines = #3'File %s had too long lines'#13+
+                              #3'first such line is %d';
+    msg_filewasmodified = #3'File %s '#13+
+                          #3'was modified by another program.'#13+
+                          #3'Overwrite new version?';
+
+    dialog_savefileas = 'Save File As';
+    dialog_writeblocktofile = 'Write Block to File';
+    dialog_readblockfromfile = 'Read Block from File';
+
+    label_name = '~N~ame';
+
+    msg_searchstringnotfound = 'Search string not found.';
+    msg_replacethisoccourence = 'Replace this occurence?';
+    msg_fileexistsoverwrite = 'File %s already exists. Overwrite?';
+
+    { Help system }
+
+    msg_nohelpfilesinstalled = 'No help files installed.';
+    msg_helpindex = 'Help index';
+    msg_nohelpavailabelforthistopic = 'No help available for this topic.';
+    msg_pagenotavailable = 'Page not available';
+    msg_cantaccessurl = 'Sorry, can''t access the URL: %s ...';
+
+    { WUtils }
+    msg_bugcheckfailed = 'Bug check failed: %s'#13+
+                         'Please report to author!';
+    msg_functionnotimplemented = #3'This function is not'#13+
+                                 #3+'yet implemented...'#13+
+                                 #3+'Sorry';
+
+{
+  $Log$
+  Revision 1.1  2000-06-16 09:30:01  pierre
+   * new files from Gabor
+
+
+}

+ 108 - 0
ide/text/wconstsh.inc

@@ -0,0 +1,108 @@
+{
+    $Id$
+    This file is part of the Free Pascal Integrated Development Environment
+    Copyright (c) 2000 by Berczi Gabor
+
+    Strings for utilities
+
+    This program is distributed in the hope that it will be useful,
+    but WITHOUT ANY WARRANTY; without even the implied warranty of
+    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+
+ **********************************************************************}
+
+{$undef USERESSTRINGS} { this doesn't compile under FP!!! why? }
+
+{$ifdef USERESSTRINGS}
+    resourcestring
+{$else}
+    const
+{$endif}
+
+    btn_OK = 'O~K~';
+    btn_Cancel = 'M‚gsem';
+
+    dialog_find = 'Keres‚s';
+    label_find_options = 'Opci¢k';
+    label_find_texttofind = '~K~eresend‹';
+    label_find_casesensitive = 'K~i~s-/nagybet‹k k�l”n';
+    label_find_wholewordsonly = 'Csak teljes sza~v~akat';
+    label_find_direction = 'Ir ny';
+    label_find_forward = 'El‹re (~d~)';
+    label_find_backward = 'Visszafel‚ (~b~)';
+    label_find_scope = 'Szk¢p';
+    label_find_global = 'Teljes sz”ve~g~';
+    label_find_selectedtext = 'Kiv la~s~ztott sz”veg';
+    label_find_origin = 'Kiindul si pont';
+    label_find_fromcursor = 'A kur~z~ort¢l';
+    label_find_entirescope = 'T~e~ljes szk¢p';
+
+    dialog_replace = 'Csere';
+    label_replace_texttofind = label_find_texttofind;
+    label_replace_newtext = '   ~é~j sz”veg';
+    label_replace_options = label_find_options;
+    label_replace_casesensitive = label_find_casesensitive;
+    label_replace_wholewordsonly = label_find_wholewordsonly;
+    label_replace_promptonreplace = '~P~rompt on replace';
+    label_replace_direction = label_find_direction;
+    label_replace_forward = label_find_forward;
+    label_replace_backward = label_find_backward;
+    label_replace_scope = label_find_scope;
+    label_replace_global = label_find_global;
+    label_replace_selectedtext = label_find_selectedtext;
+    label_replace_origin = label_find_origin;
+    label_replace_fromcursor = label_find_fromcursor;
+    label_replace_entirescope = label_find_entirescope;
+    btn_replace_changeall = '~A~z ”sszeset';
+
+    dialog_gotoline = 'Ugr s sorra';
+    label_gotoline_linenumber = 'Az £j sor s~z~ ma';
+
+    msg_invalidmarkindex = '�rv‚nytelen pont index (%d)';
+    msg_marknotset = 'A %d. pont nincs be ll¡tva.';
+
+    msg_notenoughmemoryforthisoperation = 'Nincs el‚g mem¢ria a m‹velet elv‚gz‚s‚hez.';
+    msg_errorreadingfile = 'Hiba a  %s f jl olvas sa k”zben.';
+    msg_errorwritingfile = 'Hiba a  %s f jl ¡r sa k”zben.';
+    msg_errorsavingfile = 'Hiba a %s f jl ment‚se k”zben.';
+    msg_errorcreatingfile = 'Hiba a %s f jl l‚trehoz sa k”zben.';
+    msg_filehasbeenmodifiedsave = 'A %s m¢dosult. Menti?';
+    msg_saveuntitledfile = 'Elmenti a c¡m n‚lk�li f jlt?';
+    msg_filehadtoolonglines = #3'A %s f jlnak t£l hossz£'#13+
+                              #3'sora(i) voltak. Az els‹ a %d';
+    msg_filewasmodified = #3'A %s f jlt'#13+
+                          #3'egy m sik program m¢dos¡totta.'#13+
+                          #3'Fel�l¡rja az £jabb verzi¢t?';
+
+    dialog_savefileas = 'F jl ment‚se m s n‚ven';
+    dialog_writeblocktofile = 'Blokk ki¡r sa f jlba';
+    dialog_readblockfromfile = 'Blokk beolvas sa f jlb¢l';
+
+    label_name = '~N~‚v';
+
+    msg_searchstringnotfound = 'A keresett karaktersor nem tal lhat¢.';
+    msg_replacethisoccourence = 'Lecser‚ljem ezt az el‹fordul st?';
+    msg_fileexistsoverwrite = 'A %s f jl m r l‚tezik. Fel�l¡rja?';
+
+    { Help system }
+
+    msg_nohelpfilesinstalled = 'Nincsenek s£g¢-f jlok telep¡tve.';
+    msg_helpindex = 'S£g¢ index';
+    msg_nohelpavailabelforthistopic = 'Ehhez a t‚m hoz nem tartozik s£g¢.';
+    msg_pagenotavailable = 'Az oldal nem el‚rhet‹';
+    msg_cantaccessurl = 'Sajnos nem tudom megnyitni a %s URL-t...';
+
+    { WUtils }
+    msg_bugcheckfailed = 'Bels‹ hiba: %s'#13+
+                         'K‚rem, jelezze a szerz‹nek!';
+    msg_functionnotimplemented = #3'Ez a funkci¢ m‚g'#13+
+                                 #3+'nincs kidolgozva...'#13+
+                                 #3+'';
+
+{
+  $Log$
+  Revision 1.1  2000-06-16 09:30:01  pierre
+   * new files from Gabor
+
+
+}