rtgit/RTFormwork
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

rtfunc

Browse Source
This commit is contained in:
sgwp 2024-07-22 10:24:01 +08:00
parent e8b4b8b8a5
commit f361e4e39a
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
public10/ThreeFun/Fun/U_RTFun.pas
View File

@ -2484,7 +2484,7 @@ begin
mGridName := cxGrid.GetParentComponent.Name + '.' + cxGrid.name; mGridName := cxGrid.GetParentComponent.Name + '.' + cxGrid.name;
try try
cxGrid.BeginUpdate(); cxGrid.BeginUpdate() ;
mADOTmp := TADOQuery.Create(nil); mADOTmp := TADOQuery.Create(nil);
mADOTmp.ConnectionString := DConString; mADOTmp.ConnectionString := DConString;
with mADOTmp do with mADOTmp do