HowToDoThings.com Delphi

D4: Hacer conscientes TCheckbox datos con TDBEdit

Fri, 24 Oct 2008 16:55:39 -0500

Simple medio de hacer algunos de los componentes de datos conscientes. Alternativas de datos consciente de casillas de verificación (y radiobuttons) que se pueden arreglar con más flexibilidad.

Aunque las versiones más recientes de Delphi puede ofrecer mejores formas de visualización de datos consciente de las colecciones de casillas y radiobuttons, todavía estoy utilizando D4. A menudo he deseado una base de datos-componente consciente de que (a) no incluye la caja de biselados D4 del grupo de botones de selección, (b) puede hacerse a parecerse a algunos formularios en papel más de cerca, (c) permisos más flexible de los temas en el grupo, y (d) permisos de todas las pautas inusuales de botones para ser 'en' y 'desactivar' simultáneamente.

En resumen, más flexibilidad.

Creo que esta receta hace esto, y también ilustra simple medio para realizar algunos controles que no son conscientes de datos adquirir esta capacidad mediante la cooperación con los que están.

Ordenado biblioteca de componentes para facilitar las migraciones o construye

Scott4 — Fri, 24 Oct 2008 16:55:17 -0500

El control de su Library Path puede ser beneficioso para un número de razones, de fácil lectura, el intercambio de los componentes de la red / bibliotecas, o incluso para escrowing proyectos.

Hay una forma relativamente para controlar el componente de muchas bibliotecas de que disponemos para nuestro uso en Delphi.

Un ejemplo de su sintaxis se puede ver en la parte superior de la Biblioteca Delphi Ruta de diálogo, como se ve a continuación:

Esta $ (DELPHI) sintaxis es fácilmente replicados para nuestro propio uso. Por ejemplo, tratar de mantener los componentes de mi versión muy estrechamente controlada, y todos en un directorio. Mi razón de este enfoque es una desagradable experiencia pasada de la construcción de un depósito de garantía para un cliente es una dolorosa tarea de construir, probar y mantener.

Sin embargo, este fenómeno-puro enfoque nos ayuda a construir un enfoque mantenido fácilmente a la Biblioteca entradas.

Composición y recursivo OCL

Peter5 — Fri, 24 Oct 2008 16:42:38 -0500

En este artículo se muestra un ejemplo sencillo de utilizar recusive OCL dentro de un patrón compuesto.

"Para entender la recursividad debemos primero entender la recursividad" [Fuente desconocida]

Seguramente no hay un programador profesional por ahí que no ha utilizado la recursividad? Yo apuesto que la primera rutina recursiva que la mayoría de los programadores se escribió algún tipo de FindAllFiles rutina. La belleza de la recursividad es que es tan simple y, sin embargo, los resultados dan la ilusión de que el código debe ser mucho más complicado.

Estoy lentamente reescritura www.HowToDoThings.comen mi muy poco tiempo libre. Antes de la clasificación de los artículos es de tres niveles de profundidad, nada más y nada menos; Tema-> Categoría-> subcategoría. Una de las mejoras que he decidido añadir a la web es la capacidad de anidar una cantidad ilimitada de niveles. Para ello he puesto en marcha una base bastante OOP compuestos como patrón a fin de

La composición es mucho mejor que la herencia

Peter5 — Fri, 24 Oct 2008 16:42:20 -0500

Este artículo explica los peligros de la herencia, y ofrece una solución ...

En este artículo voy a tener que utilizar algunos nombres ficticios de clase, etc debido a la sensibilidad del proyecto estoy trabajando, por lo que llevar conmigo si alguna de la información parece un poco extraño.

Después de trabajar yo mismo alrededor de 6 niveles de profundidad en la herencia de repente me di cuenta de que la fábrica de mi clase había un DateOfBirth. Esta es sin duda deseable, pero con mi actual modelo no podía hacer nada al respecto. Mis opciones para deshacerse de la herencia de la fábrica y perder todos los beneficios de hacerlo (tener "AdditionalInformation" definibles por el usuario, por ejemplo), o hacer caso omiso de la DateOfBirth y no se mostrará en el GUI.

