La respuesta, mi amigo, se va a ir con el parámetro

La respuesta, mi amigo, se va a ir con el parametro

La respuesta, mi amigo, se va a ir con el parametro : Multi-millones de consejos para hacer su vida mas facil.

El Perpetuo Novato Entrada de Diario #2.1
Este articulo aparecio por primera vez en http://www.undu.com
Cada uno de nosotros ha oido hablar de la reutilizacion de codigo mantra. Algunos de nosotros son un poco mas lentos para adoptar nuevas practicas cuando las viejas practicas son tan comodos como una vieja melodia. Pero los tiempos estan cambiado y es hora de meter un dedo en la reutilizacion, incluso si es solo para la reutilizacion de un formulario.
recientemente he tenido la causa para crear un formulario modal para hacer algo de edicion de un registro a partir de una cuadricula. Tiene sentido hacer un formulario modal, de modo que el usuario pueda ver la totalidad de la informacion a la vez. No hay problema. Yo hice referencia a la MainForm del origen de datos.Autoedit := false y todo funciono a la hunky-dory. El formulario modal consistia en unos campos de edicion, post boton, un boton de cancelar y tres controladores de eventos. Ademas de los post y cancelar los controladores, hubo un controlador de pulsacion de teclas que se convirtio entra en las pestañas. Tambien he desactivado el titulo-de la barra de boton de salida. La edicion fue iniciado por un boton en el bar el mirador en el formulario principal. El concepto trabajado muy bien en la auditoria de los cambios realizados durante la sesion de edicion en un campo de la historia.
por Lo que bien hizo el formulario modal de trabajo que me decidi a subir hasta el doble uso de la forma mediante el uso de ella para Agregar un nuevo registro en la base de datos. Todo lo que tenia que hacer era para el ejercicio de algun tiempo de ejecucion de las modificaciones, cambiando el titulo y el ajuste de algunos otros ajustes antes de abrirlo como un formulario modal. Mientras que el campo ID de Cliente fue de solo lectura en el formulario modal, fue desactivado en el Agregar formulario. Por lo menos yo PENSABA que era todo alli era demasiado.
me encontre con un problema debido a que la base de datos en cuestion era un detalle de la base de datos, conectados a un maestro. No hay problema. Yo simplemente copia el origen de datos y la tabla a otro nombre (es decir, de los Clientes a CustEdit). Entonces yo podria restablecer los punteros a la copia del origen de datos. El procedimiento que se acaba de editar tenia que incluir una gotoCurrent funcion de armonizar las dos copias y terminar con una actualizacion en el original para asegurarse de que todos los cambios se notaron.
La funcion de Edicion fue facil modificar:
& nbsp & nbsp & nbsp & nbsp & nbsp empezar
& nbsp & nbsp & nbsp & nbsp & nbsp & nbsp & nbsp FrmCustomer := TFrmCustomer.Create(nil)
& nbsp & nbsp & nbsp & nbsp & nbsp & nbsp & nbsp con FrmCustomer empiezan
& nbsp & nbsp & nbsp & nbsp & nbsp & nbsp & nbsp & nbsp & nbsp fldCustNum.readonly := true // NUEVA Asegurarse de que usted no puede cambiar la clave de campo
& nbsp & nbsp & nbsp & nbsp & nbsp & nbsp & nbsp & nbsp & nbsp caption := 'Editar' Cliente // NUEVO Hacer que el titulo indique la funcion
& nbsp & nbsp & nbsp & nbsp & nbsp & nbsp & nbsp & nbsp & nbsp TblCustEd.gotoCurrent(FrmMain.TblCustomer) // NUEVO armonizar la sombra de la tabla con el maestro
& nbsp & nbsp & nbsp & nbsp & nbsp & nbsp & nbsp & nbsp & nbsp si no (sourceCustEd.estado en dsEditModes)
& nbsp & nbsp & nbsp & nbsp & nbsp & nbsp & nbsp & nbsp & nbsp & nbsp & nbsp luego TblCustEd.edit // Asegurese de introducir el modo de edicion
& nbsp & nbsp & nbsp & nbsp & nbsp & nbsp & nbsp & nbsp & nbsp intentar ShowModal // abrir el formulario, utilizar y, a continuacion, la perdera
& nbsp & nbsp & nbsp & nbsp & nbsp & nbsp & nbsp & nbsp & nbsp & nbsp & nbsp finalmente Libre
& nbsp & nbsp & nbsp & nbsp & nbsp & nbsp & nbsp & nbsp & nbsp & nbsp & nbsp final
& nbsp & nbsp & nbsp & nbsp & nbsp & nbsp & nbsp final
& nbsp & nbsp & nbsp & nbsp & nbsp & nbsp & nbsp TblCustomer.actualizar // NUEVA Actualizacion de la visualizacion de los datos con el detras de escenas de los cambios
& nbsp & nbsp & nbsp & nbsp & nbsp final
las Cosas con el Complemento no trabajar tan pronto como he pulsado el boton durante la ejecucion. Se produjo una queja de que el conjunto de datos NO en el modo de edicion. Me puse en los puntos de interrupcion. Me cambie de uso agregar para Insertar y la espalda de nuevo. El programa rompian en TblCustEdit.anexar, incluso cuando les dije inmediatamente antes de la mano que la fuente estaba en el modo de edicion inmediatamente anterior. es decir,
& nbsp & nbsp & nbsp & nbsp & nbsp empezar
& nbsp & nbsp & nbsp & nbsp & nbsp & nbsp & nbsp FrmCustomer := TFrmCustomer.Create(nil)
& nbsp & nbsp & nbsp & nbsp & nbsp & nbsp & nbsp con FrmCustomer empiezan
& nbsp & nbsp & nbsp & nbsp & nbsp & nbsp & nbsp & nbsp & nbsp fldCustNum.readonly := false
& nbsp & nbsp & nbsp & nbsp & nbsp & nbsp & nbsp & nbsp & nbsp caption := 'Añadir Un Cliente'
& nbsp & nbsp & nbsp & nbsp & nbsp & nbsp & nbsp & nbsp & nbsp intentar TblCustEd.Anexar // BOMBA!!!!!!!!!!
& nbsp & nbsp & nbsp & nbsp & nbsp & nbsp & nbsp & nbsp & nbsp & nbsp & nbsp excepto showmessage('Edicion problematico')
& nbsp & nbsp & nbsp & nbsp & nbsp & nbsp & nbsp & nbsp & nbsp & nbsp & nbsp final
& nbsp & nbsp & nbsp & nbsp & nbsp & nbsp & nbsp & nbsp & nbsp intentar ShowModal
& nbsp & nbsp & nbsp & nbsp & nbsp & nbsp & nbsp & nbsp & nbsp & nbsp & nbsp finalmente Libre
& nbsp & nbsp & nbsp & nbsp & nbsp & nbsp & nbsp & nbsp & nbsp & nbsp & nbsp final
& nbsp & nbsp & nbsp & nbsp & nbsp & nbsp & nbsp & nbsp & nbsp final
& nbsp & nbsp & nbsp & nbsp & nbsp & nbsp & nbsp TblCustomer.actualizacion
& nbsp & nbsp & nbsp & nbsp & nbsp final
Si la puse y me registre para dsEditModes por encima de la de anexar declaracion y, a continuacion, marcada con un punto de ruptura, el depurador NO se ejecute, siendo optimizado o cambiado de ubicacion por el compilador. Y, el codigo estaba apuntando hacia el evento buttonclick del boton cuando se tiene terminado de responder a los cuadros de dialogo. Yo era uno confundido cachorro.

