Здравствуйте, mailo, Вы писали:
M>unit Unit1;
...
M>procedure TForm1.Button4Click(Sender: TObject);
M> var id: string;
M>begin
M> DBGrid1.SelectedIndex:=0;
M> id:=DBGrid1.SelectedField.Text;
M> datamodule2.IBQuery1.SQL.Clear;
M> datamodule2.IBQuery1.SQL.Add('DELETE FROM BAZA ');
M> datamodule2.IBQuery1.SQL.Add('WHERE ID = id');
// вот здесь:
// это условие 'WHERE ID = id' означает: удалить записи, у которых поле ID равно самому себе
// очевидно, имелось ввиду 'WHERE ID = :id'
// ну и не забыть присвоить значение параметра
...
Евгений
