اين مثال هم بد نيست
کد:ADOQuery1.Close;
ADOQuery1.Parameters.Clear;
ADOQuery1.Parameters.CreateParameter('paramName', ftString,
pdInput,100,Edit1.Text);
ADOQuery1.SQL.Text := 'SELECT * FROM MyTable WHERE Name = :ParamName';
ADOQuery1.Prepared := True;
ADOQuery1.Open;