Ошибка TSQLDataset при миграции из delphi 7 в delphi XE4

Question

У меня есть TSQLDataSet в приложении Delphi 7. Он извлекает 2 поля (ID и Name) из таблицы MyTable.

object SQLDataSet: TSQLDataSet 
    GetMetadata = False 
    CommandText = 'select * from MyTable' 
    MaxBlobSize = -1 
    Params = <> 
    SQLConnection = mySQLConnection 

    object SQLDataSetID: TIntegerField 
     FieldName = 'ID' 
     ProviderFlags = [pfInUpdate, pfInWhere, pfInKey] 
     Required = True 
    end 
    object SQLDataSetNAME: TStringField 
     FieldName = 'NAME' 
     Required = True 
     Size = 50 
    end 
end 

Когда я мигрировал в Delphi xe4, я получаю следующее сообщение об ошибке:

class EDatabaseError with message 'SQLDataSet: Type mismatch for field 'NAME', expecting: String actual:WideString' 

Что может быть возможной причиной этой проблемы и как я должен избавиться от него?

Примечание: Я использую firebird 2.5.2.

Answer 1

Изменение TStringField к TWideTStringfield

object SQLDataSet: TSQLDataSet 
    GetMetadata = False 
    CommandText = 'select * from MyTable' 
    MaxBlobSize = -1 
    Params = <> 
    SQLConnection = mySQLConnection 

    object SQLDataSetID: TIntegerField 
     FieldName = 'ID' 
     ProviderFlags = [pfInUpdate, pfInWhere, pfInKey] 
     Required = True 
    end 
    object SQLDataSetNAME: **TWideStringField** 
     FieldName = 'NAME' 
     Required = True 
     Size = 50 
    end 
end