could not convert variant of type OleStr into type Boolean
void filtration(TTable *Table,TEdit *Edit,AnsiString Str)
{
Table->FilterOptions << foCaseInsensitive;
if (Edit->Text == "")
{
Table->Filtered = false;
}
else
{
Table->Filtered = true;
}
Table->Filter = Str+"='"+Edit->Text+"*'";
}
Пробовал задавать фильтр таким образом:
Table->Filter = Str+"='"+Edit->Text.ToInt()+"'";
при вводе цифр в поле Edit фильтр работает, но как только стереть все что написал, появляется такая же ошибка.
Вызов функции:
filtration(mk_oborud,Edit3,"Year_vipusk");
Заранее Спасибо за помощь.
Сообщение отредактировано: ninja -