// romansg

Ejemplos

delphi

Alineando texto en un TEdit

En este ejemplo mostramos cómo alinear el texto en una componente TEdit con una simple modificación al estilo del control.

Detectando la inserción y extracción de cds

En este ejemplo mostramos cómo implementar una componente que detecte la inserción o extracción de un cd.

El código se basa en el ejemplo Detecting Media Insertion or Removal de Microsoft^tm.

Hints en un combo box

Cuando desplegamos la lista de un combobox, sucede en ocasiones que los ítems no caben a lo ancho de ella de manera que no podemos leer el texto completo.

En algunos controles como el TListView, cuando esto sucede aparece un hint mostrando el texto completo de un ítem cuando pasamos el cursor del ratón sobre él. En este ejemplo veremos como construir un derivado de TComboBox que implemente una funcionalidad similar.

Evitar más de una instancia de una aplicación

Existen infinidad de ejemplos para impedir que una aplicación se ejecute más de una vez al mismo tiempo, pero la mayoría se limita a presentar un mensaje al usuario indicando que la aplicación ya está abierta.

En este ejemplo veremos al detalle cómo reactivar la instancia anterior. El código que se presenta tiene además la ventaja de no requerir la instalación de ninguna componente. Con sólo incluir la unidad UIApp.pas en un proyecto, bastará para implementar la funcionalidad en una aplicación.

Inhabilitando teclas de Windows

Este ejemplo muestra cómo establecer un gancho (hook) de bajo nivel para interceptar el teclado en todo el sistema.