Преглед на файлове

* fcl-db: ibconnection: cosmetic

git-svn-id: trunk@28942 -
reiniero преди 11 години
родител
ревизия
727d73677a
променени са 1 файла, в които са добавени 3 реда и са изтрити 3 реда
  1. 3 3
      packages/fcl-db/src/sqldb/interbase/ibconnection.pp

+ 3 - 3
packages/fcl-db/src/sqldb/interbase/ibconnection.pp

@@ -602,7 +602,7 @@ begin
         TrLen := SQLLen;
       end;
     SQL_TYPE_DATE :
-      TrType := ftDate;
+        TrType := ftDate;
     SQL_TYPE_TIME :
         TrType := ftTime;
     SQL_TIMESTAMP :
@@ -615,9 +615,9 @@ begin
     SQL_BLOB :
       begin
         if SQLSubType = isc_blob_text then
-           TrType := ftMemo
+          TrType := ftMemo
         else
-           TrType := ftBlob;
+          TrType := ftBlob;
         TrLen := SQLLen;
       end;
     SQL_SHORT :