opensource/HeidiSQL
1
0
Fork 0
mirror of https://github.com/HeidiSQL/HeidiSQL.git synced 2025-08-26 20:00:16 +08:00
Code Issues Packages Projects Releases Wiki Activity

Fix browsing content of tables with weird characters in their name.

Browse Source
This commit is contained in:
Ansgar Becker
2008-08-19 21:55:40 +00:00
parent 79d8db08b3
commit b56690886b
1 changed files with 2 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
source/childwin.pas
View File

@ -5471,7 +5471,7 @@ procedure TMDIChild.EnsureDataLoaded(Sender: TBaseVirtualTree; Node: PVirtualNod
var var
res: TGridResult; res: TGridResult;
start, limit: Cardinal; start, limit: Cardinal;
query: String; query: WideString;
ds: TDataSet; ds: TDataSet;
i, j: LongInt; i, j: LongInt;
begin begin
@ -5481,7 +5481,7 @@ begin
start := Node.Index - (Node.Index mod GridMaxRows); start := Node.Index - (Node.Index mod GridMaxRows);
limit := DataGrid.RootNodeCount - start; limit := DataGrid.RootNodeCount - start;
if limit > GridMaxRows then limit := GridMaxRows; if limit > GridMaxRows then limit := GridMaxRows;
query := DataGridCurrentQuery + Format(' LIMIT %d, %d', [start, limit]); query := DataGridCurrentQuery + WideFormat(' LIMIT %d, %d', [start, limit]);
// start query // start query
MainForm.ShowStatus('Retrieving data...'); MainForm.ShowStatus('Retrieving data...');