SQL ile kritere gore kayit silme

[blackbird]

Bir veritabanı tablosundaki ornegin yasi 21 olanlarin hepsini sorgu kullanarak bir anda silmek istiyorum. bunun için nasıl bir sorgu yazmam gerekir?
delphi'de TQuery'yi kullanarak aşağıdaki kodu yazıp çalıştırıyorum:

yas := baskabirtablodanokunanyasdegeri
with Query1 do begin
SQL.Clear;
SQL.Add(Format('DELETE FROM Kisiler WHERE Yas=', [yas]));
Open;
end;

Programı çalıştırdığımda kursörün konumlandırılamadığına söyleyen bir hata veriyor. Nasıl yapılır?

[Hard`n`Dark]

Open yerine ExecSql ile denedin mi?

with Query1 do begin
Close;
SQL.Clear;
SQL.Add('DELETE FROM Kisiler WHERE Yas=:Yas');
ParamByName('Yas').AsInteger := yas;
ExecSql;
end;

[nesli51]

arkadaşım query için kullanılan open fonksiyonu sadece 'select ...' komutu için gerekli diğer işlemler için execsql kullanmalısın