Cita:
Empezado por Nebli
Lo que voy a hacer es lo siguiente:
// con esto se el nombre del Tpanel sobre el que se ha hecho click
textop := (Sender As Tpanel).Name;
Le quito al contenido de 'textop' la palabra 'Panel' ya que cada Tpanel se llama Panel1, Panel2, ect. con lo que sólo me quedará el número del Tpanel seleccionado, que irá desde el 1 al 120.
|
¿para que tanto relajo con editar el nombre, quitarle el inicio, convertir el final a entero, etc, etc, cuando puedes utilizar la propiedad TAG como te recomendaron al principio?
Número := (Sender As Tpanel).Tag;