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

Fix usage of wrong TDBObject caused by using wrong offset from TDBObjectList.

Browse Source
This commit is contained in:
Ansgar Becker
2013-08-24 18:11:43 +00:00
parent 5e83eaab1b
commit 1347a3a368
1 changed files with 3 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
source/insertfiles.pas
View File

@ -345,18 +345,18 @@ end;
procedure TfrmInsertFiles.comboTablesChange(Sender: TObject); procedure TfrmInsertFiles.comboTablesChange(Sender: TObject);
var var
Selected: TDBObject;
Columns: TTableColumnList; Columns: TTableColumnList;
Col: TTableColumn; Col: TTableColumn;
ColInfo: TColInfo; ColInfo: TColInfo;
DBObjects: TDBObjectList;
Node: PVirtualNode; Node: PVirtualNode;
begin begin
// Populate combobox with columns from selected table // Populate combobox with columns from selected table
ListColumns.Clear; ListColumns.Clear;
if comboTables.ItemIndex > -1 then begin if comboTables.ItemIndex > -1 then begin
DBObjects := FConnection.GetDBObjects(comboDBs.Text);
Columns := TTableColumnList.Create(True); Columns := TTableColumnList.Create(True);
FConnection.ParseTableStructure(DBObjects[comboTables.ItemIndex].CreateCode, Columns, nil, nil); Selected := FConnection.FindObject(comboDBs.Text, comboTables.Text);
FConnection.ParseTableStructure(Selected.CreateCode, Columns, nil, nil);
Node := nil; Node := nil;
for Col in Columns do begin for Col in Columns do begin
ColInfo := TColInfo.Create; ColInfo := TColInfo.Create;