Приветствую ещё раз уважаемых участников...

не могу справиться с проблемой...

Вот процедура на вставку в таблицу новой записи (транзакция уже Active):

procedure TForm2.Button3Click(Sender: TObject);
begin
try
if not DataModule2.IBTable1.Active then DataModule2.IBTable1.Open;
with DataModule2 do
begin
IBTable1.Insert;
IBTable1.FieldByName('CIDNT').AsInteger := StrToInt(Edit1.Text);
IBTable1.FieldByName('CADDRESS').AsString := Edit2.Text;
IBTable1.FieldByName('CTYPE').AsString := Edit3.Text;
IBTable1.FieldByName('CSIDE').AsString := Edit4.Text;
IBTable1.FieldByName('CPHOTO').AsString := Edit5.Text;
IBTable1.FieldByName('CTENANT').AsString := Edit6.Text;
IBTable1.FieldByName('RENTFROM').AsDateTime := DateTimePicker1.Date;
IBTable1.FieldByName('RENTUNTIL').AsDateTime := DateTimePicker2.Date;
IBTable1.FieldByName('RAUTHOR').AsString := Edit7.Text;
IBTable1.Post;
IBTransaction2.Commit;
end;
except
DataModule2.IBTransaction2.Rollback;
raise;
end;
end;

Всё.. запускаю программу... заполняю поля... нажимаю тот самый Button3 = на получай ошибку:

"arithmetic exception, numeric overflow, or string truncation Cannot transliterate between character sets"

((( Кодировка базы win1251 )))

Заполняя поля - всё соблюдаю... макс. длину... все ...все... вроде


ПОмогите, подскажите - кто знает... месяцок уж борюсь

1. Если методом исключения - то ругаеться если вводить в поля типа CHAR - буквы кирилицы (латиницу заносит без проблем)... а нужно кирилицу

2. Взял-ка я IB Expert и попробовал изменить все CHAR домены моей таблицы = изменил кодировку с WIN1251 на NONE... и врегистрационной информации базы также изменил с WIN1251 на NONE... странно, но работает... и русский вносит теперь...

Ура конечно, но все равно странно...

причем попробовал вначале домены поменять на другие кодировки... заработало только на NONE... интересно... а как же тогда WIN1251...

ааааа.... и ещё... (кстати)...

а может быть попробовать (но как?) указать в параметрах Params компонента TIBDatabase (там где и user_name/password) кодировку для подключения?