Непонятки с кодировкой

[ryabis]

CodeGear Delphi 2007 for Win32 + MySQL 5.0.51

Подключаюсь к базе через TSQLConnection.
Когда пытаюсь добавить в поле типа VARCHAR запись на русском

qry.SQL.Add('insert into dctree (id, id_parent, object_type, object_name) values (1, 2, 3, "про");');

Выдаёт ошибку

Incorrect string value: '\xEF\xEY\xEE' for column 'object_type' at row 1.

Если перед этим выполнить запрос

qry.SQL.Add('SET NAMES CP1251;');

Все проходит замечательно, но хотелось бы без него.
Как сие сделать?