dbExpress Delphi XE2和俄文字母

时间:2014-03-19 19:51:13

标签: database delphi delphi-xe2 dbexpress

我开始使用dbExpress和Xe2。 现在我有俄语文本的麻烦,我有一个“?????????????”而不是字母。 enter image description here 这是结构: 在表中,我自己输入俄语文本。在我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 个答案:

答案 0 :(得分:-1)

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

它帮助我...为什么开发人员不做手动\指导这个???只有随机帮我...