Ver Mensaje Individual
  #1  
Antiguo 07-09-2007
Dado de baja Dado de baja is offline
Miembro
 
Registrado: ago 2007
Posts: 140
Reputación: 19
Dado de baja Va por buen camino
Nombres automáticos.

Hola
en la sección de trucos he usado este código que me resulta muy interesante:
Código:
For x := 0 To ComponentCount - 1 Do
  If Components[x] Is TEdit Then
    TEdit(Components[x]).Text := '';
Pero me gustaría ampliarlo: Vereis imagina que en un DataSet tengo un registro de una DB, y quiero poner el valor en cada Edit. Cada Edit tiene el mismo nombre que el nombre del campo.

¿ como se podría hacer ?

Es decir con for recorres todos los campos, y si existe un componente con el mismo nombre que el campo pon en su propiedad text el valor del campo.
__________________
Saludos Cordiales.
------------------
Responder Con Cita