Fix issue #1180: AV while fetching column names for query helpers box on editing a stored routine

This commit is contained in:
Ansgar Becker
2009-06-05 20:33:57 +00:00
parent 26caf19b3b
commit edcd544953

View File

@ -5666,7 +5666,7 @@ begin
begin
// Keep native order of columns
lboxQueryHelpers.Sorted := False;
if SelectedTable.Text <> '' then begin
if (SelectedTable.Text <> '') and Assigned(FSelectedTableColumns) then begin
FSelectedTableColumns.First;
while not FSelectedTableColumns.Eof do begin
lboxQueryHelpers.Items.Add(FSelectedTableColumns.Fields[0].AsWideString);