opensource/HeidiSQL
1
0
Fork 0
mirror of https://github.com/HeidiSQL/HeidiSQL.git synced 2026-02-01 19:44:21 +08:00
Code Issues Packages Projects Releases Wiki Activity

Issue #2053: add debug log lines in all places where a sorting is created or restored

Browse Source
This commit is contained in:
Ansgar Becker
2024-12-31 15:51:51 +01:00
parent df4edef4f8
commit 34c2ed9224
2 changed files with 4 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

3
source/data_sorting.pas
View File

@@ -4,7 +4,7 @@ interface
uses
Winapi.Windows, System.SysUtils, System.Classes, Vcl.Controls, Vcl.Forms, Vcl.StdCtrls, Vcl.ExtCtrls, Vcl.ComCtrls, Vcl.Buttons,
Vcl.Graphics, apphelpers, gnugettext, extra_controls;
Vcl.Graphics, apphelpers, gnugettext, extra_controls, dbconnection;
type
@@ -282,6 +282,7 @@ begin
NewSortItem.Column := UnusedColumns[0]
else
NewSortItem.Column := FColumnNames[0];
MainForm.LogSQL('Created sorting for column '+NewSortItem.Column+'/'+Integer(NewSortItem.Order).ToString+' in TfrmDataSorting.btnAddColClick', lcDebug);
// Refresh controls
DisplaySortingControls(Sender);

2
source/main.pas
View File

@@ -10578,6 +10578,7 @@ begin
else
SortOrder := sioAscending;
FDataGridSortItems.AddNew(ColName, SortOrder);
LogSQL('Created sorting for column '+ColName+'/'+Integer(SortOrder).ToString+' in TMainForm.DataGridHeaderClick', lcDebug);
end;
// Refresh grid, and remember X scroll offset, so the just clicked column is still at the same place.
@@ -11274,6 +11275,7 @@ begin
SortItem := FDataGridSortItems.AddNew;
SortItem.Column := rx.Match[2];
SortItem.Order := TSortItemOrder(StrToIntDef(rx.Match[1], 0));
LogSQL('Restored sorting for column '+SortItem.Column+'/'+Integer(SortItem.Order).ToString+' in TMainForm.HandleDataGridAttributes', lcDebug);
Break;
end;
end;