| Ver tema anterior :: Ver tema siguiente |
| Autor |
Mensaje |
pariente Cdt


Registrado: 25 Jul 2007Mensajes: 14Ubicación: Albacete
|
Publicado: Dom 16 Sep, 2007 5:32 pm Asunto: Como sacar el nombre de un boton al hacer click |
|
|
Muy buenas de nuevo.
La cosa esque creo botones tspeedbutton automaticamente en tiempo de ejecucion y les asigno nombres mediante una variable (i), pero tengo un problema deseo sacar el nombre del boton a una variable externa al hacer click sobre el pero no se como hacerlo, he intentado crearme un metodo al que le paso un parametro ansistring cuando se efectua el evento onclick pero me da un error, no me deja asignar a este evento un metodo con parametros solo me deja un metodo sin parametros (Tobject *sender), no encuento la manera de hacerlo, quiza exista alguna propiedad o funcion que pueda usar par ello pero la desconozco totalmente ya que estoy muy muy verde en builder.
Os pongo el trozo de codigo donde creo los botones y asigno el metodo MiOnClick al evento OnClick:
| Código: |
TSpeedButton *boton=new TSpeedButton(this);
boton->Parent=this;
boton->Name="SEG"+ IntToStr(i);
boton->Glyph->LoadFromFile(Form1->rutt()+"sedor.bmp");
boton->Height=33;
boton->Width=33;
boton->Top=(P1.y-52);
boton->Left=(P1.x-15);
boton->OnClick = MiOnClick;
boton->Hint=boton->Name;
boton->ShowHint=true;
i++;
|
He buscado en los foros y en la ayuda de builder pero no doy con la solucion.
Os agradeceria enomente vuestra ayuda.
Gracias y saludos. |
|
| Volver arriba |
|
 |
dan Ens

Registrado: 17 May 2006Mensajes: 43
|
Publicado: Lun 17 Sep, 2007 7:06 pm Asunto: |
|
|
Hola...
Dentro de la funcion de Onclick que para el caso sería el 'MiOnClick' se debe hacer un cast del Sender asi:
TSpeedButton *boton=(TSpeedButton *)Sender;
y luego de allí sacar el nombre.
String nombre=boton->Name;
listo... |
|
| Volver arriba |
|
 |
pariente Cdt


Registrado: 25 Jul 2007Mensajes: 14Ubicación: Albacete
|
Publicado: Mar 18 Sep, 2007 1:18 am Asunto: |
|
|
Muchisimas gracias por tu respuesta.
Me ha resultado de gran ayuda.
Gracias y Saludos. |
|
| Volver arriba |
|
 |
|