This commit is contained in:
Ansgar Becker
2010-06-10 08:37:44 +00:00
parent 51158e7700
commit 7d29518d7f

View File

@ -8624,7 +8624,7 @@ begin
Result := nil;
if Grid = DataGrid then
Result := DataGridResult
else begin
else if Assigned(Grid) then begin
CurrentTab := Grid.Parent as TTabSheet;
for QueryTab in QueryTabs do begin
if QueryTab.TabSheet = CurrentTab then begin