dbExpress Delphi XE2 и русские буквы

Я начал работать с dbExpress и Xe2. Теперь у меня проблемы с русским текстом, у меня есть "????????????" вместо букв.Вот структура: В таблицу я сам ввел русский текст. В то время как я Quering, у меня есть что-то вроде этого:

var
  Connection: TSQLConnection;
  Qry: TSQLQuery;
  VersionString: String;
  i:Integer;
begin
  Result:=False;
  Connection := TSQLConnection.Create(nil);
  Connection.DriverName := 'MySQL';
  Connection.GetDriverFunc := 'getSQLDriverMYSQL';
  Connection.LibraryName := 'dbxmys.dll';
  Connection.VendorLib := 'libmysql.dll';
  Connection.LoginPrompt:=False;
  Connection.Params.Values['Database']:=dbName;
  Connection.Params.Values['User_Name']:=dbUser;
  Connection.Params.Values['Password']:=dbPass;
  Connection.Params.Values['HostName']:=dbHost;

  Qry := TSQLQuery.Create(nil);
  Qry.SQLConnection := Connection;

  Qry.SQL.Text := 'SELECT * FROM `scan_values` WHERE `city`='''+City+''' AND `type` ='''+Gtype+''';';
  Qry.Open();
  while not Qry.Eof do
  begin
    ComboBoxDestination.Items.Add(Qry.Fields[6].AsString);
    Qry.Next;
  end;
  Result:=true;
  Qry.Close;
  Connection.Free;
end;

Что я делаю неправильно?

1 ответ

  Connection.Params.Values['CharacterSet']:='utf8';
  Connection.Params.Values['Names']:='utf8';
  Connection.Params.Values['ServerCharSet']:='utf8';

Это помогает мне... ПОЧЕМУ РАЗРАБОТЧИКИ НЕ СДЕЛАЮТ РУКОВОДСТВО \ РУКОВОДСТВО ПО ЭТОМУ??? Только Рэндом помогает мне...

Другие вопросы по тегам