mORMot and Open Source friends
Check-in [ab6c8515b7]
Check-in [ab6c8515b7]
Many hyperlinks are disabled.
Use anonymous login
to enable hyperlinks.
| Comment: | {547} removed the whole cache feature in SynDB Explorer for a remote client connection |
|---|---|
| Timelines: | family | ancestors | descendants | both | trunk |
| Files: | files | file ages | folders |
| SHA1: |
ab6c8515b7fc415e2026e47ce35b610b |
| User & Date: | ab 2014-11-19 21:05:43 |
|
2014-11-20
| ||
| 07:33 | {548} AutoMapKeywordFields parameter will now rename the conflictual identifier names as ####_ instead of _#### (which is not SQL-92 correct) check-in: 8a60d551e7 user: ab tags: trunk | |
|
2014-11-19
| ||
| 21:05 | {547} removed the whole cache feature in SynDB Explorer for a remote client connection check-in: ab6c8515b7 user: ab tags: trunk | |
| 20:56 | {546} fixed an awful regression introduced yesterday check-in: 98535d019c user: ab tags: trunk | |
Changes to SQLite3/Samples/12 - SynDB Explorer/SynDBExplorerMain.pas.
132 133 134 135 136 137 138 139 140 141 142 143 144 145 146 147 148 |
end else
Props := CONN_CLASSES[C.Connection].Create(C.Server,C.Database,C.UserName,Pass);
ConnectionName := U2S(C.Ident);
with CreateTempForm(format(sPleaseWaitN,[ConnectionName]),nil,True) do
try
MainCaption := format('%s %s (compiled with %s) - %s',
[MainCaption,SYNOPSE_FRAMEWORK_VERSION,GetDelphiCompilerVersion,ConnectionName]);
if LoadTableNames then begin // retrieve all needed info from DB
Props.GetTableNames(C.fTableNames); // retrieve and set table names
C.ForeignKeys := CompressString(Props.ForeignKeysData); // set foreign keys
if Conns<>nil then
Conns.Modified := true;
end else begin
Props.ThreadSafeConnection.Connect;
Props.ForeignKeysData := UncompressString(C.ForeignKeys);
end;
for i := 0 to High(C.TableNames) do
|
| > | | |
132 133 134 135 136 137 138 139 140 141 142 143 144 145 146 147 148 149 |
end else
Props := CONN_CLASSES[C.Connection].Create(C.Server,C.Database,C.UserName,Pass);
ConnectionName := U2S(C.Ident);
with CreateTempForm(format(sPleaseWaitN,[ConnectionName]),nil,True) do
try
MainCaption := format('%s %s (compiled with %s) - %s',
[MainCaption,SYNOPSE_FRAMEWORK_VERSION,GetDelphiCompilerVersion,ConnectionName]);
if LoadTableNames or // retrieve all needed info from DB
(C.Connection=ctRemoteHTTP) then begin
Props.GetTableNames(C.fTableNames); // retrieve and set table names
C.ForeignKeys := CompressString(Props.ForeignKeysData); // foreign keys
if Conns<>nil then
Conns.Modified := true;
end else begin
Props.ThreadSafeConnection.Connect;
Props.ForeignKeysData := UncompressString(C.ForeignKeys);
end;
for i := 0 to High(C.TableNames) do
|
Changes to SynopseCommit.inc.
1 |
'1.18.546'
|
| |
1 |
'1.18.547'
|