Archivo

Entradas Etiquetadas ‘Ejemplo’

NASA, la foto del día…

viernes, 3 de junio de 2016 9 comentarios

Hace bastante tiempo (cuando estábamos en la facultad) con mis amigos,  nos acostumbramos a visitar la web de  “la foto del día”. Había y sigue habiendo webs de muchas temáticas, pero una de las más conocidas en aquella época era la de la NASA. Las fotos de este tipo que hoy son más habituales, entonces era difícil encontrarlas (con aquella calidad).

ImagenDelDia

Actualmente la URL para acceder a “la foto del día” es esta.

http://apod.nasa.gov/apod/astropix.html

Leer más…

Información de batería (Android – XE5)

jueves, 3 de octubre de 2013 6 comentarios

images

En esta entrada vamos a tratar de cómo obtener infoemación del estado de la batería de un dispositivo Android.

En algunos casos se trata como un sensor más del sistema, aunque en Delphi XE5, no se tiene en cuenta en las clases específicas para acceder a los sensores.
Sea como sea, no es más que una forma de obtener información de un aspecto más, de nuestros dispositivos.

Para acceder a la información de la batería del dispositivo vamos a hacerlo utilizando “Intents”. En Delphi podemos acceder a ellos a través de la clase JIntent, definida en la unit Androidapi.JNI.GraphicsContentViewText.

Un ejemplo de utilización de la clase JIntent, para abrir una página en el navegador o para abrir un fichero, podéis verla en esta pregunta de stackoverflow y la respuesta por parte de Rodrigo Ruz.

Un “Intent” es una forma de solicitar/pedir a nuestro dispositivo Android que necesitamos invocar a un “componente”. Un componente puede ser parte de la interfaz gráfica, un servicio, un código que se ejecuta, un “broadcast receiver” o un proveedor de contenido, por citar algunos.
images (1)Simplificando, diremos que un “intent” es una forma de interactuar con otra aplicación, ya sea para añadir datos o para pedir información. Y podemos podemos dividirlos en 2 tipos:

  • Llamada a otra aplicación.
  • Llamada a otra aplicación y esperar respuestas desde ella.

En es link, podemos acceder a la información de la clase Intent en Android. En la parte inferior están definidas las ACTIONS que podemos utilizar según categorías.

Leer más…

Categories: Delphi Tags: , ,

Guardar configuración de Base de Datos

miércoles, 27 de enero de 2010 6 comentarios

Es una cosa que en multitud de ocasiones hemos necesitado hacer; Ya sea con la configuración del acceso a Base de Datos, con la configuración de propiedades, guardar estado del programa, posición,…

En este caso en concreto (a raiz de este hilo en Clubdelphi) se trata de guardar la configuración de Base de Datos. El contenido importante de la propiedad ConnectionString.

Podemos almacenada TODO el contenido de la propiedad en un sólo elemento o guardar los elemtos relevantes de la conexión (Servidor, usuario, Base de Datos y password); En mi caso he preferido el segundo.

Para ello lo más sencillo es utilizar la clase TIniFile que provee Delphi.

Para guardar los valores utilizamos WriteString:

// Grabar
ini.WriteString(CONFIG_SECTION, 'User', edtUser.Text);
ini.WriteString(CONFIG_SECTION, 'password', edtPassword.Text);
ini.WriteString(CONFIG_SECTION, 'Server', edtServer.Text);
ini.WriteString(CONFIG_SECTION, 'BaseDatos', cbBD.Text);

Y para recuperarlos el equivalente ReadString:

// Cargar datos
edtUSer.Text := ini.ReadString(CONFIG_SECTION, 'User', STR_EMPTY);
edtPassword.Text := ini.ReadString(CONFIG_SECTION, 'password', STR_EMPTY);
edtServer.Text := ini.ReadString(CONFIG_SECTION, 'Server', STR_EMPTY);
cbBD.Text := ini.ReadString(CONFIG_SECTION, 'BaseDatos', STR_EMPTY);

Una vez tenemos los datos podemos montar la conexión y activarla.

const
STR_CONN = 'Provider=SQLOLEDB.1;Password=%s;Persist Security Info=True;' +
'User ID=%s;Initial Catalog=%s;Data Source=%s';
 
...
 
// Intentar conectar
ADOConnection1.ConnectionObject.ConnectionString :=
Format(STR_CONN, [edtPassword.Text, edtUser.Text, cbBD.Text, edtServer.Text]);

En este ejemplo además se utiliza otra conexión con casi los mismos parámetros introducidos, pero accediendo a la tabla master, para preguntar al servidor SQL por las Bases de Datos disponibles y así mostrarlas al usuario:

SELECT * FROM SysDataBases

Adjunto el ejemplo coon el código.

<DESCARGAR EJEMPLO>

En este caso, la conexión es con SQL Server mediante OLEDB. En general, para esta y otras conexiones os recomiendo una web creada específicamente al respecto:

ConnectionString.com