SP_GET_CONTACTS - TUniStoredProc.
База Firebird 3, кодировка по умолчанию UTF-8.
Код: Выделить всё
SP_GET_CONTACTS.StoredProcName := 'SP_GET_CONTACTS';
SP_GET_CONTACTS.SQL.Text := 'SELECT RES FROM SP_GET_CONTACTS(:ID_USER_VAR, :ID_OBJ_VAR, :ST_VAR, :ID_TELEGRAM_VAR)';
SP_GET_CONTACTS.PrepareSQL;
SP_GET_CONTACTS.Params[0].Clear;
SP_GET_CONTACTS.Params[1].AsInteger := id_obj;
SP_GET_CONTACTS.Params[2].AsInteger := supertype;
SP_GET_CONTACTS.Params[3].AsLargeInt := id_telegram;
try
SP_GET_CONTACTS.ExecProc;
//ошибка здесь
result := SP_GET_CONTACTS.ParamByName('RES').AsString;
finally
SP_GET_CONTACTS.Close;
end;
Delphi Tokyo.Project raised exception class EIBCError with message 'Dynamic SQL Error
SQL error code = -303
conversion error from string "
*Ответств. агент: 7770777*"'.
В настройках подключения есть: Character Set=UTF8;Use Unicode=True