Codetools, Cody: cleaned up resourcestrings

git-svn-id: trunk@29663 -
This commit is contained in:
maxim 2011-02-24 21:32:39 +00:00
parent 93bf5b1fca
commit 9a3a773f51
5 changed files with 1 additions and 14 deletions

View File

@ -49,7 +49,6 @@ resourcestring
crsKbytes = 'kbytes';
crsMbytes = 'Mbytes';
crsGbytes = 'Gbytes';
crsBytesVolume = '%s %s';
crsByFpcCfg = 'by fpc.cfg';
crsNoUnitSelected = 'No unit selected';
crsUnit2 = 'Unit: %s';

View File

@ -5,10 +5,6 @@ msgstr "Content-Type: text/plain; charset=UTF-8"
msgid "by fpc.cfg"
msgstr ""
#: codystrconsts.crsbytesvolume
msgid "%s %s"
msgstr ""
#: codystrconsts.crsclose
msgid "&Close"
msgstr ""

View File

@ -13,10 +13,6 @@ msgstr ""
msgid "by fpc.cfg"
msgstr ""
#: codystrconsts.crsbytesvolume
msgid "%s %s"
msgstr ""
#: codystrconsts.crsclose
msgid "&Close"
msgstr ""

View File

@ -13,10 +13,6 @@ msgstr ""
msgid "by fpc.cfg"
msgstr "в fpc.cfg"
#: codystrconsts.crsbytesvolume
msgid "%s %s"
msgstr "%s %s"
#: codystrconsts.crsclose
msgid "&Close"
msgstr "&Закрыть"

View File

@ -611,7 +611,7 @@ begin
Result:=crsGbytes;
b:=b div 1000;
end;
Result:=Format(crsBytesVolume, [IntToStr(b), Result]);
Result:=IntToStr(b)+' '+Result;
end;
function TPPUListDialog.FindUnitInList(AnUnitName: string; List: TStrings