mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-04-07 22:58:14 +02:00
* Make data panel visible when a second query is started
git-svn-id: trunk@51192 -
This commit is contained in:
parent
7fb25de778
commit
402ec6b200
@ -556,6 +556,7 @@ begin
|
||||
end;
|
||||
TSData.TabVisible:=true;
|
||||
PCResult.ActivePage:=TSData;
|
||||
FData.Visible:=True;
|
||||
DS.Open;
|
||||
TE:=Now;
|
||||
RowsAff:=Format(SRecordsFetched,[DS.RecordCount]);
|
||||
|
Loading…
Reference in New Issue
Block a user