From ad97c29f1ff0a56a059b39b9f8834bc0e00307d5 Mon Sep 17 00:00:00 2001 From: Maxim Ganetsky Date: Tue, 1 Jul 2025 18:03:37 +0300 Subject: [PATCH] IDEIntf: made TListPropertyEditor.GetValue ouptut i18n-friendly --- components/ideintf/objinspstrconsts.pas | 3 +-- components/ideintf/propedits.pp | 8 +------- 2 files changed, 2 insertions(+), 9 deletions(-) diff --git a/components/ideintf/objinspstrconsts.pas b/components/ideintf/objinspstrconsts.pas index cf1c4092e1..50fbb8cbe6 100644 --- a/components/ideintf/objinspstrconsts.pas +++ b/components/ideintf/objinspstrconsts.pas @@ -16,8 +16,7 @@ resourcestring oisObjectInspector = 'Object Inspector'; oisError = 'Error'; oisMixed = '(Mixed)'; - oisItems = '%s items'; - ois1Item = '1 item'; + oisItems = 'items: %s'; oisItemsSelected = '%u items selected'; //oiscAdd = '&Add'; oiscDelete = 'Delete?'; diff --git a/components/ideintf/propedits.pp b/components/ideintf/propedits.pp index 20fc427b48..6fd7b9f9cd 100644 --- a/components/ideintf/propedits.pp +++ b/components/ideintf/propedits.pp @@ -5257,14 +5257,8 @@ begin end; function TListPropertyEditor.GetValue: AnsiString; -var - ElementCount: integer; begin - ElementCount:=GetElementCount; - if ElementCount<>1 then - Result:=Format(oisItems, [IntToStr(GetElementCount)]) - else - Result:=ois1Item; + Result:=Format(oisItems, [IntToStr(GetElementCount)]) end; procedure TListPropertyEditor.Initialize;