me dirigia a la Internet cuando por fin vi lo que era el problema. El newrecord metodo para TblCustomer incluye cuatro predeterminada configuracion de campo. Fue formulada en el procedimiento, por ejemplo, como:
& nbsp & nbsp & nbsp & nbsp & nbsp TblCustomer.fieldByName, ('Portador').asString := 'FEDEX'
ESTE FUE COPIADO a la newRecord campo de la copia de origen de datos. Yo veia esto horas antes de darse cuenta de que TblCustomer Y TblCustEdit no eran uno y el mismo [oveja con cara de mueca]! El problema se resolvio inicialmente por simplemente corregir el nombre de la discrepancia. Sin embargo, he llegado a la conclusion de que soy demasiado propenso a cometer ese error de nuevo. Sooooooooo....
El nuevo enfoque es utilizar el parametro de la llamada en el 'con' de estilo. I. e.
& nbsp & nbsp & nbsp & nbsp & nbsp empezar
& nbsp & nbsp & nbsp & nbsp & nbsp & nbsp & nbsp con el conjunto de datos empiezan
& nbsp & nbsp & nbsp & nbsp & nbsp & nbsp & nbsp & nbsp & nbsp fieldByName ('Portador').asString := 'FEDEX'
& nbsp & nbsp & nbsp & nbsp & nbsp & nbsp & nbsp & nbsp & nbsp fieldByName('GST').asBoolean := true
& nbsp & nbsp & nbsp & nbsp & nbsp & nbsp & nbsp & nbsp & nbsp fieldByName('PST').asBoolean := true
& nbsp & nbsp & nbsp & nbsp & nbsp & nbsp & nbsp & nbsp & nbsp fieldByName('Aprobado').asBoolean := False
& nbsp & nbsp & nbsp & nbsp & nbsp & nbsp & nbsp & nbsp & nbsp final
& nbsp & nbsp & nbsp & nbsp & nbsp final
he decidido que voy a usar ese parametro de la llamada mas a menudo. Es posible que requiera un comentario o dos para ser totalmente claro, en una lectura rapida, pero me comprometo a utilizar para Cubrir Mi Trasero contra la estupidez, como he perpetrado en contra de mi fecha limite hoy aqui.
Espero que esto ayuda a evitar que un ceño fruncido o dos en el futuro.
Mas sobre la seguridad de la Codificacion de Ideas
por Gary Mugford - [email protected]
El articulo anterior genero respuestas de Ramon Pinchazo y Andy Robinson. Aqui esta mi seguimiento:
Gracias a Ramon Pinchazo de los paises Bajos) para amplificar el concepto detras de mi articulo. Es el tipo de dialogo que a menudo puede ser esclarecedor y util para los programadores, pero el nivel de experto. Es cierto que la idea detras de seguros de codificacion es eliminar los errores de omision tanto como sea posible. Nombre de campo-cambio de no ir mas a menudo de lo que me gustaria. Ramon sugirio ir a una cierta longitud para evitar la mencion de los nombres de campo por nombres rigida, prefiriendo constantes o a nivel de campo definiciones en los modulos de datos.
sin Embargo, he encontrado la FBN referencias faciles de localizar y cambiar con cualquier estandar de utilidad grep. Que las constantes de la sugerencia que hace la facilidad de sustitucion de un complemento, es evidente. Pero que facilidad tienen un precio, el espacio de almacenamiento. En una aplicacion decente, la complejidad, el numero de nombres de campo podria ser considerable. Y estas tienen que ser a nivel de unidad global constantes tener cualquier valor y deben ser de nivel de aplicacion global constantes ser tanto valor como usted desea. Los modulos de datos tiene la utilizacion que usted sugiere, sino que añade otra capa para el codigo del programa. No estan todas las que son necesarias en una gestionan adecuadamente SDI interfaz donde el niño formas de utilizar el formulario de llamada de conjuntos de datos cuando sea apropiado.
con Todo, me parece que la incidencia de cambiar los nombres de campo (como negativas agregado nombres) se produce con tan poca frecuencia, que puedo decidir no pagar la sobrecarga. En el grupo de los esfuerzos de programacion o en aplicaciones MDI, facilmente puedo ver el valor en su primera sugerencia y recomiende su aprobacion.
En otro correo electronico, Andy Robinson, de sudafrica indico que el habia tenido problemas en el pasado con anidada uso de parametros del conjunto de datos. Su problema era con bucles interminables: '...en este tipo de estructura pareceria que no se puede confiar en ciertas declaraciones. por ejemplo. Yo ya no intento esto...
& nbsp & nbsp & nbsp & nbsp & nbsp con dataset1 empiezan
& nbsp & nbsp & nbsp & nbsp & nbsp & nbsp & nbsp con dataset2 empiezan
& nbsp & nbsp & nbsp & nbsp & nbsp & nbsp & nbsp & nbsp & nbsp & nbsp .....
& nbsp & nbsp & nbsp & nbsp & nbsp & nbsp & nbsp & nbsp & nbsp & nbsp siguiente
& nbsp & nbsp & nbsp & nbsp & nbsp & nbsp & nbsp & nbsp & nbsp & nbsp final
& nbsp & nbsp & nbsp & nbsp & nbsp & nbsp & nbsp final
& nbsp & nbsp & nbsp & nbsp & nbsp final
Esta es una situacion diferente de la que estaba seguro que habia un unico conjunto de datos de parametro que se pasa a traves de un metodo automatico como AfterInsert. Mientras que el no ha tenido el tiempo para investigar el problema y precisar, este tipo de heads-up, ahora me tiene un aspecto muy cuidado en todos anida con las declaraciones.
Por cierto, el codigo de uso de la plantilla permite que la mayoria de los habituales de solucion de problemas para el bucle problema observado por Andy. Tengo un WithEOF plantilla que los tipos:
& nbsp & nbsp con el | do begin
& nbsp & nbsp & nbsp & nbsp & nbsp primera
& nbsp & nbsp & nbsp & nbsp & nbsp mientras no eof do begin
& nbsp & nbsp & nbsp & nbsp & nbsp & nbsp & nbsp & nbsp & nbsp ...
& nbsp & nbsp & nbsp & nbsp & nbsp & nbsp & nbsp siguiente
& nbsp & nbsp & nbsp & nbsp & nbsp & nbsp & nbsp final
& nbsp & nbsp & nbsp & nbsp final
Tambien, FBNS para ampliar a fieldbyName('|').asString y FBNI para ampliar a fieldByName('|').asInteger realmente hacer maravillas en terminos de precision y la velocidad de entrada de codigo. En ultima instancia, como un solo hombre, tienda de estas de la velocidad de las ganancias de merito de la continuacion del uso de la codificacion de la practica que no funcionan tan bien en su organizacion.
& nbsp & nbsp & nbsp & nbsp Gary Mugford
& nbsp & nbsp & nbsp & nbsp Idea Mecanico Inc
& nbsp & nbsp & nbsp & nbsp Bramalea EN Canada