pascal/lazarus-ccr
1
0
Fork 0
Code Issues Releases Activity

tvplanit: Translatable caption of the print format editor form.

Browse Source 
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@8548 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
wp_xxyyzz
2022-10-12 21:53:10 +00:00
parent a42b9d4515
commit c031477392
2 changed files with 1 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
components/tvplanit/source/vpedfmtlst.pas
View File

@ -47,8 +47,6 @@ uses
VpPrtFmt, VpBase, VpBaseDS, VpPrtPrv, VpException, VpSR;
const
BaseCaption = 'Print Format Designer';
FileCaption = BaseCaption + ' - %s';
UnnamedFile = '<Unnamed>';
type
@ -774,7 +772,7 @@ end;
procedure TfrmPrnFormat.UpdateCaption;
begin
Caption := Format(FileCaption, [FormatFileName]);
Caption := RSPrintFormatDesigner + ' - ' + FormatFileName;
end;
procedure TfrmPrnFormat.UpdateFormats;