Seleccionar un rango de DBEdits
Buenas y gracias de antemano ante cualquier ayuda u/o comentario...
Tengo una duda existencial, ¿Es posible seleccionar un rango de DBEdits para, por ejemplo, seleccionar los DBEdits del 1 al 10 y dejarlos en "ReadOnly = True" sin afectar a los demas? Mas que nada es para no tener que escrivir el codigo correspondiente por cada DBEdit a cambiar ya que necesito dejar el resto intacto... Utilizo Delphi 2010, MySQL, Zeos 7... de antemano Muchas Gracias... |
yo uso mas o menos esta funcion
|
Gracias Oscarac, es mas menos lo que necesito, tengo un codigo similar que hace lo mismo, pero este codigo afecta a todos los DBEdits, y yo necesito solo algunos, en rangos, del 1 al 10 por ejemplo, no todos...
Esop... espero alguien pueda ayudarme a buscar una solucion... |
A los DBEdit que quieras cambiar ponles su propiedad Tag igual a 1 en el inspector de objetos y en el código de oscarac añades la condición:
// Saludos |
Hola.
También podes hacerte un procedimiento que cambie cualquier propiedad ordinal, siempre que la tengan, de los controles del form:
Eso te permite hacer cosas como por ejemplo: Lo que sí tenés que ser cuidadoso con los nombres, el procedimiento no es tan virtuoso como para distinguir Edit1 de EdiT1 ... :) Pero si deseas ese comportamiento, es muy sencillo implementar que ignore mayúsculas/minúsculas. (UpperCase) Saludos. Edito: Me olvidé de avisarte, el procedimiento funciona sólo con propiedades ordinales. (no podrías cambiar la propiedad Text por ejemplo) |
Muchisimas gracias!!!
Uffff!!! Muchas gracias!!! Gracias por la pronta respuesta y mas aun por la variedad de soluciones, en una media hora mas menos probare los codigos, muchas gracias nuevamente, espero no tener problemas... Byes!!
|
Hola.
Aunque no pretende ser código de alto vuelo con el uso de RTTI ( esa taréa se la dejo a Neftalí ), te completé el procedimiento para que contemple algunos tipos más de propiedades. (no podía ser tan haragán...:p).
Ahora podés hacer por ejemplo:
Un saludo. |
La franja horaria es GMT +2. Ahora son las 16:45:36. |
Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi