Василий

while ValueListEditor1.Strings.Count > 0 do
ValueListEditor1.DeleteRow(ValueListEditor1.Row);
присмотритесь к этому участку кода,
"если лень разбираться, код работает, и лишь докучает сообщением об ошибке,
заверните его в try exception "
-пособие быдлокодера

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