abr 152013
 

Buenas,

Post in two languages / Mensaje en dos idiomas:


spanish flag Después de mucho trabajo, tanto en lo laboral como en los componentes, por fin puedo lanzar la versión 1.0.0 final de los mismos. No es que aquí se congelen, sino que he llegado ha realizar todo lo que quería hacer cuando empecé el proyecto. Seguiré evolucionándolos, actualizándolos a las nuevas versiones del API de Google Maps, corrigiendo bugs y, por qué no, añadiendo algún que otro componente/clase/funcionalidad que aun les faltan para terminar de dar cabida a toda el API de Google Maps.

Continue reading »

feb 142013
 

18 añosBuenas,

Hoy estamos de celebración, nuestra querida herramienta Delphi se hace mayor y cumple los 18 años. ¡¡Felicidades Delphi!!

Quizás ya no nos acordemos, los que tenemos más años, de las primeras versiones de Delphi, es más, de los primero programas hechos en Turbo Pascal. ¡¡Qué tiempos aquellos!!

Fue a mediados de los noventa, en 1995, cuando Borland lanzó la primera versión de Delphi, el Delphi 1 para 16 bits, haciendo que el lenguaje Pascal pasara a ser un RAD (Rapid Application Development) gracias a su potente VCL (Visual Components Library).

Desde entonces ha llovido mucho y Delphi ha pasado por varias manos (Borland – CodeGear – Embarcadero) hasta llegar a lo que es hoy, con la versión XE3 lanzada por Embarcadero el año pasado, acercándonos cada vez más a la plataforma iOS gracias a Firemonkey (o FMX).

En fin, que muchas felicidades Delphi y gracias a Borland, CodeGear y Embarcadero por darnos la posibilidad de poder tener esta herramienta durante todos estos años (y los que vengan).

happy birthday

Nos leemos

feb 102013
 

Buenas

Post in two languages / Mensaje en dos idiomas:


spanish flag Para demostrar el uso de la unidad Zip, he realizado una pequeña aplicación, la WinZLB. En ella demuestro cómo abrir o crear archivos comprimidos con esta unidad, así como añadir o extraerlos.

Continue reading »

ene 072013
 

Buenas

Seguro que en alguna ocasión hemos tenido que controlar el tiempo que tarda en realizarse algún trozo de código o proceso, y seguro que para ello se ha recurrido a la función Now (definida en la unidad SysUtils) o a la función del API de Windows GetTickCount. Otra opción es crearnos una unit que contenga la clase expuesta por Zarko en uno de sus artículos de delphi.about.com (ver How to Accurately Measure Elapsed Time Using High-Resolution Performance Counter).

Continue reading »

dic 282012
 

Buenas,

Los que tengan nociones de POO (Programación Orientada a Objetos) sabrán perfectamente cómo añadir funcionalidades a una clase creando una nueva.

Por ejemplo, imaginemos que tenemos la clase TMyClass definida de la siguiente manera:

type
  TMyClass = class
    procedure MyProc;
    function MyFunc: Integer;
  end;
....
procedure TForm1.Button1Click(Sender: TObject);
var
  C1: TMyClass;
begin
  C1 := TMyClass.Create;
  C1.MyProc;
  C1.MyFunc;
  C1.Free;
end;

Si queremos añadir funcionalidad a esta clase, lo primero que se nos puede venir a la cabeza es la herencia, es decir, crear una nueva clase que contenga las nuevas funcionalidades o especializaciones, quedando como ésto:

  TMyCustomClass = class(TMyClass)
    procedure AnotherProc;
  end;
.....
procedure TForm1.Button1Click(Sender: TObject);
var
  C1: TMyCustomClass;
begin
  C1 := TMyCustomClass.Create;
  C1.MyProc;
  C1.MyFunc;
  C1.AnotherProc; // <- hacemos uso del nuevo método
  C1.Free;
end;

El «inconveniente» de hacerlo así es que, como vemos, si queremos usar el método AnotherProc tendremos que crear un objeto de tipo TMyCustomClass. Pero, ¿qué pasa si tenemos un proyecto que hace uso masivo de TMyClass? En ese caso tendríamos que cambiar todas las referencias de TMyClass por TMyCustomClass, y eso podría ser un trabajo tedioso, y más si lo que queremos es ampliar la clase, no especializarla.

Para ese menester, Delphi (de echo la POO) nos brinda con las Helper Class (también aplicable a los records). Una Helper Class es una clase que, asociada a otra clase, añade nuevos métodos o propiedades a la clase asociada y que pueden ser usados por ésta. Es una forma de expandir una clase sin necesidad de herencia.

La sintaxis de las Helper Class es la siguiente:

type
   identifierName = class|record helper [(ancestor list)] for TypeIdentifierName
     memberList
   end;

La implementación para nuestro ejemplo sería así:

type
  TMyHelperClass = class helper for TMyClass
    procedure AnotherProc;
  end;
.......
procedure TForm1.Button1Click(Sender: TObject);
var
  C1: TMyClass; // <- objeto de la clase base....
begin
  C1 := TMyCustomClass.Create;
  C1.MyProc;
  C1.MyFunc;
  C1.AnotherProc; // <- ... pero que puede usar el nuevo método
  C1.Free;
end;

Para más información podéis consultar la docwiki de Embarcadero sobre este tema en Class and Record Helpers (Delphi).

Nos leemos

nov 242012
 

Stack Exchange Q&A site proposal: Stack Overflow in Spanish Buenas a todos

Ya os he hablado en otras ocasiones sobre esta propuesta del amigo Juan Antonio (aquí y aquí). Pues bien, me complace deciros que la propuesta ha alcanzado una nueva fase, la de compromiso.

