Crear nuestros propios modelos de código

4766 vistas

Existe dentro del IDE de Delphi una funcionalidad muy interesante (y poco explotada) y es la posibilidad de obtener modelos de código. Con esta funcionalidad, el tipeo de código puede ser mucho más rápido.

Por ejemplo, cada vez que queramos insertar un bucle, podemos escribir:



delphi
  1. // Escribimos forb y después pulsamos CTRL + J
  2. forb + ctrl + J



y el IDE reemplaza lo que hemos escrito por:



delphi
  1. for | :=  to  do
  2. begin
  3.  
  4. end;



dejando el cursor en |

Asà existe una larga lista de atajos predefinidos dentro del IDE.

Pero esto no es todo. Nosotros podemos crearnos nuestros propios atajos procediendo de la siguiente manera:
Para ir a la pantalla de los modelos de código, iremos a Tools|Editor Options y dentro de la pantalla a la pestaña Source Options y al botón Edit Code Templates
En la pantalla que nos aparecerá (Code Templates) veremos en la parte de arriba los diferentes atajos existentes en el IDE. Esta lista tiene dos columnas, la primera contiene el atajo a tipar y, la segunda, una pequeña descripción del modelo. Si buscamos dentro de la lista encontraremos nuestro ejemplo de modelo 'forb'. Si lo seleccionamos, veremos aparecer en la parte de code el código que generará el IDE cuando invoquemos el modelo.
También veremos una serie de botones para gestionar los modelos (Add..., Edit..., Delete...). Pulsando en Add... nos aparecerá una pantalla que nos preguntará el atajo y la descripción. Para el ejemplo, vamos a crear un arajo que nos permita instanciar un TSQLQuery sin variable de instancia. Vamos a llamarlo tsql y de descripción pondremos SQLQuery sin variable de instancia y aceptamos la pantalla.
Regresaremos a la pantalla anterior con el foco en Code (el cual estará vacÃo). Aquà es donde vamos a escribir el código que nos interesa para el modelo:



delphi
  1. with TSQLQuery.Create(nil) do
  2. begin
  3.   try
  4.     SQLConnection := |
  5.     SQL.Clear;
  6.  
  7.   finally
  8.     Free;
  9.   end;
  10. end;



Notar el carácter | en la 4rta línea que indica dónde dejará el cursor el IDE después de escribir el modelo.
Sólo nos queda aceptar la pantalla para tener preparado nuestro nuevo modelo para su uso. Ahora sólo tendremos que pulsar:



delphi
  1. tsql + ctrl + j



para que Delphi nos escriba el código