anchor.diff:      { private declarations }
       procedure SetIsDoubleBuffered(AValue: boolean);
       procedure EditCheckInput(Sender: TObject; AChar: WideChar; var AllowInput: boolean);
  +    procedure DoLocalize;
     public
       { public declarations }
       procedure Localize;
  
positive.code: 
    UpdateFormOnTop(Self);
  
    with TIniFile.Create(AppFile_Language) do
    try
      STitle:= ReadString('d_f', 'go_', 'Go to');
    finally
      Free
    end;
  
    STitle:= STitle+' '+
      Format(msgGotoDialogTooltip, [msgGotoDialogInfoExt]);
  
    if UiOps.ShowMenuDialogsWithBorder then
    begin
      BorderStyle:= bsDialog;
      Caption:= STitle;
      plCaption.Hide;
    end
    else
    begin
      plCaption.Caption:= STitle;
    end;
  
    ClientHeight:=
  
negative.code:   end;
  end;
  
  procedure TfmGoto.DoLocalize;
  var
    STitle: string;
  begin
    with TIniFile.Create(AppFile_Language) do
    try
      STitle:= ReadString('d_f', 'go_', 'Go to');
    finally
      Free
    end;
  
    STitle:= STitle+' '+
      Format(msgGotoDialogTooltip, [msgGotoDialogInfoExt]);
  
    Caption:= STitle;
    plCaption.Caption:= STitle;
  end;
  
  procedure TfmGoto.FormShow(Sender: TObject);
  begin
    plCaption.Height:= ATEditorScale(26);
    edInput.Height:= ATEditorScale(UiOps.InputHeight);
  