BDGrid и ADO (Удаление строк)

[Psayker]

Мне нужно удалить строку из DBGrid и собственно из самой базы. Копку удаления сделал, код написал, но строка как была в гриде,так там и осталась. Вот код:

void __fastcall TForm5::Button2Click(TObject *Sender)
{
try {
Form1->ADOCommand1->CommandText="delete from [Курсовая].[dbo].[Клиент] where [Код клиента]=:id";
Form1->ADOCommand1->Parameters->ParamByName("id")->Value=ADOQuery1->FieldByName("Код клиента")->AsString;
Form1->ADOCommand1->Execute();
ADOQuery1->Active=false;
ADOQuery1->Active=true;
} catch (...) {ShowMessage("Данную запись нельзя удалить!");
}

Помогите пожалуйста, в чём тут ошибка?

[Krok27]

Может сначала id надо получить?

Form1->ADOCommand1->Parameters->ParamByName("id")->Value=ADOQuery1->FieldByName("Код клиента")->AsString;
Form1->ADOCommand1->CommandText="delete from [Курсовая].[dbo].[Клиент] where [Код клиента]=:id";

Еще вместо

ADOQuery1->Active=false;
ADOQuery1->Active=true;

можно

ADOQuery1->Refresh();

[Psayker]

Сообщение от Krok27

Может сначала id надо получить?

Form1->ADOCommand1->Parameters->ParamByName("id")->Value=ADOQuery1->FieldByName("Код клиента")->AsString;
Form1->ADOCommand1->CommandText="delete from [Курсовая].[dbo].[Клиент] where [Код клиента]=:id";

нет,тогда он переменную id не видит