ADOQuery error,delete record

Hi i made the above query in BCB 6 but when i run my application brings me an error in params


ADOQuery1->Close();
ADOQuery1->SQL->Clear();
Edit4->Text=InputBox("Name","Search:","");

ADOQuery1->SQL->Add("DELETE FROM Charl WHERE PictureName='"+Edit4->Text+"'");

ADOQuery1->Params->Items[0]->AsString= ADODataSet1->FieldByName("Leite")->AsString;
ADOQuery1->Prepared=true;
ADOQuery1->ExecSQL();

ADODataSet1->Refresh();

what is wrong???

What line? what is exact the error message
Have you checked all names used like
Charl
PictureName
Leite

Do you have the table, column and field with these names?

Yes thats the table and the errors i got one in ADOQuery->Parameters say that its no right...If i leave that outside the code then my application run the query but brings me an error that say "Value of key on this record havechange or deleted in place that record saved"
The strange thing is that when i press ok in error the query delete the record as i want...