Не за что.
Маленькое уточнение - это хорошо работает только если один монитор. Вообще правильнее эмулировать максимизацию окна следующим образом:
SetBounds(Screen.DisplayFromRect(Bounds).WorkAreaRect);
Ошибка "Type mismatch" означает несоответствие типов.
Либо фильтр неправильно настроен, либо поле имеет другой тип.
Если поле всетаки строковое - посмотрите тип поля (String/WideString) и кодировку, если указана.
Посмотрите также, что возвращает источник данных (query или что у вас источником является) по по этому полю.
PS еще можно писать так:
Child.Filter := 'CHILDFAM=' + s.QuotedString;