opensource/HeidiSQL
1
0
Fork 0
mirror of https://github.com/HeidiSQL/HeidiSQL.git synced 2026-03-13 09:24:25 +08:00
Code Issues Packages Projects Releases Wiki Activity

Trim database names when passed as semicolon separated list. See http://www.heidisql.com/forum.php?t=21505

Browse Source
This commit is contained in:
Ansgar Becker
2016-06-07 18:10:38 +00:00
parent 3641a180e4
commit 45d74f2a0e
1 changed files with 4 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
source/dbconnection.pas
View File

@@ -3293,6 +3293,7 @@ end;
function TDBConnection.GetAllDatabases: TStringList;
var
rx: TRegExpr;
dbname: String;
begin
// Get user passed delimited list
if not Assigned(FAllDatabases) then begin
@@ -3303,8 +3304,9 @@ begin
rx.ModifierG := True;
if rx.Exec(FParameters.AllDatabasesStr) then while true do begin
// Add if not a duplicate
if FAllDatabases.IndexOf(rx.Match[0]) = -1 then
FAllDatabases.Add(rx.Match[0]);
dbname := Trim(rx.Match[0]);
if FAllDatabases.IndexOf(dbname) = -1 then
FAllDatabases.Add(dbname);
if not rx.ExecNext then
break;
end;