Ambas opciones son basura. En vez de tomar uno de ellos, me fui para una opción completamente diferente lugar. He decidido eliminar casi todos dentro de la herencia de mi modelo, y agregar compuestos lugar las relaciones.

Código derivados en columnas ECO II

Peter5 — Fri, 24 Oct 2008 16:42:03 -0500

Explica lo que derivados del Código columnas son, y cómo utilizarlos.

El objetivo de este artículo será "derivados del suceso las columnas". Norden enero (Borland) me señaló en la dirección de estas cosas cuando hace poco le pregunté cómo resolver un problema GUI tuve. Cuando he utilizado en negrita para Delphi se esta realmente agradable GUI un componente llamado BoldSelectionListBox. Este componente permítanme mostrar una lista de elementos con una casilla que aparece junto a cada fila, marcando / unticking un cuadro de añadir / quitar un tema de asociación entre el elemento seleccionado y algunos otros objetos de mi elección. Eso es no la mejor explicación en el mundo, a fin de echar un vistazo en el siguiente diagrama UML:

Windows motor de búsqueda

Fri, 24 Oct 2008 16:41:38 -0500

La aplicación de Shell manejador de búsqueda utilizando Delphi

La Shell admite varios servicios públicos de búsqueda que permiten a los usuarios localizar objetos de nombres tales como archivos o impresoras. Puede crear un motor de búsqueda personalizado y ponerlos a disposición de los usuarios mediante la aplicación y el registro de un manejador de búsqueda.

Los usuarios tienen dos maneras de seleccionar un motor de búsqueda. El primero es desde el menú Inicio. Con los sistemas anteriores a Microsoft Windows 2000, seleccionando el comando Buscar del menú Inicio muestra un submenú de los motores de búsqueda disponibles. Con Windows 2000 y versiones posteriores, el menú Inicio del comando Buscar se denominará de búsqueda.

Cambio de izquierda y derecha canal de volúmenes por separado:

Fri, 24 Oct 2008 16:25:45 -0500

En este artículo se describe una forma sencilla de configurar la izquierda y la derecha canal de volúmenes por separado.

Cambio de izquierda y derecha canal de volúmenes por separado:

Por: Pooia Lalbakhsh
Maestría en Ingeniería en Computación

Estos dos procedimientos se ilustra más abajo, los volúmenes establecidos
de la derecha y la izquierda canales por separado.

Uso de Waveoutsetvolume MMSystem puede establecer la ola de volme.
Para hacer esto usted tiene que establecer el valor en una variable Dword:

El 2 de bajo orden bytes: el volumen para el canal izquierdo que puede ser algo
entre el 0 hasta 65535

El 2 de alto orden bytes: el volumen para el canal derecho que puede ser sonething
entre el 0 hasta 65535

utilizando estos procedimientos puede configurar los canales por separado:

usos MMSystem

Envío de mensajes de correo electrónico HTML con Indy

Peter5 — Fri, 24 Oct 2008 16:25:11 -0500

Este ejemplo muestra cómo enviar mensajes de correo electrónico HTML y utilizando Delphi Indy, con imágenes incrustadas.

usos
IdMessage;

procedimiento TForm1.Button1Click (Sender: TObject);
var
Html: TStrings;
Htmpart, txtpart: TIdText;
Bmppart: TIdAttachment;
Correo electrónico: TIdMessage;
Nombre de archivo: string;
empezar
Nombre de archivo: = ExtractFilePath (Application.ExeName) + 'us.jpg';

html: = TStringList.Create ();
html.Add ( '<html>');
html.Add ( '<head>');
html.Add ( '</ head>');
html.Add ( '<body> <h1> Hola </ h1>');
html.Add ( '<img src="cid:us.jpg" />');
html.Add ( 'Esta es una foto de nosotros! </ body>');
html.Add ( '</ html>');

