paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-09-13 12:59:19 +02:00
Code Issues Packages Projects Releases Wiki Activity

Move containers from LCL to LazUtils. DynamicArray, DynHashArray, DynQueue, Maps, StringHashList, ExtendedStrings, TextStrings.

Browse Source 
git-svn-id: trunk@53737 -
This commit is contained in:
juha 2016-12-20 16:26:27 +00:00
parent db0a509d69
commit 3b52a368a2
48 changed files with 840 additions and 821 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

14
.gitattributes vendored
View File

@ -2998,12 +2998,16 @@ components/lazutils/Makefile.fpc svneol=native#text/plain
components/lazutils/asiancodepagefunctions.inc svneol=native#text/pascal
components/lazutils/asiancodepages.inc svneol=native#text/pascal
components/lazutils/avglvltree.pas svneol=native#text/pascal
components/lazutils/dynamicarray.pas svneol=native#text/pascal
components/lazutils/dynhasharray.pp svneol=native#text/pascal
components/lazutils/dynqueue.pas svneol=native#text/pascal
components/lazutils/easylazfreetype.pas svneol=native#text/pascal
components/lazutils/examples/LookupStringList/ReadMe.txt svneol=native#text/plain
components/lazutils/examples/LookupStringList/TDedupeDemo.lpi svneol=native#text/plain
components/lazutils/examples/LookupStringList/TDedupeDemo.lpr svneol=native#text/pascal
components/lazutils/examples/LookupStringList/main.lfm svneol=native#text/plain
components/lazutils/examples/LookupStringList/main.pas svneol=native#text/pascal
components/lazutils/extendedstrings.pas svneol=native#text/pascal
components/lazutils/fileutil.inc svneol=native#text/pascal
components/lazutils/fileutil.pas svneol=native#text/pascal
components/lazutils/fpcadds.pas svneol=native#text/pascal
@ -3072,13 +3076,16 @@ components/lazutils/lazutilsstrconsts.pas svneol=native#text/pascal
components/lazutils/lconvencoding.pas svneol=native#text/pascal
components/lazutils/lcsvutils.pas svneol=native#text/pascal
components/lazutils/lookupstringlist.pas svneol=native#text/pascal
components/lazutils/maps.pp svneol=native#text/pascal
components/lazutils/masks.pas svneol=native#text/pascal
components/lazutils/paswstring.pas svneol=native#text/pascal
components/lazutils/stringhashlist.pas svneol=native#text/pascal
components/lazutils/test/LazUnicodeTest.lpi svneol=native#text/plain
components/lazutils/test/LazUnicodeTest.lpr svneol=native#text/pascal
components/lazutils/test/TestLazStorageMem.lpi svneol=native#text/plain
components/lazutils/test/TestLazStorageMem.lpr svneol=native#text/plain
components/lazutils/test/testlazstoragememcase1.pas svneol=native#text/plain
components/lazutils/textstrings.pas svneol=native#text/pascal
components/lazutils/ttcache.pas svneol=native#text/pascal
components/lazutils/ttcalc.pas svneol=native#text/pascal
components/lazutils/ttcalc1.inc svneol=native#text/pascal
@ -7000,13 +7007,9 @@ lcl/dbgrids.pas svneol=native#text/pascal
lcl/defaulttranslator.pas svneol=native#text/pascal
lcl/dialog_icons.res -text
lcl/dialogs.pp svneol=native#text/pascal
lcl/dynamicarray.pas svneol=native#text/pascal
lcl/dynhasharray.pp svneol=native#text/pascal
lcl/dynqueue.pas svneol=native#text/pascal
lcl/editbtn.pas svneol=native#text/pascal
lcl/extctrls.pp svneol=native#text/plain
lcl/extdlgs.pas svneol=native#text/pascal
lcl/extendedstrings.pas svneol=native#text/pascal
lcl/extgraphics.pas svneol=native#text/pascal
lcl/filectrl.pp svneol=native#text/pascal
lcl/forms.pp svneol=native#text/pascal
@ -7932,7 +7935,6 @@ lcl/lclversion.pas svneol=native#text/pascal
lcl/ldocktree.pas svneol=native#text/plain
lcl/lmessages.pp svneol=native#text/pascal
lcl/lresources.pp svneol=native#text/pascal
lcl/maps.pp svneol=native#text/pascal
lcl/maskedit.pp svneol=native#text/pascal
lcl/menus.pp svneol=native#text/pascal
lcl/nonwin32/README.txt svneol=native#text/plain
@ -7950,7 +7952,6 @@ lcl/shellctrls.pas svneol=native#text/pascal
lcl/spin.pp svneol=native#text/pascal
lcl/stdactns.pas svneol=native#text/pascal
lcl/stdctrls.pp svneol=native#text/pascal
lcl/stringhashlist.pas svneol=native#text/pascal
lcl/templates/template.inc svneol=native#text/pascal
lcl/templates/template.pp svneol=native#text/pascal
lcl/tests/test1_1simpleform1.lpi svneol=native#text/plain
@ -7986,7 +7987,6 @@ lcl/tests/test5_1asyncprocess.lpr svneol=native#text/plain
lcl/tests/test5_1worker.pas svneol=native#text/plain
lcl/tests/test6_1masks.lpi svneol=native#text/plain
lcl/tests/test6_1masks.lpr svneol=native#text/plain
lcl/textstrings.pas svneol=native#text/pascal
lcl/themes.pas svneol=native#text/pascal
lcl/tmschema.pas svneol=native#text/pascal
lcl/toolwin.pp svneol=native#text/pascal

0
lcl/dynamicarray.pas → components/lazutils/dynamicarray.pas
View File

24
lcl/dynhasharray.pp → components/lazutils/dynhasharray.pp
View File

@ -44,8 +44,8 @@ interface
uses
Classes, SysUtils,
// LCL
LCLProc;
// LazUtils
LazLoggerBase;
type
TDynHashArray = class;
@ -284,28 +284,28 @@ procedure TDynHashArray.WriteDebugReport;
var i, RealHashIndex: integer;
HashItem: PDynHashArrayItem;
begin
DebugLn('TDynHashArray.WriteDebugReport: Consistency=',dbgs(ConsistencyCheck));
DebugLn(' Count=',dbgs(FCount),' Capacity=',dbgs(FCapacity));
DebugLogger.DebugLn('TDynHashArray.WriteDebugReport: Consistency=',dbgs(ConsistencyCheck));
DebugLogger.DebugLn(' Count=',dbgs(FCount),' Capacity=',dbgs(FCapacity));
for i:=0 to FCapacity-1 do begin
HashItem:=FItems[i];
if HashItem<>nil then begin
DbgOut(' Index=',IntToStr(i));
DebugLogger.DbgOut(' Index=',IntToStr(i));
while HashItem<>nil do begin
DbgOut(' ',Dbgs(HashItem^.Item));
DebugLogger.DbgOut(' ',Dbgs(HashItem^.Item));
RealHashIndex:=IndexOf(HashItem^.Item);
if RealHashIndex<>i then DbgOut('(H='+dbgs(RealHashIndex)+')');
if RealHashIndex<>i then DebugLogger.DbgOut('(H='+dbgs(RealHashIndex)+')');
HashItem:=HashItem^.Next;
if (HashItem<>nil) and (HashItem^.IsOverflow=false) then break;
end;
DebugLn;
DebugLogger.DebugLn;
end;
end;
HashItem:=FFirstItem;
while HashItem<>nil do begin
DebugLn(' ',Dbgs(HashItem^.Prior),'<-'
,Dbgs(HashItem)
,'(',Dbgs(HashItem^.Item),')'
,'->',Dbgs(HashItem^.Next));
DebugLogger.DebugLn(' ',Dbgs(HashItem^.Prior),'<-'
,Dbgs(HashItem)
,'(',Dbgs(HashItem^.Item),')'
,'->',Dbgs(HashItem^.Next));
HashItem:=HashItem^.Next;
end;
end;

