Ver Mensaje Individual
  #5  
Antiguo 11-04-2007
Avatar de anubis
anubis anubis is offline
Miembro
 
Registrado: mar 2007
Posts: 863
Reputación: 18
anubis Va por buen camino
gracias me estas ayudando mucho.

este control donde lo pongo, lo he puesto en initialization pero me da error en el componente FindComponent
la verdad es que tambien me puede servir para cambiar el shape que he puesto al poner h101 se puede poner en vez de h101.brush.color tshape.brush.color?

gracias de nuevo asi da gusto aprender.

Código Delphi [-]
var
  comp:Tcomponent;
begin
  comp := FindComponent('L' + Sender.Name);
  // esto te daría que la variable comp está apuntando al compoenente Lh101, Lh102,...
  // dependiendo si has pulsado sobre la label h101, h102,...
Responder Con Cita