DBNavigator中把insert变为append

procedure TForm1.DBNavigator1Click(Sender: TObject; Button: TNavigateBtn);
begin
    if Button = nbInsert then
    begin
    Table1.Append;
    abort;
    end
end;

或者:

procedure TForm1.DBNavigator1Click(Sender: TObject; Button: TNavigateBtn);
begin
    if Button = nbInsert then begin
    Query1.Cancel;
    Query1.Append;
    end;
end;

郑重声明:本站内容如果来自互联网及其他传播媒体,其版权均属原媒体及文章作者所有。转载目的在于传递更多信息及用于网络分享,并不代表本站赞同其观点和对其真实性负责,也不构成任何其他建议。