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

Bugfix: Show queries with international characters correctly in process list.

Browse Source
This commit is contained in:
rosenfield.albert
2008-08-08 13:39:04 +00:00
parent 4c4387c155
commit 09cfeb65be
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

@ -2247,7 +2247,7 @@ begin
for i:=1 to ds.RecordCount do
begin
VTRowDataListProcesses[i-1].Captions := TStringList.Create;
VTRowDataListProcesses[i-1].Captions.Add( ds.Fields[0].AsString );
VTRowDataListProcesses[i-1].Captions.Add( ds.Fields[0].AsWideString );
if AnsiCompareText( ds.Fields[4].AsString, 'Killed') = 0 then
VTRowDataListProcesses[i-1].ImageIndex := 26 // killed
else begin
@ -2257,7 +2257,7 @@ begin
VTRowDataListProcesses[i-1].ImageIndex := 57 // running query
end;
for j := 1 to 7 do
VTRowDataListProcesses[i-1].Captions.Add(ds.Fields[j].AsString);
VTRowDataListProcesses[i-1].Captions.Add(ds.Fields[j].AsWideString);
ds.Next;
end;
ds.Close;