correo electrónico: TIdMessage.Create = (nil);

ECO2 se ocupa de expresión y el control Repeater ASP.NET

Scott4 — Fri, 24 Oct 2008 16:10:58 -0500

¿Cómo DataBind la información de la ExpressionHandle o manejar otro tipo de ASP.NET en el control Repeater? Tomó un poco de tener doble visión, pero la amabilidad de Pete Morris ayudó a superar el problema.

Instamos a los naturales de la mayoría de los Devs Delphi es relacionar las cosas a la fuente de datos. Comprensible, como nuestro tiempo con Delphi nos ha enseñado mucho en esa zona.

Inicialmente me salió mal, porque me remito a la lista de Mango componente como fuente para la parte DataBinder.Evalllamada, como tal (PS Esto es incorrecto y no):

DataBinder.Eval (ehLogins, "MyPropertyOrFieldName")

Hay un proceso corto para ir a través de obtener el control de repetidor para mostrar correctamente los datos que queremos.

Cómo almacenar el contenido de uno en uno RichEdit archivos EMF

Fri, 24 Oct 2008 16:10:41 -0500

Cómo almacenar el contenido de uno en uno RichEdit archivos EMF

A veces, puede que desee almacenar el contenido de un control de edición rica en un metarchivo. En este artículo se describe un enfoque que almacena este tipo de control del contenido en el aumento de metarchivos, una página por metarchivo. El siguiente código muestra un método para volcar el contenido de un control de edición rica en archivos EMF (uno por página):

RichEditEMFPrint unidad;

interfaz

usos
Windows, SysUtils, RichEdit, commdlg, clases, mensajes, Comctrls;

procedimiento RichEditToMetaFile (AControl: TRichEdit; AFileName: string);

aplicación

/ / GetPrinterDC ()
/ / Devuelve una impresora DC - usos comunes de diálogo de la impresora
GetPrinterDC función: HDC;
var
pdlg: TPRINTDLG;
empezar
FillChar (pdlg, sizeof (TPRINTDLG), 0);
pdlg.lStructSize: = sizeof (TPRINTDLG);

read more

Cómo detectar si contiene una Unidad de disco flexible

Fri, 24 Oct 2008 15:56:30 -0500

En este artículo se explica cómo detectar si es un disquete en la unidad de disco en sistemas basados en NT (W2K, XP)

Windows tiene la costumbre de pedir al usuario que inserte un disquete. Normalmente esto no sería un problema, pero supongamos que desea saber si es un disquete en la unidad o no.

Existen varias formas de detectar un disquete, un método fácil es la función DirectoryExists que se declara en filectrl.pas.
Si un disquete está allí, tiene éxito. Si no es así, la función no sólo después de que el usuario ha pulsado en "Cancelar" para la cuestión del tiempo que él / ella desea insertar un disquete.

Este comportamiento puede ser alterado por el (temporal) en el comportamiento de las ventanas de error al llamar a un API. Al establecer este "sólo crítica", que prevenir eficazmente las ventanas de consulta el usuario.

Aquí tiene un ejemplo de la función que comprueba si es un disquete en la unidad A.

uses filectrl; //..//IsFloppyInDrive función: Boolean;
var om: Integer; / / OlderrorModus
empezar

Cómo reducir el tiempo de desarrollo mediante la reducción de las pulsaciones de teclado

Fri, 24 Oct 2008 15:55:59 -0500

En este artículo se describen observaciones sobre la forma en que el más eficaz los desarrolladores son capaces de reducir la cantidad de escribir lo hacen casi a la mitad y da recomendaciones sobre cómo puede experimentar el mismo impulso de la productividad.

(Originalmente publicado en Delphi-expert.com el 20 de abril de 2004)

COM y los servicios de Windows

Peter5 — Fri, 24 Oct 2008 15:46:15 -0500

