opensource/HeidiSQL
1
0
Fork 0
mirror of https://github.com/HeidiSQL/HeidiSQL.git synced 2026-03-13 09:24:25 +08:00
Code Issues Packages Projects Releases Wiki Activity

Fix bug #783 AV after while inserting record

Browse Source
This commit is contained in:
Ansgar Becker
2008-10-10 00:41:03 +00:00
parent 1e410726ef
commit 35be9c3621
1 changed files with 4 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
source/childwin.pas
View File

@@ -6180,6 +6180,9 @@ procedure TMDIChild.DataGridInsertRow;
var
i, j: Integer;
begin
// Scroll to the bottom to ensure we append the new row at the very last FDataGridResult chunk
DataGrid.FocusedNode := DataGrid.GetLast;
DataGrid.Repaint;
i := Length(FDataGridResult.Rows);
SetLength(FDataGridResult.Rows, i+1);
SetLength(FDataGridResult.Rows[i].Cells, Length(FDataGridResult.Columns));
@@ -6187,8 +6190,7 @@ begin
for j := 0 to Length(FDataGridResult.Rows[i].Cells) - 1 do begin
FDataGridResult.Rows[i].Cells[j].Text := '';
end;
DataGrid.AddChild(nil);
DataGrid.FocusedNode := DataGrid.GetLast;
DataGrid.FocusedNode := DataGrid.AddChild(nil);
DataGrid.ClearSelection;
DataGrid.Selected[DataGrid.FocusedNode] := True;
DataGridHasChanges := True;