Tecistel/Tecsitel_FactuGES2
0
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Servidor -> Devolver las conexiones abiertas.

Browse Source 
git-svn-id: https://192.168.0.254/svn/Proyectos.Tecsitel_FactuGES2/trunk@787 0c75b7a4-871f-7646-8a2f-f78d34cc349f
This commit is contained in:
David Arranz 2008-12-01 10:38:04 +00:00
parent 5beea7b2b5
commit f26e64bd06
1 changed files with 2 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
Source/Servidor/uDataModuleServer.pas
View File

@ -158,6 +158,8 @@ function TdmServer.DarNuevaConexion: IDAConnection;
begin begin
with ConnectionManager do with ConnectionManager do
Result := NewConnection(GetDefaultConnectionName, False); Result := NewConnection(GetDefaultConnectionName, False);
if not Result.isAlive then
Result.Open;
end; end;
procedure TdmServer.IniciarLog; procedure TdmServer.IniciarLog;