Удаление множества строк

[Sinker]

Такая проблемка возникла...
Есть таблица с проверками, в которой столбцы: что проверялось, когда, кем и недостатки. Недостатков соответственно для каждой проверки несколько, я сделал так что для одной проверки у меня создаеться столько строк, сколько недостатков(строка дублируеться полностью кроме столбца недостатки)...выводиться таблица в ДБГрид, показываться все столбцы кроме недостатков и скрываю дублированные строки. Но как мне сделать, что бы при выделении в ДБгриде проверки и нажатии на кнопку удаления проверки...удалялись все дублированные записи по этой проверке?
Вот такая беда
Помогите кто сможет....

[vovk]

Если подскажете
1) Какую БД используете
2) какими компонентами пользуетесь для доступа
То возможно ответить станет легче

[Neobrat]

DELETE FROM table WHERE что проверялось = что проверялось AND когда=когда AND кем=кем

[Sinker]

1) Использую Access
2) ADOQuery, DataSourse, DBGrid

[vovk]

тогда прекрастно подходит то что предложил Neobrat

[Sinker]

Сделал все как сказали....не работает...видимо где то тупанул, не подскажете где????
adoquery1.SQL.Text:='DELETE FROM proverka WHERE prover_organ =' +pdjxpdbgrid1.DataSource.DataSet.Fi eldValues['prover_organ'].AsString+' AND data='+pdjxpdbgrid1.DataSource.Data Set.FieldValues['data'].AsString+' AND fio_prover='+pdjxpdbgrid1.DataSourc e.DataSet.FieldValues['fio_prover'].AsString;

[soleil@mmc]

просто недостаточно кавычек для выделения подставляемых значений - но это геморой сплошной их проставлять каждый раз
лучше всего юзать параметры
по типу

adoquery1.SQL.Text:='
DELETE FROM proverka 
WHERE prover_organ = :p0 
    AND data= :p1
    AND fio_prover= :p2';

и далее подставляешь параметры

adoquery1.ParamByName('p0').AsString := pdjxpdbgrid1.DataSource.DataSet.FieldValues['prover_organ'].AsString;
adoquery1.ParamByName('p1').AsString := pdjxpdbgrid1.DataSource.DataSet.FieldValues ['data'].AsString;
adoquery1.ParamByName('p2').AsString := pdjxpdbgrid1.DataSource.DataSet.Field Values['fio_prover'].AsString;

[Sinker]

У меня ошибку выдает на adoquery1.ParamByName('p0').AsStrin g, говорит что не знает что это такое =(((

[Sinker]

Вообщем с ParamByName понял...но все равно ничего не работает
вот листинг....

adoquery1.SQL.Clear;
adoquery1.SQL.Text:='DELETE FROM proverka WHERE prover_organ = 0 AND data= 1 AND fio_prover= 2';
adoquery1.Parameters.ParamByName('p 0').Value := pdjxpdbgrid1.DataSource.DataSet.Fie ldValues['prover_organ'];
adoquery1.Parameters.ParamByName('p 1').Value := pdjxpdbgrid1.DataSource.DataSet.Fie ldValues ['data'].AsString;
adoquery1.Parameters.ParamByName('p 2').Value := pdjxpdbgrid1.DataSource.DataSet.Fie ldValues['fio_prover'].AsString;
adoquery1.ExecSQL;

Выдает ошибку:"Invalid variant operation"

Что делать?

[Sinker]

это : р параметр