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

Minor: fix code indentation

Browse Source
This commit is contained in:
Ansgar Becker
2009-08-29 06:21:27 +00:00
parent a2ef629b81
commit 4dc6ec2423
1 changed files with 2 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
source/main.pas
View File

@ -6869,12 +6869,12 @@ begin
Databases.Clear; Databases.Clear;
DatabasesWanted := Explode(';', comboOnlyDBs.Text); DatabasesWanted := Explode(';', comboOnlyDBs.Text);
if DatabasesWanted.Count > 0 then begin if DatabasesWanted.Count > 0 then begin
// Add wanted dbs by comparing strings // Add wanted dbs by comparing strings
for i:=0 to AllDatabases.Count-1 do begin for i:=0 to AllDatabases.Count-1 do begin
if DatabasesWanted.IndexOf(AllDatabases[i]) > -1 then if DatabasesWanted.IndexOf(AllDatabases[i]) > -1 then
Databases.Add(AllDatabases[i]); Databases.Add(AllDatabases[i]);
end; end;
// Add dbs by regular expression, avoiding duplicates // Add dbs by regular expression, avoiding duplicates
rx := TRegExpr.Create; rx := TRegExpr.Create;
for i:=0 to DatabasesWanted.Count-1 do begin for i:=0 to DatabasesWanted.Count-1 do begin
rx.Expression := '^'+DatabasesWanted[i]+'$'; rx.Expression := '^'+DatabasesWanted[i]+'$';