0
lcl/dynqueue.pas → components/lazutils/dynqueue.pas
View File

0
lcl/extendedstrings.pas → components/lazutils/extendedstrings.pas
View File

10
components/lazutils/languages/lazutilsstrconsts.cs.po
View File

@ -79,6 +79,16 @@ msgstr "%s není symlink"
msgid "%s is not executable"
msgstr "%s není spustitelný"
#: lazutilsstrconsts.lrslistindexexceedsbounds
msgctxt "lazutilsstrconsts.lrslistindexexceedsbounds"
msgid "List index exceeds bounds (%d)"
msgstr ""
#: lazutilsstrconsts.lrslistmustbeempty
msgctxt "lazutilsstrconsts.lrslistmustbeempty"
msgid "List must be empty"
msgstr ""
#: lazutilsstrconsts.lrsmodified
msgctxt "lazutilsstrconsts.lrsmodified"
msgid " modified "

10
components/lazutils/languages/lazutilsstrconsts.de.po
View File

@ -79,6 +79,16 @@ msgstr "%s ist kein symbolischer Link"
msgid "%s is not executable"
msgstr "%s ist nicht ausführbar"
#: lazutilsstrconsts.lrslistindexexceedsbounds
msgctxt "lazutilsstrconsts.lrslistindexexceedsbounds"
msgid "List index exceeds bounds (%d)"
msgstr ""
#: lazutilsstrconsts.lrslistmustbeempty
msgctxt "lazutilsstrconsts.lrslistmustbeempty"
msgid "List must be empty"
msgstr ""
#: lazutilsstrconsts.lrsmodified
msgctxt "lazutilsstrconsts.lrsmodified"
msgid " modified "

10
components/lazutils/languages/lazutilsstrconsts.es.po
View File

@ -78,6 +78,16 @@ msgstr "%s no es un vínculo simbólico"
msgid "%s is not executable"
msgstr "%s no es ejecutable"
#: lazutilsstrconsts.lrslistindexexceedsbounds
msgctxt "lazutilsstrconsts.lrslistindexexceedsbounds"
msgid "List index exceeds bounds (%d)"
msgstr ""
#: lazutilsstrconsts.lrslistmustbeempty
msgctxt "lazutilsstrconsts.lrslistmustbeempty"
msgid "List must be empty"
msgstr ""
#: lazutilsstrconsts.lrsmodified
msgctxt "lazutilsstrconsts.lrsmodified"
msgid " modified "

10
components/lazutils/languages/lazutilsstrconsts.fr.po
View File

@ -81,6 +81,16 @@ msgstr "%s n'est pas un lien symbolique"
msgid "%s is not executable"
msgstr "%s n'est pas exécutable"
#: lazutilsstrconsts.lrslistindexexceedsbounds
msgctxt "lazutilsstrconsts.lrslistindexexceedsbounds"
msgid "List index exceeds bounds (%d)"
msgstr ""
#: lazutilsstrconsts.lrslistmustbeempty
msgctxt "lazutilsstrconsts.lrslistmustbeempty"
msgid "List must be empty"
msgstr ""
#: lazutilsstrconsts.lrsmodified
msgctxt "lazutilsstrconsts.lrsmodified"
msgid " modified "

10
components/lazutils/languages/lazutilsstrconsts.hu.po
View File

@ -80,6 +80,16 @@ msgstr "A(z) \"%s\" nem szimbolikus hivatkozás"
msgid "%s is not executable"
msgstr "A(z) %s nem futtatható"
#: lazutilsstrconsts.lrslistindexexceedsbounds
msgctxt "lazutilsstrconsts.lrslistindexexceedsbounds"
msgid "List index exceeds bounds (%d)"
msgstr ""
#: lazutilsstrconsts.lrslistmustbeempty
msgctxt "lazutilsstrconsts.lrslistmustbeempty"
msgid "List must be empty"
msgstr ""
#: lazutilsstrconsts.lrsmodified
msgctxt "lazutilsstrconsts.lrsmodified"
msgid " modified "

10
components/lazutils/languages/lazutilsstrconsts.it.po
View File

@ -79,6 +79,16 @@ msgstr "%s non è un link simbolico"
msgid "%s is not executable"
msgstr "%s non è eseguibile"
#: lazutilsstrconsts.lrslistindexexceedsbounds
msgctxt "lazutilsstrconsts.lrslistindexexceedsbounds"
msgid "List index exceeds bounds (%d)"
msgstr ""
#: lazutilsstrconsts.lrslistmustbeempty
msgctxt "lazutilsstrconsts.lrslistmustbeempty"
msgid "List must be empty"
msgstr ""
#: lazutilsstrconsts.lrsmodified
msgctxt "lazutilsstrconsts.lrsmodified"
msgid " modified "

10
components/lazutils/languages/lazutilsstrconsts.lt.po
View File

@ -80,6 +80,16 @@ msgstr "%s nėra simbolinis saitas"
msgid "%s is not executable"
msgstr "%s nėra vykdomasis failas"
#: lazutilsstrconsts.lrslistindexexceedsbounds
msgctxt "lazutilsstrconsts.lrslistindexexceedsbounds"
msgid "List index exceeds bounds (%d)"
msgstr ""
#: lazutilsstrconsts.lrslistmustbeempty
msgctxt "lazutilsstrconsts.lrslistmustbeempty"
msgid "List must be empty"
msgstr ""
#: lazutilsstrconsts.lrsmodified
msgctxt "lazutilsstrconsts.lrsmodified"
msgid " modified "

10
components/lazutils/languages/lazutilsstrconsts.po
View File

@ -70,6 +70,16 @@ msgstr ""
msgid "%s is not executable"
msgstr ""
#: lazutilsstrconsts.lrslistindexexceedsbounds
msgctxt "lazutilsstrconsts.lrslistindexexceedsbounds"
msgid "List index exceeds bounds (%d)"
msgstr ""
#: lazutilsstrconsts.lrslistmustbeempty
msgctxt "lazutilsstrconsts.lrslistmustbeempty"
msgid "List must be empty"
msgstr ""
#: lazutilsstrconsts.lrsmodified
msgctxt "lazutilsstrconsts.lrsmodified"
msgid " modified "

10
components/lazutils/languages/lazutilsstrconsts.pt_BR.po
View File

