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 Buscar Temas de Hoy Marcar Foros Como Leídos

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 02-06-2018
chinchan chinchan is offline
Miembro
 
Registrado: abr 2006
Posts: 109
Poder: 18
chinchan Va por buen camino
Onclick en tiempo de ejecución

Tengo una aplicación que en tiempo de ejecución crea unos objetos, entre ellos varios TButton (unos 100), Cuando pulso unos de ellos... ¿Cómo puedo saber cual he pulsado?. He creado el evento OnClickk:
Código PHP:
for(a=1;a<=100;a++){
  
Boton[a] = new TButtonl(this);
  
Boton[a]->Parent=ScrollBox1;
  
Boton[a]->Tag=a;
  
Boton[[a]->OnClick botoncliqueado;
}  


void __fastcall TForm1::botoncliqueado(TObject *Sender)
{
  
ShowMessage(quiero saber que botón he pulsado);

En este mismo ClubDelphi he visto alguna solución similar, pero están en Delphi y no sé cómo pasarlas a C++ builder.

Por favor, ¿me podéis echar una mano?. Sé que estoy cerca, pero no lo acabo de ver.

Gracias

Última edición por ecfisa fecha: 02-06-2018 a las 05:56:00. Razón: Agregar etiquetas [php] [/php]
Responder Con Cita
  #2  
Antiguo 02-06-2018
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.

Código PHP:
...
void __fastcall TForm1::FormCreate(TObject *Sender)
{
  for( 
int a 0100a++ )
  {
    
Boton[a] = new TButton(this);
    
Boton[a]->Top 25 10;
    
Boton[a]->Tag a+1;
    
Boton[a]->Name "Button" IntToStr(a+1);
    
Boton[a]->OnClick botonCliqueado;
    
Boton[a]->Parent ScrollBox1;
  }
}

void __fastcall TForm1::botonCliqueado(TObject *Sender)
{
  
TButton *bt static_cast<TButton*>(Sender);
  
ShowMessage("Name: " bt->Name "\nTag: " IntToStr(bt->Tag));
}
... 
Saludos
__________________
Daniel Didriksen

Guía de estilo - Uso de las etiquetas - La otra guía de estilo ....
Responder Con Cita
  #3  
Antiguo 03-06-2018
chinchan chinchan is offline
Miembro
 
Registrado: abr 2006
Posts: 109
Poder: 18
chinchan Va por buen camino
Perfecto.... Muchas gracias. Lo tenía a la vista pero no lo veía. Gracias por tu luz.
Responder Con Cita
Respuesta


Herramientas Buscar en Tema
Buscar en Tema:

Búsqueda Avanzada
Desplegado

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
Asignar Evento OnClick en forma dinamica en tiempo de ejecucion delphi50jmb OOP 7 06-07-2008 04:46:02
Usar evento OnClick en imagen creada en ejecucion ilcapo C++ Builder 8 12-04-2007 22:08:51
Tabla en tiempo de ejecucion noshy SQL 1 24-07-2006 01:39:31
redimensionar en tiempo de ejecución aranel OOP 2 26-11-2005 19:43:42
Tiempo de ejecucion? st7 Varios 3 11-05-2004 23:03:28


La franja horaria es GMT +2. Ahora son las 23:55:37.


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