RxDBGrid - fix open dataset without create collumns

git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@2724 8e941d3f-bd1b-0410-a28a-d453659cc2b4

components/rx/rxdbgrid.pas

@@ -3784,7 +3784,7 @@ var
   RCol:TRxColumn;
 begin
   if (not (FFooterOptions.Active and DatalinkActive)) or (Columns.Count = 0) or
-     (DataSource.DataSet.RecordCount<=0) then
+     (DataSource.DataSet.RecordCount<=0) or (gsAddingAutoColumns in GridStatus)  then
     Exit;
   //Дополнительно проверим - а стоит ли делать пробег по данным - есть ли агрегатные функции
   APresent := False;

components/rx/tooledit.pas

@@ -233,7 +233,7 @@ var
 begin
   with Editor do
   begin
-    if NewStyleControls then
+(*    if NewStyleControls then
     begin
       if BorderStyle = bsNone then
         I := 0
@@ -245,7 +245,7 @@ begin
       Result.X := {SendMessage(Handle, LM_GETMARGINS, 0, 0) and $0000FFFF} + I;
       Result.Y := I;
     end
-    else
+    else *)
     begin
       if BorderStyle = bsNone then
         I := 0