@ -79,6 +79,16 @@ msgstr "%s não é um vínculo simbólico"
msgid "%s is not executable"
msgstr "%s não é um executável"
#: lazutilsstrconsts.lrslistindexexceedsbounds
msgctxt "lazutilsstrconsts.lrslistindexexceedsbounds"
msgid "List index exceeds bounds (%d)"
msgstr ""
#: lazutilsstrconsts.lrslistmustbeempty
msgctxt "lazutilsstrconsts.lrslistmustbeempty"
msgid "List must be empty"
msgstr ""
#: lazutilsstrconsts.lrsmodified
msgctxt "lazutilsstrconsts.lrsmodified"
msgid " modified "

10
components/lazutils/languages/lazutilsstrconsts.ru.po
View File

@ -78,6 +78,16 @@ msgstr "%s не является символической ссылкой"
msgid "%s is not executable"
msgstr "%s не является исполнимым файлом"
#: lazutilsstrconsts.lrslistindexexceedsbounds
msgctxt "lazutilsstrconsts.lrslistindexexceedsbounds"
msgid "List index exceeds bounds (%d)"
msgstr ""
#: lazutilsstrconsts.lrslistmustbeempty
msgctxt "lazutilsstrconsts.lrslistmustbeempty"
msgid "List must be empty"
msgstr ""
#: lazutilsstrconsts.lrsmodified
msgctxt "lazutilsstrconsts.lrsmodified"
msgid " modified "

10
components/lazutils/languages/lazutilsstrconsts.uk.po
View File

@ -77,6 +77,16 @@ msgstr ""
msgid "%s is not executable"
msgstr ""
#: lazutilsstrconsts.lrslistindexexceedsbounds
msgctxt "lazutilsstrconsts.lrslistindexexceedsbounds"
msgid "List index exceeds bounds (%d)"
msgstr ""
#: lazutilsstrconsts.lrslistmustbeempty
msgctxt "lazutilsstrconsts.lrslistmustbeempty"
msgid "List must be empty"
msgstr ""
#: lazutilsstrconsts.lrsmodified
msgctxt "lazutilsstrconsts.lrsmodified"
msgid " modified "

488
components/lazutils/lazutils.lpk
View File

