Ver Mensaje Individual
  #5  
Antiguo 16-12-2006
Avatar de seoane
[seoane] seoane is offline
Miembro Premium
 
Registrado: feb 2004
Ubicación: A Coruña, España
Posts: 3.717
Reputación: 24
seoane Va por buen camino
Cita:
Empezado por Bicho
Ya echaba yo de menos al agonioso de Domingo siempre aguandome las respuestas, pero que te he hecho???
La verdad es que no pensaba contestar, pero al ver que lo hacías tu ....

Aprovecho para decir, aunque supongo que es evidente, que para saber si un control es el que esta por encima de todos solo hay que hacer algo como esto:

Código Delphi [-]
function EstoyPorEncima(Control: TControl): Boolean;
begin
  Result:= FALSE;
  if Control.Parent <> nil then
    Result:= Posicion(Control) = Control.Parent.ControlCount - 1;
end;

// Por ejemplo
 ShowMessage(BoolToStr(EstoyPorEncima(Panel1),TRUE));
Responder Con Cita