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

Try to make it easier to debug a memory read outside an array's bounds (issue #997) by putting each indexing on it's own source code line.

Browse Source
This commit is contained in:
rosenfield.albert
2009-02-17 22:07:22 +00:00
parent 058542b39b
commit 694f3f15fd
1 changed files with 6 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

7
components/virtualtreeview/Source/VirtualTrees.pas
View File

@ -9164,6 +9164,7 @@ function TVirtualTreeColumns.GetColumnAndBounds(P: TPoint; var ColumnLeft, Colum
var var
I: Integer; I: Integer;
J: Integer;
begin begin
Result := InvalidColumn; Result := InvalidColumn;
@ -9175,8 +9176,9 @@ begin
if FHeader.Treeview.UseRightToLeftAlignment then if FHeader.Treeview.UseRightToLeftAlignment then
Inc(ColumnLeft, FHeader.Treeview.ComputeRTLOffset(True)); Inc(ColumnLeft, FHeader.Treeview.ComputeRTLOffset(True));
for I := 0 to Count - 1 do for I := 0 to Count - 1 do begin
with Items[FPositionToIndex[I]] do J := FPositionToIndex[I];
with Items[J] do
if coVisible in FOptions then if coVisible in FOptions then
begin begin
ColumnRight := ColumnLeft + FWidth; ColumnRight := ColumnLeft + FWidth;
@ -9187,6 +9189,7 @@ begin
end; end;
ColumnLeft := ColumnRight; ColumnLeft := ColumnRight;
end; end;
end;
end; end;
//---------------------------------------------------------------------------------------------------------------------- //----------------------------------------------------------------------------------------------------------------------