@ -16,335 +16,363 @@
<Description Value="Useful units for Lazarus packages."/>
<License Value="Modified LGPL-2"/>
<Version Major="1"/>
<Files Count="82">
<Files Count="89">
<Item1>
<Filename Value="laz2_dom.pas"/>
<UnitName Value="Laz2_DOM"/>
<Filename Value="LazLoggerImpl.inc"/>
<Type Value="Include"/>
</Item1>
<Item2>
<Filename Value="laz2_names.inc"/>
<Filename Value="LazLoggerIntf.inc"/>
<Type Value="Include"/>
</Item2>
<Item3>
<Filename Value="laz2_xmlcfg.pas"/>
<UnitName Value="Laz2_XMLCfg"/>
<Filename Value="Makefile"/>
<Type Value="Text"/>
</Item3>
<Item4>
<Filename Value="laz2_xmlread.pas"/>
<UnitName Value="laz2_XMLRead"/>
<Filename Value="Makefile.compiled"/>
<Type Value="Text"/>
</Item4>
<Item5>
<Filename Value="laz2_xmlutils.pas"/>
<UnitName Value="laz2_xmlutils"/>
<Filename Value="Makefile.fpc"/>
<Type Value="Text"/>
</Item5>
<Item6>
<Filename Value="laz2_xmlwrite.pas"/>
<UnitName Value="laz2_XMLWrite"/>
<Filename Value="asiancodepagefunctions.inc"/>
<Type Value="Include"/>
</Item6>
<Item7>
<Filename Value="laz_dom.pas"/>
<UnitName Value="Laz_DOM"/>
<Filename Value="asiancodepages.inc"/>
<Type Value="Include"/>
</Item7>
<Item8>
<Filename Value="laz_xmlcfg.pas"/>
<UnitName Value="Laz_XMLCfg"/>
<Filename Value="avglvltree.pas"/>
<UnitName Value="AvgLvlTree"/>
</Item8>
<Item9>
<Filename Value="laz_xmlread.pas"/>
<UnitName Value="Laz_XMLRead"/>
<Filename Value="dynamicarray.pas"/>
<UnitName Value="DynamicArray"/>
</Item9>
<Item10>
<Filename Value="laz_xmlstreaming.pas"/>
<UnitName Value="Laz_XMLStreaming"/>
<Filename Value="dynhasharray.pp"/>
<UnitName Value="DynHashArray"/>
</Item10>
<Item11>
<Filename Value="laz_xmlwrite.pas"/>
<UnitName Value="Laz_XMLWrite"/>
<Filename Value="dynqueue.pas"/>
<UnitName Value="DynQueue"/>
</Item11>
<Item12>
<Filename Value="lazfileutils.pas"/>
<UnitName Value="LazFileUtils"/>
<Filename Value="easylazfreetype.pas"/>
<UnitName Value="EasyLazFreeType"/>
</Item12>
<Item13>
<Filename Value="lazfileutils.inc"/>
<Type Value="Include"/>
<Filename Value="extendedstrings.pas"/>
<UnitName Value="ExtendedStrings"/>
</Item13>
<Item14>
<Filename Value="unixlazfileutils.inc"/>
<Type Value="Include"/>
<Filename Value="fileutil.pas"/>
<UnitName Value="FileUtil"/>
</Item14>
<Item15>
<Filename Value="winlazfileutils.inc"/>
<Filename Value="fileutil.inc"/>
<Type Value="Include"/>
</Item15>
<Item16>
<Filename Value="lazfilecache.pas"/>
<UnitName Value="LazFileCache"/>
<Filename Value="fpcadds.pas"/>
<UnitName Value="FPCAdds"/>
</Item16>
<Item17>
<Filename Value="lazutf8.pas"/>
<UnitName Value="LazUTF8"/>
<Filename Value="laz2_dom.pas"/>
<UnitName Value="Laz2_DOM"/>
</Item17>
<Item18>
<Filename Value="lazdbglog.pas"/>
<UnitName Value="LazDbgLog"/>
<Filename Value="laz2_names.inc"/>
<Type Value="Include"/>
</Item18>
<Item19>
<Filename Value="paswstring.pas"/>
<UnitName Value="PasWString"/>
<Filename Value="laz2_xmlcfg.pas"/>
<UnitName Value="Laz2_XMLCfg"/>
</Item19>
<Item20>
<Filename Value="fileutil.pas"/>
<UnitName Value="FileUtil"/>
<Filename Value="laz2_xmlread.pas"/>
<UnitName Value="laz2_XMLRead"/>
</Item20>
<Item21>
<Filename Value="lazutf8classes.pas"/>
<UnitName Value="LazUTF8Classes"/>
<Filename Value="laz2_xmlutils.pas"/>
<UnitName Value="laz2_xmlutils"/>
</Item21>
<Item22>
<Filename Value="masks.pas"/>
<UnitName Value="Masks"/>
<Filename Value="laz2_xmlwrite.pas"/>
<UnitName Value="laz2_XMLWrite"/>
</Item22>
<Item23>
<Filename Value="unixfileutil.inc"/>
<Type Value="Include"/>
<Filename Value="laz2_xpath.pas"/>
<UnitName Value="laz2_xpath"/>
</Item23>
<Item24>
<Filename Value="winfileutil.inc"/>
<Type Value="Include"/>
<Filename Value="laz_dom.pas"/>
<UnitName Value="Laz_DOM"/>
</Item24>
<Item25>
<Filename Value="fileutil.inc"/>
<Type Value="Include"/>
<Filename Value="laz_xmlcfg.pas"/>
<UnitName Value="Laz_XMLCfg"/>
</Item25>
<Item26>
<Filename Value="lazutilsstrconsts.pas"/>
<UnitName Value="LazUtilsStrConsts"/>
<Filename Value="laz_xmlread.pas"/>
<UnitName Value="Laz_XMLRead"/>
</Item26>
<Item27>
<Filename Value="lconvencoding.pas"/>
<UnitName Value="LConvEncoding"/>
<Filename Value="laz_xmlstreaming.pas"/>
<UnitName Value="Laz_XMLStreaming"/>
</Item27>
<Item28>
<Filename Value="asiancodepages.inc"/>
<Type Value="Include"/>
<Filename Value="laz_xmlwrite.pas"/>
<UnitName Value="Laz_XMLWrite"/>
</Item28>
<Item29>
<Filename Value="asiancodepagefunctions.inc"/>
<Type Value="Include"/>
</Item29>
<Item30>
<Filename Value="lazutf16.pas"/>
<UnitName Value="LazUTF16"/>
</Item30>
<Item31>
<Filename Value="lazutf8sysutils.pas"/>
<UnitName Value="LazUTF8SysUtils"/>
</Item31>
<Item32>
<Filename Value="lazmethodlist.pas"/>
<UnitName Value="LazMethodList"/>
</Item32>
<Item33>
<Filename Value="avglvltree.pas"/>
<UnitName Value="AvgLvlTree"/>
</Item33>
<Item34>
<Filename Value="lazlogger.pas"/>
<UnitName Value="LazLogger"/>
</Item34>
<Item35>
<Filename Value="lazfreetype.pas"/>
<UnitName Value="LazFreeType"/>
</Item35>
<Item36>
<Filename Value="Makefile"/>
<Type Value="Text"/>
</Item36>
<Item37>
<Filename Value="Makefile.compiled"/>
<Type Value="Text"/>
</Item37>
<Item38>
<Filename Value="Makefile.fpc"/>
<Type Value="Text"/>
</Item38>
<Item39>
<Filename Value="ttcache.pas"/>
<UnitName Value="TTCache"/>
</Item39>
<Item40>
<Filename Value="ttcalc.pas"/>
<UnitName Value="TTCalc"/>
</Item40>
<Item41>
<Filename Value="ttcalc1.inc"/>
<Type Value="Include"/>
</Item41>
<Item42>
<Filename Value="ttcalc2.inc"/>
<Type Value="Include"/>
</Item42>
<Item43>
<Filename Value="ttcalc3.inc"/>
<Type Value="Include"/>
</Item43>
<Item44>
<Filename Value="ttcalc4.inc"/>
<Type Value="Include"/>
</Item44>
<Item45>
<Filename Value="ttcmap.pas"/>
<UnitName Value="TTCMap"/>
</Item45>
<Item46>
<Filename Value="ttconfig.inc"/>
<Type Value="Include"/>
</Item46>
<Item47>
<Filename Value="ttdebug.pas"/>
<UnitName Value="TTDebug"/>
</Item47>
<Item48>
<Filename Value="tterror.pas"/>
<UnitName Value="TTError"/>
</Item48>
<Item49>
<Filename Value="ttfile.pas"/>
<UnitName Value="TTFile"/>
</Item49>
<Item50>
<Filename Value="ttgload.pas"/>
<UnitName Value="TTGLoad"/>
</Item50>
<Item51>
<Filename Value="ttinterp.pas"/>
<UnitName Value="TTInterp"/>
</Item51>
<Item52>
<Filename Value="ttload.pas"/>
<UnitName Value="TTLoad"/>
</Item52>
<Item53>
<Filename Value="ttmemory.pas"/>
<UnitName Value="TTMemory"/>
</Item53>
<Item54>
<Filename Value="ttobjs.pas"/>
<UnitName Value="TTObjs"/>
</Item54>
<Item55>
<Filename Value="ttprofile.pas"/>
<UnitName Value="TTProfile"/>
</Item55>
<Item56>
<Filename Value="ttraster_sweep.inc"/>
<Type Value="Include"/>
</Item56>
<Item57>
<Filename Value="ttraster.pas"/>
<UnitName Value="TTRASTER"/>
</Item57>
<Item58>
<Filename Value="tttables.pas"/>
<UnitName Value="TTTables"/>
</Item58>
<Item59>
<Filename Value="tttypes.pas"/>
<UnitName Value="TTTypes"/>
</Item59>
<Item60>
<Filename Value="easylazfreetype.pas"/>
<UnitName Value="EasyLazFreeType"/>
</Item60>
<Item61>
<Filename Value="lazloggerbase.pas"/>
<UnitName Value="LazLoggerBase"/>
</Item61>
<Item62>
<Filename Value="LazLoggerIntf.inc"/>
<Type Value="Include"/>
</Item62>
<Item63>
<Filename Value="lazloggerdummy.pas"/>
<UnitName Value="LazLoggerDummy"/>
</Item63>
<Item64>
<Filename Value="lazclasses.pas"/>
<UnitName Value="LazClasses"/>
</Item64>
<Item65>
</Item29>
<Item30>
<Filename Value="lazcollections.pas"/>
<UnitName Value="lazCollections"/>
</Item30>
<Item31>
<Filename Value="lazconfigstorage.pas"/>
<UnitName Value="LazConfigStorage"/>
</Item31>
<Item32>
<Filename Value="lazdbglog.pas"/>
<UnitName Value="LazDbgLog"/>
</Item32>
<Item33>
<Filename Value="lazfglhash.pas"/>
<UnitName Value="lazfglhash"/>
</Item33>
<Item34>
<Filename Value="lazfilecache.pas"/>
<UnitName Value="LazFileCache"/>
</Item34>
<Item35>
<Filename Value="lazfileutils.pas"/>
<UnitName Value="LazFileUtils"/>
</Item35>
<Item36>
<Filename Value="lazfileutils.inc"/>
<Type Value="Include"/>
</Item36>
<Item37>
<Filename Value="lazfreetype.pas"/>
<UnitName Value="LazFreeType"/>
</Item37>
<Item38>
<Filename Value="lazfreetypefontcollection.pas"/>
<UnitName Value="LazFreeTypeFontCollection"/>
</Item38>
<Item39>
<Filename Value="lazfreetypefpimagedrawer.pas"/>
<UnitName Value="LazFreeTypeFPImageDrawer"/>
</Item39>
<Item40>
<Filename Value="lazlistclasses.pas"/>
<UnitName Value="LazListClasses"/>
</Item40>
<Item41>
<Filename Value="lazlogger.pas"/>
<UnitName Value="LazLogger"/>
</Item41>
<Item42>
<Filename Value="lazloggerbase.pas"/>
<UnitName Value="LazLoggerBase"/>
</Item42>
<Item43>
<Filename Value="lazloggerdummy.pas"/>
<UnitName Value="LazLoggerDummy"/>
</Item43>
<Item44>
<Filename Value="lazloggerprofiling.pas"/>
<UnitName Value="LazLoggerProfiling"/>
</Item44>
<Item45>
<Filename Value="lazmethodlist.pas"/>
<UnitName Value="LazMethodList"/>
</Item45>
<Item46>
<Filename Value="lazunicode.pas"/>
<UnitName Value="LazUnicode"/>
</Item46>
<Item47>
<Filename Value="lazutf16.pas"/>
<UnitName Value="LazUTF16"/>
</Item47>
<Item48>
<Filename Value="lazutf8.pas"/>
<UnitName Value="LazUTF8"/>
</Item48>
<Item49>
<Filename Value="lazutf8classes.pas"/>
<UnitName Value="LazUTF8Classes"/>
</Item49>
<Item50>
<Filename Value="lazutf8sysutils.pas"/>
<UnitName Value="LazUTF8SysUtils"/>
</Item50>
<Item51>
<Filename Value="lazutilities.pas"/>
<UnitName Value="LazUtilities"/>
</Item51>
<Item52>
<Filename Value="lazutils_defines.inc"/>
<Type Value="Include"/>
</Item52>
<Item53>
<Filename Value="lazutilsstrconsts.pas"/>
<UnitName Value="LazUtilsStrConsts"/>
</Item53>
<Item54>
<Filename Value="lconvencoding.pas"/>
<UnitName Value="LConvEncoding"/>
</Item54>
<Item55>
<Filename Value="lcsvutils.pas"/>
<UnitName Value="lcsvutils"/>
</Item55>
<Item56>
<Filename Value="lookupstringlist.pas"/>
<UnitName Value="LookupStringList"/>
</Item56>
<Item57>
<Filename Value="maps.pp"/>
<UnitName Value="Maps"/>
</Item57>
<Item58>
<Filename Value="masks.pas"/>
<UnitName Value="Masks"/>
</Item58>
<Item59>
<Filename Value="paswstring.pas"/>
<UnitName Value="PasWString"/>
</Item59>
<Item60>
<Filename Value="stringhashlist.pas"/>
<UnitName Value="StringHashList"/>
</Item60>
<Item61>
<Filename Value="textstrings.pas"/>
<UnitName Value="TextStrings"/>
</Item61>
<Item62>
<Filename Value="ttcache.pas"/>
<UnitName Value="TTCache"/>
</Item62>
<Item63>
<Filename Value="ttcalc.pas"/>
<UnitName Value="TTCalc"/>
</Item63>
<Item64>
<Filename Value="ttcalc1.inc"/>
<Type Value="Include"/>
</Item64>
<Item65>
<Filename Value="ttcalc2.inc"/>
<Type Value="Include"/>
</Item65>
<Item66>
<Filename Value="LazLoggerImpl.inc"/>
<Filename Value="ttcalc3.inc"/>
<Type Value="Include"/>
</Item66>
<Item67>
<Filename Value="lazconfigstorage.pas"/>
<UnitName Value="LazConfigStorage"/>
<Filename Value="ttcalc4.inc"/>
<Type Value="Include"/>
</Item67>
<Item68>
<Filename Value="utf8process.pp"/>
<UnitName Value="UTF8Process"/>
<Filename Value="ttcmap.pas"/>
<UnitName Value="TTCMap"/>
</Item68>
<Item69>
<Filename Value="laz2_xpath.pas"/>
<UnitName Value="laz2_xpath"/>
<Filename Value="ttconfig.inc"/>
<Type Value="Include"/>
</Item69>
<Item70>
<Filename Value="unixlazutf8.inc"/>
<Type Value="Include"/>
<Filename Value="ttdebug.pas"/>
<UnitName Value="TTDebug"/>
</Item70>
<Item71>
<Filename Value="winlazutf8.inc"/>
<Type Value="Include"/>
<Filename Value="tterror.pas"/>
<UnitName Value="TTError"/>
</Item71>
<Item72>
<Filename Value="lazloggerprofiling.pas"/>
<UnitName Value="LazLoggerProfiling"/>
<Filename Value="ttfile.pas"/>
<UnitName Value="TTFile"/>
</Item72>
<Item73>
<Filename Value="fpcadds.pas"/>
<UnitName Value="FPCAdds"/>
<Filename Value="ttgload.pas"/>
<UnitName Value="TTGLoad"/>
</Item73>
<Item74>
<Filename Value="lazutilities.pas"/>
<UnitName Value="LazUtilities"/>
<Filename Value="ttinterp.pas"/>
<UnitName Value="TTInterp"/>
</Item74>
<Item75>
<Filename Value="lazfglhash.pas"/>
<UnitName Value="lazfglhash"/>
<Filename Value="ttload.pas"/>
<UnitName Value="TTLoad"/>
</Item75>
<Item76>
<Filename Value="lcsvutils.pas"/>
<UnitName Value="lcsvutils"/>
<Filename Value="ttmemory.pas"/>
<UnitName Value="TTMemory"/>
</Item76>
<Item77>
<Filename Value="lazcollections.pas"/>
<UnitName Value="lazCollections"/>
<Filename Value="ttobjs.pas"/>
<UnitName Value="TTObjs"/>
</Item77>
<Item78>
<Filename Value="lazlistclasses.pas"/>
<UnitName Value="LazListClasses"/>
<Filename Value="ttprofile.pas"/>
<UnitName Value="TTProfile"/>
</Item78>
<Item79>
<Filename Value="lazfreetypefpimagedrawer.pas"/>
<UnitName Value="LazFreeTypeFPImageDrawer"/>
<Filename Value="ttraster.pas"/>
<UnitName Value="TTRASTER"/>
</Item79>
<Item80>
<Filename Value="lookupstringlist.pas"/>
<UnitName Value="LookupStringList"/>
<Filename Value="ttraster_sweep.inc"/>
<Type Value="Include"/>
</Item80>
<Item81>
<Filename Value="lazutils_defines.inc"/>
<Type Value="Include"/>
<Filename Value="tttables.pas"/>
<UnitName Value="TTTables"/>
</Item81>
<Item82>
<Filename Value="lazunicode.pas"/>
<UnitName Value="LazUnicode"/>
<Filename Value="tttypes.pas"/>
<UnitName Value="TTTypes"/>
</Item82>
<Item83>
<Filename Value="unixfileutil.inc"/>
<Type Value="Include"/>
</Item83>
<Item84>
<Filename Value="unixlazfileutils.inc"/>
<Type Value="Include"/>
</Item84>
<Item85>
<Filename Value="unixlazutf8.inc"/>
<Type Value="Include"/>
</Item85>
<Item86>
<Filename Value="utf8process.pp"/>
<UnitName Value="UTF8Process"/>
</Item86>
<Item87>
<Filename Value="winfileutil.inc"/>
<Type Value="Include"/>
</Item87>
<Item88>
<Filename Value="winlazfileutils.inc"/>
<Type Value="Include"/>
</Item88>
<Item89>
<Filename Value="winlazutf8.inc"/>
<Type Value="Include"/>
</Item89>
</Files>
<LazDoc Paths="../../docs/xml/lazutils"/>
<i18n>

