Ver Mensaje Individual
  #2  
Antiguo 06-08-2017
Avatar de Casimiro Notevi
Casimiro Notevi Casimiro Notevi is offline
Moderador
 
Registrado: sep 2004
Ubicación: En algún lugar.
Posts: 32.021
Reputación: 10
Casimiro Notevi Tiene un aura espectacularCasimiro Notevi Tiene un aura espectacular
Imagina el caso "habitual" en el que FDCon_DB no está conectado, ¿qué ocurriría?
Ocurriría que pasaría el control a KonectarMySQL y luego saldría de la function OpenConnecction sin ningún valor (True/False).
Quizás sería mejor así:
Código Delphi [-]
Function TDataModule1.OpenConnection:Boolean;
begin
  Result:=True;
  try
    if not FDCon_DB.Connected then    
      KonectarMySQL;
  except
    result :=False;
  end;
end;
Responder Con Cita