[listerine]

Народ пожалуйста помогите!
Суть проблемы.
В поле Edit, в моей программе я копирую текстовые данные из Clipboard. При изменение буфера, данные проверяются на формат и если текст то переносятся. Далее происходит фильтрация ADOTable, вот код:

Код:

     ADOCatalog.Filtered:=false;
     ADOCatalog.Filter:='Товар LIKE '+#39+Trim(Edit1.Text)+#39;
     ADOCatalog.Filtered:=true;

Копирую в основном из браузера. И если скопировать текст, который является ссылкой, то вылетает ошибка:
could not convert variant of type (null) into type (double)
(стоит отметить что это происходит не всегда, и связи я пока не нашел)
я так понимаю что я из пустоты пытаюсь сделать Double.
Ошибка вылетает на строчке:

Код:

ADOCatalog.Filtered:=true;

Собственно в Edit текст есть и он всегда добавляется нормально.
А теперь самое по моему мнению интересное.
Если в Edit(в него уже скопирован буфер) добавить еще символ любой, то все работает, а если его обратно удалить нет. Создается такое впечатление что он(Edit) якобы пустой, но это не так! Банально выводил его через showmessage до и после фильтрации все ок. ПОМОГИТЕ!