24
components/lazutils/lazutils.pas
View File

@ -8,17 +8,19 @@ unit LazUtils;
interface
uses
Laz2_DOM, Laz2_XMLCfg, laz2_XMLRead, laz2_xmlutils, laz2_XMLWrite, Laz_DOM,
Laz_XMLCfg, Laz_XMLRead, Laz_XMLStreaming, Laz_XMLWrite, LazFileUtils,
LazFileCache, LazUTF8, LazDbgLog, PasWString, FileUtil, LazUTF8Classes,
Masks, LazUtilsStrConsts, LConvEncoding, LazUTF16, LazUTF8SysUtils,
LazMethodList, AvgLvlTree, LazLogger, LazFreeType, TTCache, TTCalc, TTCMap,
TTDebug, TTError, TTFile, TTGLoad, TTInterp, TTLoad, TTMemory, TTObjs,
TTProfile, TTRASTER, TTTables, TTTypes, EasyLazFreeType, LazLoggerBase,
LazLoggerDummy, LazClasses, LazFreeTypeFontCollection, LazConfigStorage,
UTF8Process, laz2_xpath, LazLoggerProfiling, FPCAdds, LazUtilities,
lazfglhash, lcsvutils, lazCollections, LazListClasses,
LazFreeTypeFPImageDrawer, LookupStringList, LazUnicode, LazarusPackageIntf;
AvgLvlTree, DynamicArray, DynHashArray, DynQueue, EasyLazFreeType,
ExtendedStrings, FileUtil, FPCAdds, Laz2_DOM, Laz2_XMLCfg, laz2_XMLRead,
laz2_xmlutils, laz2_XMLWrite, laz2_xpath, Laz_DOM, Laz_XMLCfg, Laz_XMLRead,
Laz_XMLStreaming, Laz_XMLWrite, LazClasses, lazCollections,
LazConfigStorage, LazDbgLog, lazfglhash, LazFileCache, LazFileUtils,
LazFreeType, LazFreeTypeFontCollection, LazFreeTypeFPImageDrawer,
LazListClasses, LazLogger, LazLoggerBase, LazLoggerDummy,
LazLoggerProfiling, LazMethodList, LazUnicode, LazUTF16, LazUTF8,
LazUTF8Classes, LazUTF8SysUtils, LazUtilities, LazUtilsStrConsts,
LConvEncoding, lcsvutils, LookupStringList, Maps, Masks, PasWString,
StringHashList, TextStrings, TTCache, TTCalc, TTCMap, TTDebug, TTError,
TTFile, TTGLoad, TTInterp, TTLoad, TTMemory, TTObjs, TTProfile, TTRASTER,
TTTables, TTTypes, UTF8Process, LazarusPackageIntf;
implementation

