Fix redundant "USE xyz" queries firing before each query while working in a database with weird characters in its name.

This commit is contained in:
Ansgar Becker
2008-08-19 22:02:26 +00:00
parent b56690886b
commit 03550f32a0
2 changed files with 4 additions and 4 deletions

View File

@ -112,7 +112,7 @@ type
FProtocol: string; FProtocol: string;
FHostName: string; FHostName: string;
FPort: Integer; FPort: Integer;
FDatabase: string; FDatabase: WideString;
FUser: string; FUser: string;
FPassword: string; FPassword: string;
FCatalog: string; FCatalog: string;
@ -218,7 +218,7 @@ type
property Protocol: string read FProtocol write FProtocol; property Protocol: string read FProtocol write FProtocol;
property HostName: string read FHostName write FHostName; property HostName: string read FHostName write FHostName;
property Port: Integer read FPort write FPort default 0; property Port: Integer read FPort write FPort default 0;
property Database: string read FDatabase write FDatabase; property Database: WideString read FDatabase write FDatabase;
property User: string read FUser write FUser; property User: string read FUser write FUser;
property Password: string read FPassword write FPassword; property Password: string read FPassword write FPassword;
property Catalog: string read FCatalog write FCatalog; property Catalog: string read FCatalog write FCatalog;

View File

@ -21,8 +21,8 @@ type
// Mysql protocol-relevant connection parameter structure // Mysql protocol-relevant connection parameter structure
TMysqlConnParams = record TMysqlConnParams = record
Host, Host: String;
Database, Database: WideString;
Protocol, Protocol,
User, User,
Pass : String; Pass : String;