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

Fix GridToXYZ actions for query grid - warned about a missing unique key although the query grid does no delayed loading. (Broken in r2236)

Browse Source
This commit is contained in:
Ansgar Becker
2009-02-16 19:22:46 +00:00
parent 3d44b6715f
commit c726dddd4a
1 changed files with 4 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

8
source/helpers.pas
View File

@ -793,7 +793,7 @@ var
begin begin
// Check for unique key in DataGrid here instead of doing that indirectly // Check for unique key in DataGrid here instead of doing that indirectly
// by EnsureFullWidth in the loop below // by EnsureFullWidth in the loop below
if not Mainform.CheckUniqueKeyClause then if (Grid = Mainform.DataGrid) and (not Mainform.CheckUniqueKeyClause) then
Exit; Exit;
MaxSize := GetRegValue(REGNAME_COPYMAXSIZE, DEFAULT_COPYMAXSIZE) * SIZE_MB; MaxSize := GetRegValue(REGNAME_COPYMAXSIZE, DEFAULT_COPYMAXSIZE) * SIZE_MB;
@ -916,7 +916,7 @@ var
begin begin
// Check for unique key in DataGrid here instead of doing that indirectly // Check for unique key in DataGrid here instead of doing that indirectly
// by EnsureFullWidth in the loop below // by EnsureFullWidth in the loop below
if not Mainform.CheckUniqueKeyClause then if (Grid = Mainform.DataGrid) and (not Mainform.CheckUniqueKeyClause) then
Exit; Exit;
separator := esc2ascii(separator); separator := esc2ascii(separator);
@ -1002,7 +1002,7 @@ var
begin begin
// Check for unique key in DataGrid here instead of doing that indirectly // Check for unique key in DataGrid here instead of doing that indirectly
// by EnsureFullWidth in the loop below // by EnsureFullWidth in the loop below
if not Mainform.CheckUniqueKeyClause then if (Grid = Mainform.DataGrid) and (not Mainform.CheckUniqueKeyClause) then
Exit; Exit;
MaxSize := GetRegValue(REGNAME_COPYMAXSIZE, DEFAULT_COPYMAXSIZE) * SIZE_MB; MaxSize := GetRegValue(REGNAME_COPYMAXSIZE, DEFAULT_COPYMAXSIZE) * SIZE_MB;
@ -1078,7 +1078,7 @@ var
begin begin
// Check for unique key in DataGrid here instead of doing that indirectly // Check for unique key in DataGrid here instead of doing that indirectly
// by EnsureFullWidth in the loop below // by EnsureFullWidth in the loop below
if not Mainform.CheckUniqueKeyClause then if (Grid = Mainform.DataGrid) and (not Mainform.CheckUniqueKeyClause) then
Exit; Exit;
MaxSize := GetRegValue(REGNAME_COPYMAXSIZE, DEFAULT_COPYMAXSIZE) * SIZE_MB; MaxSize := GetRegValue(REGNAME_COPYMAXSIZE, DEFAULT_COPYMAXSIZE) * SIZE_MB;