Como siempre, el amigo Juan Antonio, en su blog, hace una entrada explicando todo muy bien. ¡¡Hasta yo lo he entendido!! jejeje

Os animo a que leáis la entrada de Juan Antonio, pero sobre todo os animo a comprometeros con el proyecto de StackOwerflow en español.

Sigamos pasando la voz y haciendo llegar la propuesta a cuantos más mejor para que pronto la tengamos en fase beta 🙂

Hasta la próxima entrada.

Nos leemos

 

nov 122012
 

Buenas,

Varios usuarios de la comunidad Delphi me han comentado a ver si existiría la posibilidad de hacer compatible la GMLib con FireMonkey. Recordemos que la GMLib es un conjunto de componentes para Delphi/C++ Builder que encapsulan el API de Google Maps y que necesitan de un navegador para poder mostrar los resultados de las acciones que quiere realizar el usuario. Dado que Delphi sólo trae un navegador (el TWebBrowser), los componentes dependen de él. El problema es que el TWebBrowser sólo está para el framework de la VCL.

Queriendo dar solución a esta parte de la comunidad Delphi y comentando con ellos la necesidad de tener un navegador compatible con FMX, nos «topamos» con los componentes DCEF (Delphi Chromium Embedded Framework), un navegador que encapsula Chrome y que es compatible con los dos frameworks de Delphi, la VCL y FMX (aunque con matices como ahora veremos).

Hay que decir algunas cosas de este navegador. Existen dos versiones, la DCEF1 y la DCEF3, cada una con sus peculiaridades que tendremos que tener en cuenta si queremos usarlos.

DCEF1

Es la primera versión que se ha hecho de estos componentes. Parece una versión que no tendrá más cambios, pero según el autor no es una versión congelada.

Esta versión compila hasta XE2, tanto para VCL como para FireMonkey, pero no lo hace en XE3, al menos el paquete que podemos descargarnos desde su web. Digo ésto porque en los grupos de los componentes he visto una solución para hacerlo compatible con XE3, tanto para VCL como para FireMonkey.

DCEF3

Es la segunda y actual versión de los componentes (no he visto que exista una DCEF2). De momento no tiene todas las características de DCEF1, pero poco a poco se van añadiendo. Esta versión compila hasta XE3, sin embargo no es compatible con FireMonkey, es exclusivamente VCL. Esto es importante saberlo porque si lo que queremos es hacer aplicaciones FireMonkey tenemos que decantarnos sí o sí por DCEF1.

Aparte de lo comentado de cada una de las versiones de TChromium, decir que no existe una versión Win64 para ninguna de las versiones, aunque no porque el autor de los componentes no haya querido, sino porque para Windows aun no hay versión 64 bits de Chrome.

Para terminar los comentarios sobre DCEF, quiero dejar algunos enlaces de interés sobre los mismos:

Con lo que respecta a la GMLib, decir que se hará compatible con la versión DCEF1 dado que es, hasta la fecha, la única versión compatible con FireMonkey. Espero tener pronto preparada esta nueva versión, mientras tanto, a seguir con la VCL jejeje.

Nos leemos

oct 052012
 

Buenas,

Me ha alegrado la noticia de ver que dos sets de componentes opensource con más recorrido en el mundo Delphi como son la JVCL y la ZeosLib han vuelto a cobrar vida.

JVCL Jedi Por lo que a la JVCL respecta, dado que ni en el changelog que acompaña el paquete ni en la web oficial dicen nada de esta nueva versión, entiendo que no trae novedad alguna, «simplemente» se han dedicado a hacerlo compatible con las nuevas versiones de Delphi/C++ Builder.

ZeosLib En cuanto a las Zeos, si bien es cierto que hace pocas horas que ha sido liberada esta nueva versión, en su web oficial tampoco se hace mención a los cambios que pueda llevar. No obstante, en el paquete que nos podemos descargar, en la carpeta doc, sí que tenemos (en formato pdf y html) un listado de las nuevas mejoras. Os invito que le deis un vistazo a las mismas.


Ya puestos, también me gustaría compartir con vosotros una serie de enlaces que puso nuestro compañero Salvador Jover.

Para terminar, decir que nuestro compañero Luis Felipe ha empezado una serie de artículos que hablarán de DataSnap en XE3. El primero es DataSnap: Introducción y ejemplo simple. Documento en Español y Video.

No puedo terminar la entrada sin felicitar a nuestro compañero Juan Antonio (jachguate) por la labor que está realizando traduciendo al castellano el libro Programación paralela con OmniThreadLibrary, el libro.

Ahora sí que ya me despido hasta la próxima.

Nos leemos

oct 052012
 

Buenas,

Hoy liberamos una nueva versión de los componentes GMLib para Delphi/C++Builder. No hay muchos cambios «visibles», pero sí cambios internos y un nuevo componente (y cada vez quedan menos para terminar 🙂 ).

Aquí la lista de cambios:

  • nuevo: compilado para Delphi/C++Buildes XE3.
  • nuevo: nuevo componente TGMElevation para el cálculo de elevaciones de terreno entre diferentes puntos.
  • error: general -> corregidos todos los memory leack encontrados.
  • error: TGMDirection -> no disparaba el evento OnDirectionsChanged.
  • cambio: TBasePolyline -> las clases TLinePoints y TLinePoint se desvinculan de TPolyline y se traspasan a la unit GMClasses.
  • cambio: TBasePolyline -> implementa la interfaz ILinePoint

Como siempre, podéis ver más explicaciones y descargar los componentes en su página.

Qué los disfrutéis!

Nos leemos