Fix compiler error from rev 1194

This commit is contained in:
Ansgar Becker
2008-02-06 06:51:57 +00:00
parent 4e23728aa2
commit 84dc50b9bd

View File

@ -1224,7 +1224,7 @@ begin
begin
MysqlParams.Protocol := 'mysql';
MysqlParams.Host := Trim( parHost );
MysqlParams.Port := StrToIntDef(parPort, MYSQL_PORT);
MysqlParams.Port := StrToIntDef(parPort, DEFAULT_PORT);
MysqlParams.Database := '';
MysqlParams.User := parUser;
MysqlParams.Pass := parPass;