Ver Mensaje Individual
  #3  
Antiguo 18-02-2019
Avatar de Neftali [Germán.Estévez]
Neftali [Germán.Estévez] Neftali [Germán.Estévez] is offline
[becario]
 
Registrado: jul 2004
Ubicación: Barcelona - España
Posts: 18.275
Reputación: 10
Neftali [Germán.Estévez] Es un diamante en brutoNeftali [Germán.Estévez] Es un diamante en brutoNeftali [Germán.Estévez] Es un diamante en bruto
Cita:
Empezado por donpedro Ver Mensaje
He intentado hacerlo con IF pero seria muchas condiciones. Apelo a ustedes para ver de que otra forma se podria hacer.

Lo primero es poner nombres "adecuados" a los controles TEdit que hay en el formulario.
Lo segundo es, que como biien dices, intentar hacerlo copn IF te dará un número de condiciones muy grande (inviable).


Puedes acceder a un componente utilizando su nombre utilizando algo similar a lo siguiente:


Código Delphi [-]
var
  edt:tedit;
begin
  ...
  // Acceder a un componente por su nombre

  edt := FindComponent('edit1');
  // cambiar el contenido de edit1

  edt.Text := '111';


Si combinas esto con un bucle FOR y los índices correctos, podrás acceder a todos los Edits.


No se si me he explicado. Si es que no coméntalo y te podemos añadir un ejemplo más explicativo.
__________________
Germán Estévez => Web/Blog
Guía de estilo, Guía alternativa
Utiliza TAG's en tus mensajes.
Contactar con el Clubdelphi

P.D: Más tiempo dedicado a la pregunta=Mejores respuestas.
Responder Con Cita