Как остановить автодобавление из DBGrid?

Материал из DRKB

Как остановить автодобавление из DBGrid?[править | править код]

Добавьте в событие "BeforeInsert" Вашего TTables следующие строки:

procedure TForm1.Tbable1BeforeInsert(DataSet: TDataset);
begin
  Abort;
end;


ИЛИ

procedure TForm8.DBGrid1KeyDown(Sender: TObject; var Key: Word; Shift: TShiftState);
begin
  if (Key = VK_DOWN) then
  begin
    TTable1.DisableControls();
    TTable1Next();
    if TTable1.EOF then
      Key := 0
    else
      TTable1.Prior();
    TTable1.EnableControls();
  end ;
end;



Source: Взято из http://forum.sources.ru
ID: 03015