Fix non clickable message "Please use stored routine editor ...", see issue #1048

This commit is contained in:
Ansgar Becker
2009-03-16 21:20:43 +00:00
parent 33894c807f
commit 85a579943f

View File

@ -4277,11 +4277,9 @@ begin
Try
// No column view for routines
if FSelectedTableColumns = nil then begin
ListColumns.Enabled := False;
lblSorryNoFields.Parent := ListColumns;
Exit; // Jump to *finally*
end else begin
ListColumns.Enabled := True;
lblSorryNoFields.Parent := tabTable;
end;