Club Delphi  
    Paypal   FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > OOP
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Coloboración Paypal con ClubDelphi

 
 
Herramientas Buscar en Tema Desplegado
  #3  
Antiguo 08-02-2005
SyncMaster SyncMaster is offline
Miembro
 
Registrado: mar 2004
Posts: 15
Poder: 0
SyncMaster Va por buen camino
Yo en lo personal utilizo otro metodo. Si tengo por ejemplo 20 EDIT dentro de una form a todos ellos les pongo numeros consecutivos de esta forma :

Edit1
Edit2
Edit3
.
.
.
Edit20

Cuando necesito recorrerlos para saber sus valores o para realizar cualquier otra operación lo hago de la siguiente forma :

Código:
For i:=1 To 20 Do 
 With TEdit (FindComponent ('Edit'+IntToStr(i)) Do
 Begin
    // Aqui hago lo que tenga que hacer con su valor
 End;
¿Sirve?

Una forma similar con los botones, Le asignos diferentes numero en la propiedad TAG del boton para diferenciarlos, pero le asigno el mismo evento CLIC a todos y dentro del procedimiento del evento clic utilizo la clausula CASE para identificar donde hizo clic el user

Código:
Case (Sender as TComponent).Tag of
	   1 : ; //
	   2 : ; //
	   .
	   .
	  End;
Saludos

Última edición por SyncMaster fecha: 08-02-2005 a las 03:47:46.
Responder Con Cita
 



Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro


La franja horaria es GMT +2. Ahora son las 00:05:01.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2026, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi