|
Por supuesto que se puede
Creas un descendiente de TForm, este sera tu ancestro comun para todos los form que mantengan una serie de DBEdits
Luego, hay 2 formas de manejar la coleccion de DBEdits:
1) A lo Poor man's: Recorres el arreglo de controles del form, preguntas si es un TDBEdit, si lo es, realizas un cast y modificas su propiedad ReadOnly
2) Mas elaborado: En tu ancestro TForm, declaras una lista de DBEdits; esta lista va a contener la coleccion de DBEdits que te interesa que se cambie su propiedad ReadOnly; luego, en el constructor, invocas a un método abstracto que se encargue de llenar dicha lista.
Luego es cuestion de proveer un metodo que recorra esa lista y cambie el valor de ReadOnly en cada iteracion
|