Un poco de punta sobre el uso de la COM con servicios de Windows.

Hoy he intentado acceder a un documento XML de un servicio de Windows. Prototipo Cuando mis clases utilizando una aplicación de Windows Forms todo funcionó bien, pero cuando he utilizado las mismas clases en un servicio de Windows seguí recibiendo el error "CoInitialize no ha sido llamado".

CoInitialize debe ser llamado por cada hilo cuando se utiliza cualquier tipo de objeto COM. Las capturas es que la clase TService que viene con Delphi crea su propio hilo de apoyo a fin de ejecutar el OnExecute evento. Una vez que sepas esto, es bastante simple para rectificar su código

 procedimiento TMyService.ServiceExecute (Sender: TService); 
 empezar 
 CoInitialize (cero); 
 Intentar 
 / / Su código aquí 
finalmente 
 CoUninitialize; 
 final; 
 final;

Cómo navegar a través de su código más rápido

Fri, 24 Oct 2008 15:45:34 -0500

Este artículo enseña técnicas para que los desarrolladores puedan utilizar para navegar por el código más rápido y comprender mejor.

(Originalmente publicado en Delphi-expert.com el 14 de mayo de 2004)

Esta es la tercera en nuestro 4-serie parte se esbozan los resultados de nuestro estudio la forma en que Castalia ayuda a los desarrolladores ser más productivos. Anteriormente, nos informó sobre la reducción de trabajo mediante la reducción de las pulsaciones de teclado yla calidad de la escritura de código más rápido con vivir de comprobación de errores. Esta semana vamos a discutir el código de navegación, desarrollador de hábitos, y cómo Castalia ayudado a nuestros sujetos de prueba navegar mejor su código.

Uso de intentar ... por último, a fin de evitar fugas de recursos

Fri, 24 Oct 2008 15:31:39 -0500

En este artículo se describe Delphi de intentar construir .. finalmente, cuando al uso, y la forma en Castalia hace que sea más fácil de usar.

(Originalmente publicado en Delphi-expert.com el 16 de marzo de 2004)

En una línea de negocio que me ha de examinar una gran cantidad de código fuente, a veces me aviso común hábitos y tendencias en las personas del código. A veces, estos hábitos son buenos, como la utilización de afirmaciones. A veces las costumbres son malas, como la utilización de etiquetas y gotos. A veces, el código es simplemente faltan algunos elementos muy importantes, ya sea debido a la pereza o la falta de comprensión por parte del programador que escribió el código. Una de estas construcciones que es muy poderosa, pero a menudo descuidado y, a veces abusiva, del Delphi es "intentar" construir. Durante las próximas dos semanas, vamos a ver lo que estas construcciones hacen y cómo usarlos bien, Castalia y cómo puede ayudarle a utilizar con eficacia el abandono y no ellos.

Uso de tratar .., salvo para manejar los errores

Fri, 24 Oct 2008 15:31:12 -0500

Más información sobre las excepciones y cómo escribir mejor manejo de errores de código. Castalia aprender cómo nos puede ayudar a escribir más robusto y con tolerancia a errores de código.

(Originalmente publicado en Delphi-expert.com el 23 de marzo de 2004)

Como se prometió, hoy es parte de nuestro debate de Delphi de intentar construcciones. La semana pasada, nos miró finalmente intentar .., Se enteró de lo que se destina para, cuando su uso, Castalia y cómo nos pueden ayudar a utilizarlo de manera más eficaz. Esta semana, vamos a examinar la otra mitad de la familia intentar, intentar .. salvo y aprender cómo Castalia puede intentar hacer de nuestra .. salvo el uso más eficaz. También se burlan de java.

Rápido refactorización con Castalia

Fri, 24 Oct 2008 15:05:50 -0500

Refactorización es el proceso de "mejorar el diseño de código existente". Aprenda a convertirse en uno más rápido y más productivo con refactorer Castalia.

