diff --git a/components/tvplanit/source/vpedfmtlst.lfm b/components/tvplanit/source/vpedfmtlst.lfm index 83b2b76b5..0f2ccadc7 100644 --- a/components/tvplanit/source/vpedfmtlst.lfm +++ b/components/tvplanit/source/vpedfmtlst.lfm @@ -10,7 +10,6 @@ object frmPrnFormat: TfrmPrnFormat OnCreate = FormCreate OnShow = FormShow Position = poScreenCenter - LCLVersion = '2.3.0.0' object LblFormats: TLabel AnchorSideLeft.Control = Owner AnchorSideTop.Control = Owner diff --git a/components/tvplanit/source/vpedfmtlst.pas b/components/tvplanit/source/vpedfmtlst.pas index 3b7284e1a..5e97b560a 100644 --- a/components/tvplanit/source/vpedfmtlst.pas +++ b/components/tvplanit/source/vpedfmtlst.pas @@ -47,8 +47,6 @@ uses VpPrtFmt, VpBase, VpBaseDS, VpPrtPrv, VpException, VpSR; const - BaseCaption = 'Print Format Designer'; - FileCaption = BaseCaption + ' - %s'; UnnamedFile = ''; type @@ -774,7 +772,7 @@ end; procedure TfrmPrnFormat.UpdateCaption; begin - Caption := Format(FileCaption, [FormatFileName]); + Caption := RSPrintFormatDesigner + ' - ' + FormatFileName; end; procedure TfrmPrnFormat.UpdateFormats;