Ver Mensaje Individual
  #3  
Antiguo 23-09-2016
sa_pirata sa_pirata is offline
Miembro
 
Registrado: dic 2015
Posts: 14
Reputación: 0
sa_pirata Va por buen camino
Cita:
Empezado por Luis M. Ver Mensaje
Hola.
Agruparlos no lo se, pero podrías hacer algo así para tratar todos los DBEdits

Código Delphi [-]
 for I:= 0 to ControlCount - 1 do
    begin
      if Controls[i] is TDBEdit then
      begin
        TDBEdit(Controls[i]).ReadOnly := True;
        TDBEdit(Controls[i]).TabStop := False;
        TDBEdit(Controls[i]).Color := clMoneyGreen;
        TDBEdit(Controls[i]).StyleElements := [seFont,seBorder];
      end;
    end;
Muchas, gracias, voy a probar y aviso a ver que tal sale todo!
Responder Con Cita