2
components/lazutils/lazutilsstrconsts.pas
View File

@ -37,6 +37,8 @@ resourceString
lrsUnableToCreateConfigDirectoryS = 'Unable to create config directory "%s"';
lrsProgramFileNotFound = 'program file not found %s';
lrsCanNotExecute = 'can not execute %s';
lrsListMustBeEmpty = 'List must be empty';
lrsListIndexExceedsBounds = 'List index exceeds bounds (%d)';
// XPath
lrsNodeSet = 'node set';

0
lcl/maps.pp → components/lazutils/maps.pp
View File

5
lcl/stringhashlist.pas → components/lazutils/stringhashlist.pas
View File

@ -25,7 +25,8 @@ interface
uses
Classes, SysUtils,
LCLStrConsts;
// LazUtils
LazUtilsStrConsts;
type
PStringHashItem = ^TStringHashItem;
@ -353,7 +354,7 @@ begin
begin
if Count > 0 then
begin
raise EListError.Create(rsListMustBeEmpty);
raise EListError.Create(lrsListMustBeEmpty);
exit;
end;
fCaseSensitive := Value;

32
lcl/textstrings.pas → components/lazutils/textstrings.pas
View File

@ -29,11 +29,9 @@ interface
uses
Classes, SysUtils,
// LCL
LCLStrConsts,
// LazUtils
LazUtf8Classes;
LazUtf8Classes, LazUtilsStrConsts;
type
{ TTextStrings }
@ -233,7 +231,7 @@ var
begin
if not FArraysValid then BuildArrays;
if (Index<0) or (Index>=FLineCount) then
Error(rsListIndexExceedsBounds, Index);
Error(lrsListIndexExceedsBounds, Index);
Line:=@FLineRanges[Index];
if (Line^.Line='')
and (Line^.StartPos<Line^.EndPos) then begin
@ -260,7 +258,7 @@ function TTextStrings.GetObject(Index: Integer): TObject;
begin
if FArraysValid then begin
if (Index<0) or (Index>=FLineCount) then
Error(rsListIndexExceedsBounds, Index);
Error(lrsListIndexExceedsBounds, Index);
Result:=FLineRanges[Index].TheObject;
end else
Result:=nil;
@ -279,7 +277,7 @@ var
begin
if not FArraysValid then BuildArrays;
if (Index<0) or (Index>=FLineCount) then
Error(rsListIndexExceedsBounds, Index);
Error(lrsListIndexExceedsBounds, Index);
OldStartPos:=FLineRanges[Index].StartPos;
OldEndPos:=FLineRanges[Index].EndPos;
NewLineLen:=length(s);
@ -320,7 +318,7 @@ procedure TTextStrings.PutObject(Index: Integer; AnObject: TObject);
begin
if not FArraysValid then BuildArrays;
if (Index<0) or (Index>=FLineCount) then
Error(rsListIndexExceedsBounds, Index);
Error(lrsListIndexExceedsBounds, Index);
FLineRanges[Index].TheObject:=AnObject;
end;
@ -466,7 +464,7 @@ var
begin
if not FArraysValid then BuildArrays;
if (Index<0) or (Index>=FLineCount) then
Error(rsListIndexExceedsBounds, Index);
Error(lrsListIndexExceedsBounds, Index);
// adjust text
OldLineLen:=GetLineLen(Index,true);
if OldLineLen>0 then begin
@ -510,14 +508,14 @@ begin
// check values
if Index1=Index2 then exit;
if Index1<0 then
Error(rsListIndexExceedsBounds, Index1);
Error(lrsListIndexExceedsBounds, Index1);
if Index2<0 then
Error(rsListIndexExceedsBounds, Index2);
Error(lrsListIndexExceedsBounds, Index2);
if not FArraysValid then BuildArrays;
if Index1>=FLineCount then
Error(rsListIndexExceedsBounds, Index1);
Error(lrsListIndexExceedsBounds, Index1);
if Index2>=FLineCount then
Error(rsListIndexExceedsBounds, Index2);
Error(lrsListIndexExceedsBounds, Index2);
// make sure Index1<Index2
if Index1>Index2 then begin
@ -613,14 +611,14 @@ begin
// check values
if CurIndex=NewIndex then exit;
if CurIndex<0 then
Error(rsListIndexExceedsBounds, CurIndex);
Error(lrsListIndexExceedsBounds, CurIndex);
if NewIndex<0 then
Error(rsListIndexExceedsBounds, NewIndex);
Error(lrsListIndexExceedsBounds, NewIndex);
if not FArraysValid then BuildArrays;
if CurIndex>=FLineCount then
Error(rsListIndexExceedsBounds, CurIndex);
Error(lrsListIndexExceedsBounds, CurIndex);
if NewIndex>=FLineCount then
Error(rsListIndexExceedsBounds, NewIndex);
Error(lrsListIndexExceedsBounds, NewIndex);
// adjust text
MakeTextBufferUnique;

