Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Desarrollo en Delphi para Android
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy


 
 
Herramientas Buscar en Tema Desplegado
  #5  
Antiguo 12-05-2014
jpgonzalez jpgonzalez is offline
Miembro
 
Registrado: feb 2010
Posts: 121
Poder: 15
jpgonzalez Va por buen camino
Nobleza obliga, y en este mensaje quiero agradecer a chaosego y especialmente a Neftali por su excelente predisposicion para contestar mis mensajes.
Les comento que he podido conectar mi app Android utilizando un webservice, tal como lo muestra Neftali en este articulo utilizando los componentes REST del ejemplo CLIENTE 2 (Delphi XE5 + Componentes REST)

Si siguen los pasos de este ejemplo, lograran facilmente conectar la app a la base MySQL que tengan en cualquier servidor, mediante un archivo php que deberan tener alojado en el mismo.
Lo unico que se me complico fue el tema de la respuesta con JSON, por lo cual les comento lo que deberan modificar para que el RESTResponseDataSetAdapter les convierta la respuesta al TClientDataSet:

Este es un fragmento del codigo php que se encuentra en el archivo listado.php que muestra Neftali en su articulo:
Código PHP:
  // Crear un array de registros
  
$arrusers = array();
  if(
mysql_num_rows($result)) {
    while(
$user mysql_fetch_assoc($result)) {
      
$arrusers[] = array('Usuario'=>$user);         (*****)
    }
  }
  
// salida en el formato JSON
  
header('Content-type: application/json');
  echo 
json_encode(array('Usuarios'=>$arrusers));      (*****) 
Si a alguien no le funciona de esta manera, solo deberan quitar el array del codigo de la siguiente forma:
Código PHP:
  // Crear un array de registros
  
$arrusers = array();
  if(
mysql_num_rows($result)) {
    while(
$user mysql_fetch_assoc($result)) {
      
$arrusers[] = $user;     (*****)
    }
  }
  
// salida en el formato JSON
  
header('Content-type: application/json');
  echo 
json_encode($arrusers);     (*****) 
Modificando estas dos lineas (*****), a mi me funciono la conexion y me listo todo de manera perfecta.
Abrazo para todos y nuevamente muchas gracias!!!
Responder Con Cita
 



Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro

Temas Similares
Tema Autor Foro Respuestas Último mensaje
¿cómo conectar lazarus a una base de datos access y a Mysql? Master23 Varios 3 01-09-2010 15:53:42
¿Cómo conectar una base de datos MySQL paso a paso por ip? Master23 Conexión con bases de datos 5 04-07-2010 22:01:54
Conectar a base de datos MySQL Gean Conexión con bases de datos 3 22-04-2010 18:30:34
como conectar una base de datos online MySQL con un programa local? cocute Conexión con bases de datos 7 06-01-2010 13:57:02
como conectar una base de datos hecha en mysql con delphi 7 magnus33 Conexión con bases de datos 3 25-06-2008 09:31:46


La franja horaria es GMT +2. Ahora son las 11:51:27.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi