ViktorV wrote: ↑Wed 18 Jul 2018 06:26
To solve the issue, please try to set the property UniConnection.SpecificOptions.Values['UseUnicode'] in True:
UniConnection.SpecificOptions.Values['UseUnicode'] := 'True';
Yes, I set useUnicode option
True.
Test Project code is shown below.
Code: Select all
unit Unit1;
interface
uses
Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics,
Vcl.Controls, Vcl.Forms, Vcl.Dialogs, Data.DB, Vcl.Buttons, Uni, MemDS, DBAccess,
Vcl.Grids, Vcl.DBGrids, UniProvider, MySQLUniProvider;
type
TForm1 = class(TForm)
UniConnection: TUniConnection;
UniTable: TUniTable;
DataSource: TDataSource;
DBGrid1: TDBGrid;
MySQLUniProvider: TMySQLUniProvider;
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form1: TForm1;
implementation
{$R *.dfm}
end.
Code: Select all
object Form1: TForm1
Left = 0
Top = 0
Caption = 'Form1'
ClientHeight = 214
ClientWidth = 335
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
OldCreateOrder = False
PixelsPerInch = 96
TextHeight = 13
object DBGrid1: TDBGrid
Left = 8
Top = 80
Width = 257
Height = 113
DataSource = DataSource
Options = [dgEditing, dgAlwaysShowEditor, dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgConfirmDelete, dgCancelOnExit, dgTitleClick, dgTitleHotTrack]
TabOrder = 0
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -11
TitleFont.Name = 'Tahoma'
TitleFont.Style = []
end
object UniConnection: TUniConnection
ProviderName = 'MySQL'
Database = 'test'
SpecificOptions.Strings = (
'MySQL.UseUnicode=True')
Username = 'root'
Server = 'localhost'
Connected = True
LoginPrompt = False
Left = 32
Top = 16
EncryptedPassword = 'CEFFCDFFCCFFCBFF'
end
object UniTable: TUniTable
TableName = 'table1'
Connection = UniConnection
Active = True
Left = 104
Top = 16
end
object DataSource: TDataSource
DataSet = UniTable
Left = 168
Top = 16
end
object MySQLUniProvider: TMySQLUniProvider
Left = 248
Top = 16
end
end