19
lcl/alllclunits.pp
View File

@ -9,16 +9,15 @@ interface
uses
CheckLst, Clipbrd, ColorBox, ComCtrls, Controls, CustomTimer, DBActns,
DbCtrls, DBGrids, DefaultTranslator, Dialogs, DynamicArray, DynHashArray,
DynQueue, ExtCtrls, ExtDlgs, ExtendedStrings, ExtGraphics, FileCtrl, Forms,
Graphics, GraphMath, GraphType, GraphUtil, Grids, HelpIntfs, IcnsTypes,
ImageListCache, ImgList, IniPropStorage, InterfaceBase, IntfGraphics,
LazHelpHTML, LazHelpIntf, LazLinkedList, LCLClasses, LCLIntf, LCLMemManager,
LCLMessageGlue, LCLProc, LCLResCache, LCLStrConsts, LCLType, Menus,
LCLUnicodeData, LCLVersion, LMessages, LResources, Maps, MaskEdit,
PairSplitter, PopupNotifier, PostScriptCanvas, PostScriptPrinter,
PostScriptUnicode, Printers, PropertyStorage, RubberBand, ShellCtrls, Spin,
StdActns, StdCtrls, StringHashList, TextStrings, Themes, TmSchema, Toolwin,
DbCtrls, DBGrids, DefaultTranslator, Dialogs, ExtCtrls, ExtDlgs,
ExtGraphics, FileCtrl, Forms, Graphics, GraphMath, GraphType, GraphUtil,
Grids, HelpIntfs, IcnsTypes, ImageListCache, ImgList, IniPropStorage,
InterfaceBase, IntfGraphics, LazHelpHTML, LazHelpIntf, LazLinkedList,
LCLClasses, LCLIntf, LCLMemManager, LCLMessageGlue, LCLProc, LCLResCache,
LCLStrConsts, LCLType, Menus, LCLUnicodeData, LCLVersion, LMessages,
LResources, MaskEdit, PairSplitter, PopupNotifier, PostScriptCanvas,
PostScriptPrinter, PostScriptUnicode, Printers, PropertyStorage, RubberBand,
ShellCtrls, Spin, StdActns, StdCtrls, Themes, TmSchema, Toolwin,
Translations, UTrace, XMLPropStorage, TimePopup, Messages, WSButtons,
WSCalendar, WSCheckLst, WSComCtrls, WSControls, WSDesigner, WSDialogs,
WSExtCtrls, WSExtDlgs, WSFactory, WSForms, WSGrids, WSImgList, WSLCLClasses,

4
lcl/languages/lclstrconsts.ca.po
View File

@ -916,10 +916,6 @@ msgstr ""
msgid "List index exceeds bounds (%d)"
msgstr "L'índex de la llista excedeix els límits (%d)"
#: lclstrconsts.rslistmustbeempty
msgid "List must be empty"
msgstr "Cal que la llista sigui buida"
#: lclstrconsts.rsmarooncolorcaption
msgid "Maroon"
msgstr ""

4
lcl/languages/lclstrconsts.cs.po
View File

@ -878,10 +878,6 @@ msgstr "Citrusová"
msgid "List index exceeds bounds (%d)"
msgstr "Index seznamu překročil meze (%d)"
#: lclstrconsts.rslistmustbeempty
msgid "List must be empty"
msgstr "Seznam musí být prázdný"
#: lclstrconsts.rsmarooncolorcaption
msgid "Maroon"
msgstr "Kaštanová"

4
lcl/languages/lclstrconsts.de.po
View File

@ -877,10 +877,6 @@ msgstr "Hellgrün"
msgid "List index exceeds bounds (%d)"
msgstr "Listenindex überschreitet Grenzen (%d)"
#: lclstrconsts.rslistmustbeempty
msgid "List must be empty"
msgstr "Zeile muß leer sein"
#: lclstrconsts.rsmarooncolorcaption
msgid "Maroon"
msgstr "Kastanienbraun"

4
lcl/languages/lclstrconsts.es.po
View File

@ -875,10 +875,6 @@ msgstr "Lima"
msgid "List index exceeds bounds (%d)"
msgstr "El índice de lista excede los límites (%d)"
#: lclstrconsts.rslistmustbeempty
msgid "List must be empty"
msgstr "La lista debe estar vacía"
#: lclstrconsts.rsmarooncolorcaption
msgid "Maroon"
msgstr "Marrón"

4
lcl/languages/lclstrconsts.fi.po
View File

@ -874,10 +874,6 @@ msgstr "Limetti"
msgid "List index exceeds bounds (%d)"
msgstr "Luettelon osoitin ylittää rajat (%d)"
#: lclstrconsts.rslistmustbeempty
msgid "List must be empty"
msgstr "Luettelon pitää olla tyhjä"
#: lclstrconsts.rsmarooncolorcaption
msgid "Maroon"
msgstr ""

4
lcl/languages/lclstrconsts.fr.po
View File

@ -876,10 +876,6 @@ msgstr "Vert citron"
msgid "List index exceeds bounds (%d)"
msgstr "Index de liste hors limites (%d)"
#: lclstrconsts.rslistmustbeempty
msgid "List must be empty"
msgstr "La liste doit être vide"
#: lclstrconsts.rsmarooncolorcaption
msgid "Maroon"
msgstr "Marron"

4
lcl/languages/lclstrconsts.he.po
View File

@ -921,10 +921,6 @@ msgstr "לימוני"
msgid "List index exceeds bounds (%d)"
msgstr "אינדקס הרשימה עובר את הגבול"
#: lclstrconsts.rslistmustbeempty
msgid "List must be empty"
msgstr "הרשימה חייבת להיות ריקה"
#: lclstrconsts.rsmarooncolorcaption
msgid "Maroon"
msgstr "ערמוני"

4
lcl/languages/lclstrconsts.hu.po
View File

@ -876,10 +876,6 @@ msgstr "Élénkzöld"
msgid "List index exceeds bounds (%d)"
msgstr "A lista indexe a határon kívül esik (%d)"
#: lclstrconsts.rslistmustbeempty
msgid "List must be empty"
msgstr "A listának üresnek kell lennie"
#: lclstrconsts.rsmarooncolorcaption
msgid "Maroon"
msgstr "Gesztenyebarna"

4
lcl/languages/lclstrconsts.id.po
View File

@ -915,10 +915,6 @@ msgstr ""
msgid "List index exceeds bounds (%d)"
msgstr "Indeks List melebihi jangkauan (%d)"
#: lclstrconsts.rslistmustbeempty
msgid "List must be empty"
msgstr "List harus kosong"
#: lclstrconsts.rsmarooncolorcaption
msgid "Maroon"
msgstr ""

