UPD: move translateItemConfig() from ucocoamodernformconfig_editor to ucocoamodernformconfig

This commit is contained in:
rich2014 2026-05-18 11:47:41 +08:00
commit 79ccbfddb3
2 changed files with 12 additions and 12 deletions

View file

@ -22,6 +22,18 @@ procedure initCocoaModernFormConfig;
implementation
procedure translateItemConfig(
const poFile: TPOFile;
const identifier: String;
var item: TCocoaConfigToolBarItemWithUI );
var
s: String;
begin
s:= poFile.Translate( identifier, item.tips );
item.title:= s;
item.tips:= s;
end;
function shortCutToMacOSName( const shortCutString: String ): String;
begin
Result:= shortCutString.Replace( 'Cmd+', 'Command+' );

View file

@ -174,18 +174,6 @@ const
);
procedure translateItemConfig(
const poFile: TPOFile;
const identifier: String;
var item: TCocoaConfigToolBarItemWithUI );
var
s: String;
begin
s:= poFile.Translate( identifier, item.tips );
item.title:= s;
item.tips:= s;
end;
procedure translateEditorFormToolbarItem;
var
poFile: TPOFile;