Esta es la cuarta y última entrega de mi serie de artículos examinando los resultados de nuestro estudio la forma en que Castalia ayuda a los desarrolladores ser más productivos. En el último mes, he escrito acerca de la reducción de trabajo mediante la reducción de las pulsaciones de teclado, escribir código de calidad con mayor rapidez vivir error control, y navegar a través de código más rápido y con más precisión. Esta semana, voy a hablar de un Castalia más productivo y más útiles características: Refactorización automatizado.

No importa lo bueno que somos, todos estamos de escribir código que podría ser mejor. A menudo mirar en el código existente y darse cuenta de que podía haber utilizado mejor los nombres de clase, una mejor separación de los métodos, mejor organización, etc ... Esto es lo que se trata de refactorización - cambiemos el código existente para el mejor.

Cómo crear un pre-caché de sistema

Fri, 24 Oct 2008 14:51:00 -0500

En este artículo se describe cómo supervisar una unidad y pre-caché de archivos pequeños. Esto es especialmente útil con aplicaciones que poco a poco los flujos de transporte, como los reproductores de mp3 o aplicaciones P2P.

Este ejemplo demuestra dos cosas:
En primer lugar: ¿cómo controlar la unidad utilizando un ReadDirectoryChangesW. Esto permitirá que las ventanas de la aplicación de devolución de llamada cuando un cambio en un archivo o atributos de archivo es.
En segundo lugar, un pequeño ejemplo de un hilo que lleva a cabo el pre-cache.

Crear el stringlists antes de llamar a monitordrive o poner en marcha el hilo.
Monitor de una unidad con MonitorDrive (ruta)

type TTrackInfo = record H:Integer; O:TOverLapped;

De intercambio de Windows y la memoria virtual

Fri, 24 Oct 2008 14:36:50 -0500

Un ejemplo de cómo a la lista proceso de la memoria, y las ventanas no truco de la memoria caché las páginas.

Introducción
El sistema operativo Windows (sobre todo hablando de NT ahora, que es la siguiente: Windows 2000 Professional, pero probablemente se aplica a NT4 y XP también), no tienen un 'estúpido' el sistema de almacenamiento en caché.
Claro, para servidores podría funcionar bien, pero para sistemas de escritorio no es divertido.
Ponemos 512 Mb de memoria en un PC, sólo para notar que las ventanas todavía no bastante de intercambio si sólo ha desempeñado un juego y desea restaurar nuestro escritorio.
¿Por qué? porque explorer.exe y otras aplicaciones de escritorio no se utilizaron por un tiempo, por lo que su memoria es intercambiada con el archivo de la página. Considerando que el sistema de caché de archivos está lleno de datos del juego, ya que fue la última lectura de datos desde el disco ...

Descripción del problema
No me escuchas en un buen tiempo que Windows ha Susch molesto gestión de memoria. Y sea cual sea su sistema son las especificaciones, las ventanas de intercambio de cosas que usted no quiere que, ya que queremos un sistema que responda.

Invocando las ventanas de diálogo Buscar carpeta

Peter5 — Fri, 24 Oct 2008 14:36:26 -0500

Borland SelectDirectory del navegador es bastante feo, aquí está la manera de invocar el Windows una vez.

usos
ShlObj, ShellAPI;

......

BrowseForFolder función (el asa: HWND; strTitle: string; var strPath: string): boolean;
var info: TBROWSEINFO;
camino: array [0 .. MAX_PATH] de Char;
temas: PITEMIDLIST;
empezar
Resultado: = false;
camino :='';

hacer con la información
empezar
hwndOwner: = manejar;
pidlRoot: = nil;
pszDisplayName: = nil;
lpszTitle: = PChar (strTitle);
ulFlags: = BIF_RETURNONLYFSDIRS;
lpfn: = nil;
final;

temas: = SHBrowseForFolder (info);

si se ha asignado (temas) y luego
empezar
SHGetPathFromIDList (temas, ruta);