Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Otros entornos y lenguajes > C++ Builder
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 30-11-2011
omarodalis omarodalis is offline
No confirmado
NULL
 
Registrado: oct 2011
Posts: 15
Poder: 0
omarodalis Va por buen camino
Wink Capturar los valores de Edit credos en tiempo real

hola a todos.. aki estoy con otra duda.... estoy creando en tiempo de ejecucion un numero aleatorio de edits pero nosé como capturar sus valores al hacer clic en un button...

aki mi codigo para crea los edits en tiempo de ejecucion...
Código:
void __fastcall TForm1::CrearEdits(int Cant)
{

 	for(int i=0;i < Cant; i++)
	{
		TE1 = new TEdit(this);
		TE1->Left = 10;   //lado izquierdo
		TE1->Height = 50; //abajo
		TE1->Width = 75;  //largo Edit
		TE1->Top = i*30 + TE1->Height;
		TE1->Name = "variable" + IntToStr(i+1);
		TE1->Parent = this;    // o InsertControl(TE);
	}
}
si saben como capturar los valores de los Edits creado en tiempo de ejecucion les agradezco de antemano su ayuda... muchas gracias... saludos

Última edición por ecfisa fecha: 30-11-2011 a las 19:16:24. Razón: ETIQUETAS [CODE] [/CODE]
Responder Con Cita
  #2  
Antiguo 30-11-2011
Avatar de ecfisa
ecfisa ecfisa is offline
Moderador
 
Registrado: dic 2005
Ubicación: Tres Arroyos, Argentina
Posts: 10.508
Poder: 36
ecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to behold
Hola omaroladis.

Una forma es usando la funcion FindComponent. Por ejemplo tomando tu código, para cambiar la propiedad Text del Edit cuyo nombre es variable5 sería:
Código:
void __fastcall TForm1::Button2Click(TObject *Sender)
{
 TEdit *Ed = static_cast<TEdit*>(FindComponent("variable5"));
 AnsiString s = Ed->Text;
 s = s + " Nuevo Texto";
 Ed->Text = s;
}
En forma directa:
Código:
void __fastcall TForm1::Button2Click(TObject *Sender)
{
 Caption = IntToStr(((TEdit*)FindComponent("variable5"))->Width);
}
Claro que para que funcione, le tenés que haber asignado un valor a la propiedad Name del TEdit previamente creado. (tál como en el código que pusiste).

Un saludo.
__________________
Daniel Didriksen

Guía de estilo - Uso de las etiquetas - La otra guía de estilo ....

Última edición por ecfisa fecha: 30-11-2011 a las 19:44:54. Razón: Ampliar codigos de ejemplo
Responder Con Cita
  #3  
Antiguo 30-11-2011
omarodalis omarodalis is offline
No confirmado
NULL
 
Registrado: oct 2011
Posts: 15
Poder: 0
omarodalis Va por buen camino
Thumbs up Solucionado

bueno después de unos minutos de haber publicado mi duda obtuve la respuesta gracias ecfisa... aquí el código para capturar los datos de los Edits creados en tiempo de ejecución..
Código:
TEdit *TE1;
TEdit *TE2;
String cantidad;
//---------------------------------------------------------------------------

void __fastcall TForm1::CrearEdits(int Cant)             ///método para crear los edits 
{

 	for(int i=0;i < Cant; i++)
	{
		TE1 = new TEdit(this);
		TE1->Left = 10;   //lado izquierdo
		TE1->Height = 50; //abajo
		TE1->Width = 75;  //largo Edit
		TE1->Top = i*30 + TE1->Height;
		TE1->Name = "variable" + IntToStr(i+1);
		TE1->Parent = this;    // o InsertControl(TE);
	}
	
}
//-----------------------------------------------------
void __fastcall TForm1::Button1Click(TObject *Sender)///obtener del usuario cuantos edits creamos
{

	bool respuesta;
	respuesta = InputQuery("Cantidad ","Numero de variables", cantidad);
	if(respuesta == True)
	{
		CrearEdits(cantidad.ToInt());                 ///llamamos el metodo que nos crea los edits 
    }
}
void __fastcall TForm1::Button2Click(TObject *Sender)
{
	for (int i = 1; i < cantidad.ToInt()+1; i++)
	{
	String text=((TEdit*)FindComponent("variable"+IntToStr(i)))->Text;  ///// Capturamos los valores introducidos en los edits por el usuario
	}
}
///un total agradecimiento a ecfisa.. muchas gracias por la ayuda que dios te bendiga.. saludos a todos..

Última edición por ecfisa fecha: 30-11-2011 a las 19:46:00. Razón: ETIQUETAS [CODE] [/CODE]
Responder Con Cita
Respuesta



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

Temas Similares
Tema Autor Foro Respuestas Último mensaje
Ver actualizaciones a la BdD en tiempo real carlix_pc Firebird e Interbase 1 29-10-2011 21:38:54
Mercado de valores (Bolsa en tiempo real) Kubelo Varios 2 29-04-2010 10:33:38
*** Capturar cotizacion divisa en tiempo real de internet *** APO Internet 4 18-12-2009 19:58:20
Mostrar en un edit una variable de tipo real Petolansa Varios 4 31-10-2007 03:56:47
Video en tiempo real Fitoperu Internet 1 25-08-2005 21:47:07


La franja horaria es GMT +2. Ahora son las 20:12:07.


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