opensource/HeidiSQL
1
0
Fork 0
mirror of https://github.com/HeidiSQL/HeidiSQL.git synced 2025-08-06 18:24:26 +08:00
Code Issues Packages Projects Releases Wiki Activity

Implement connecting via named pipe. Code contributed by gabylastar, minor modifications by me. Fixes issue #520.

Browse Source
This commit is contained in:
Ansgar Becker
2009-08-08 19:06:41 +00:00
parent 62dbda76ff
commit 0e341f19cb
21 changed files with 199 additions and 80 deletions
Download Patch File Download Diff File Expand all files Collapse all files

9
source/mysqlquerythread.pas
View File

@ -21,6 +21,7 @@ type
// Mysql protocol-relevant connection parameter structure
TMysqlConnParams = record
NetType: Integer;
Host: String;
Database: WideString;
Protocol,
@ -117,7 +118,13 @@ begin
FResult := 0;
FSql := ASql;
mc.HostName := AConn.MysqlParams.Host;
if AConn.MysqlParams.NetType = NETTYPE_TCPIP then begin
mc.HostName := AConn.MysqlParams.Host;
mc.SocketName := '';
end else begin
mc.HostName := '.';
mc.SocketName := AConn.MysqlParams.Host;
end;
mc.Database := AConn.MysqlParams.Database;
mc.User := AConn.MysqlParams.User;
mc.Password := AConn.MysqlParams.Pass;