Удалить строку по id ключу...

[Tatiana_91]

Доброго времени суток! Подскажите как переделать функцию

void __fastcall TForm1::udalit1(TADTable *ADTable)
{
 String table1, table_id1;
 int id1;
 ADQuery6->SQL->Clear();
 table1=ADTable->TableName; //имя таблицы
 table_id1=ADTable6->FieldDefs->Items[0]->Name;//имя ключа
//(работает только если ключ – первое поле в таблице)
 id1=ADTable->Fields->Fields[0]->AsInteger;//значение 1-го поля в таблице
 ADQuery6->SQL->Append("delete from " + table1);
 ADQuery6->SQL->Append( "where " + table_id1 + " = " + IntToStr(id1));
 ADQuery6->ExecSQL();
 ADQuery6->SQL->Clear();
 ADTable->Refresh();
}

Эта функция работает только для первого поля в таблице, а мне нужно чтобы удалялась запись по значению id ключа, который я ввожу в Edit.

[Stilet]

ADQuery6->SQL->Append( "where " + table_id1 + " = " + IntToStr(id1));

Замени на

 ADQuery6->SQL->Append( "where " + table_id1 + " = " + Edit1->Text);

где Edit1 - твой Эдит.

[Tatiana_91]

Спасибо за помощь!!!

[alan303]

И у меня такая же проблема была