4
lcl/languages/lclstrconsts.it.po
View File

@ -880,10 +880,6 @@ msgstr "Verde brillante"
msgid "List index exceeds bounds (%d)"
msgstr "Indice della lista fuori dai limiti (%d)"
#: lclstrconsts.rslistmustbeempty
msgid "List must be empty"
msgstr "L'elenco deve essere vuoto"
#: lclstrconsts.rsmarooncolorcaption
msgid "Maroon"
msgstr "Marrone"

4
lcl/languages/lclstrconsts.ja.po
View File

@ -907,10 +907,6 @@ msgstr "黄緑色"
msgid "List index exceeds bounds (%d)"
msgstr "リストインデックスが範囲外です (%d)"
#: lclstrconsts.rslistmustbeempty
msgid "List must be empty"
msgstr "ハッシュリストは空でなくてはなりません"
#: lclstrconsts.rsmarooncolorcaption
msgid "Maroon"
msgstr "栗色"

4
lcl/languages/lclstrconsts.lt.po
View File

@ -907,10 +907,6 @@ msgstr "Gelsvai žalsva"
msgid "List index exceeds bounds (%d)"
msgstr "Sąrašo indeksas peržengė ribas (%d)"
#: lclstrconsts.rslistmustbeempty
msgid "List must be empty"
msgstr "Sąrašas turi būti tuščias"
#: lclstrconsts.rsmarooncolorcaption
msgid "Maroon"
msgstr "Kaštoninė"

4
lcl/languages/lclstrconsts.nl.po
View File

@ -887,10 +887,6 @@ msgstr "Limoen"
msgid "List index exceeds bounds (%d)"
msgstr "Lijst index overschreidt grenzen (%d)"
#: lclstrconsts.rslistmustbeempty
msgid "List must be empty"
msgstr "Lijst moet leeg zijn"
#: lclstrconsts.rsmarooncolorcaption
msgid "Maroon"
msgstr "Kastanje"

4
lcl/languages/lclstrconsts.no.po
View File

@ -918,10 +918,6 @@ msgstr ""
msgid "List index exceeds bounds (%d)"
msgstr "Liste-indeks overskrider grenser (%d)"
#: lclstrconsts.rslistmustbeempty
msgid "List must be empty"
msgstr "Liste må være tom"
#: lclstrconsts.rsmarooncolorcaption
msgid "Maroon"
msgstr ""

4
lcl/languages/lclstrconsts.pl.po
View File

@ -888,10 +888,6 @@ msgstr "Jasnozielony"
msgid "List index exceeds bounds (%d)"
msgstr "Indeks listy poza zakresem (%d)"
#: lclstrconsts.rslistmustbeempty
msgid "List must be empty"
msgstr "Lista musi być pusta"
#: lclstrconsts.rsmarooncolorcaption
msgid "Maroon"
msgstr "Bordowy"

4
lcl/languages/lclstrconsts.po
View File

@ -869,10 +869,6 @@ msgstr ""
msgid "List index exceeds bounds (%d)"
msgstr ""
#: lclstrconsts.rslistmustbeempty
msgid "List must be empty"
msgstr ""
#: lclstrconsts.rsmarooncolorcaption
msgid "Maroon"
msgstr ""

4
lcl/languages/lclstrconsts.pt.po
View File

@ -896,10 +896,6 @@ msgstr "Limão"
msgid "List index exceeds bounds (%d)"
msgstr "Índice lista excede o limite (%d)"
#: lclstrconsts.rslistmustbeempty
msgid "List must be empty"
msgstr "Lista deve estar vazia"
#: lclstrconsts.rsmarooncolorcaption
msgid "Maroon"
msgstr "Marrom"

4
lcl/languages/lclstrconsts.pt_BR.po
View File

@ -904,10 +904,6 @@ msgstr "Limão"
msgid "List index exceeds bounds (%d)"
msgstr "Índice lista excede o limite (%d)"
#: lclstrconsts.rslistmustbeempty
msgid "List must be empty"
msgstr "Lista deve estar vazia"
#: lclstrconsts.rsmarooncolorcaption
msgid "Maroon"
msgstr "Marrom"

4
lcl/languages/lclstrconsts.ru.po
View File

@ -876,10 +876,6 @@ msgstr "Зелёный"
msgid "List index exceeds bounds (%d)"
msgstr "Индекс списка вне диапазона (%d)"
#: lclstrconsts.rslistmustbeempty
msgid "List must be empty"
msgstr "Список должен быть пуст"
#: lclstrconsts.rsmarooncolorcaption
msgid "Maroon"
msgstr "Малиновый"

4
lcl/languages/lclstrconsts.sk.po
View File

@ -879,10 +879,6 @@ msgstr "Citrusová"
msgid "List index exceeds bounds (%d)"
msgstr "Index zoznamu prekračuje hranice (%d)"
#: lclstrconsts.rslistmustbeempty
msgid "List must be empty"
msgstr "Zoznam musí byť prázdny"
#: lclstrconsts.rsmarooncolorcaption
msgid "Maroon"
msgstr "Gaštanová"

4
lcl/languages/lclstrconsts.tr.po
View File

@ -915,10 +915,6 @@ msgstr ""
msgid "List index exceeds bounds (%d)"
msgstr "Liste tanımlayıcısı sınırları aşıyor (%d)"
#: lclstrconsts.rslistmustbeempty
msgid "List must be empty"
msgstr "Liste boş olmak zorunda"
#: lclstrconsts.rsmarooncolorcaption
msgid "Maroon"
msgstr ""

4
lcl/languages/lclstrconsts.uk.po
View File

@ -907,10 +907,6 @@ msgstr "Зелений"
msgid "List index exceeds bounds (%d)"
msgstr "Індекс списку поза діапазоном (%d)"
#: lclstrconsts.rslistmustbeempty
msgid "List must be empty"
msgstr "Список має бути порожнім"
#: lclstrconsts.rsmarooncolorcaption
msgid "Maroon"
msgstr "Коричнево-малиновий"

4
lcl/languages/lclstrconsts.zh_CN.po
View File

@ -919,10 +919,6 @@ msgstr "橙"
msgid "List index exceeds bounds (%d)"
msgstr "list 索引超过限制 (%d)"
#: lclstrconsts.rslistmustbeempty
msgid "List must be empty"
msgstr "列表必须为空"
#: lclstrconsts.rsmarooncolorcaption
msgid "Maroon"
msgstr "栗"

850
lcl/lclbase.lpk
View File

File diff suppressed because it is too large Load Diff

1
lcl/lclstrconsts.pas
View File

@ -222,7 +222,6 @@ resourceString
sInvalidCharSet = 'The char set in mask "%s" is not valid!';
SMaskEditNoMatch = 'The current text does not match the specified mask.';
rsListMustBeEmpty = 'List must be empty';
rsInvalidPropertyValue = 'Invalid property value';
rsPropertyDoesNotExist = 'Property %s does not exist';
rsInvalidStreamFormat = 'Invalid stream format';