Ver Mensaje Individual
  #3  
Antiguo 04-12-2014
Avatar de kurono
[kurono] kurono is offline
Miembro Premium
 
Registrado: jul 2007
Ubicación: Republica Dominicana
Posts: 1.126
Reputación: 18
kurono Va por buen camino
Código Delphi [-]
uses
  System.IOUtils ;

procedure TForm2.connectButtonClick(Sender: TObject);
begin
   SQLConnection1.Params.Values['Database'] := TPath.Combine(TPath.GetSharedDocumentsPath, 'test.db');
  try
    SQLConnection1.Connected := true;
    executeButton.Enabled := true;
    outputMemo.Text := 'Conexión Establecida !!!!';
  except
    on E: EDatabaseError do
      ShowMessage('Exception raised with message' + E.Message);
  end;
end;


// TPath.Combine(TPath.GetSharedDocumentsPath, 'test.db'); //para memoria externa

// TPath.Combine(TPath.GetdDocumentsPath, 'test.db'); //para memoria interna
Responder Con Cita