有谁更改过TNavigator上的显示文本，请教！

在DBCtrls.pas中找到procedure TDBNavigator.InitButtons;
改为：
var DBNavBtnCaptions:Array[TNavigateBtn] of String=(
    '第一条',
    '上一记录',
    '下一记录',
    '末记录',
    '插入记录',
    '删除记录',
    '编辑',
    '确认修改',
    '取消修改',
    '刷新显示');procedure TDBNavigator.InitButtons;
var
  I: TNavigateBtn;
  Btn: TNavButton;
  X: Integer;
  ResName: string;
begin
  MinBtnSize := Point(20, 18);
  X := 0;
  for I := Low(Buttons) to High(Buttons) do
  begin
    Btn := TNavButton.Create (Self);
    Btn.Flat := Flat;
    Btn.Index := I;
    Btn.Visible := I in FVisibleButtons;
    Btn.Enabled := True;
    Btn.SetBounds (X, 0, MinBtnSize.X, MinBtnSize.Y);
    FmtStr(ResName, 'dbn_%s', [BtnTypeName[I]]);
    //Btn.Glyph.LoadFromResourceName(HInstance, ResName);
    Btn.Caption:=DBNavBtnCaptions[I];
    Btn.NumGlyphs := 2;
    Btn.Enabled := False;
    Btn.Enabled := True;
    Btn.OnClick := ClickHandler;
    Btn.OnMouseDown := BtnMouseDown;
    Btn.Parent := Self;
    Buttons[I] := Btn;
    X := X + MinBtnSize.X;
  end;
  Buttons[nbPrior].NavStyle := Buttons[nbPrior].NavStyle + [nsAllowTimer];
  Buttons[nbNext].NavStyle  := Buttons[nbNext].NavStyle + [nsAllowTimer];
end;将之存到你自己的应用程序文件夹下或LIB文件夹下
第一种方案只对你当前程序有效，第二种则对你所有的应用程序都有效
注意：效果只有在程序运行时才有效，若你想在IDE环境下就有效，重新安装TDBNav...