Ver Mensaje Individual
  #3  
Antiguo 06-09-2010
Avatar de Caro
*Caro* Caro is offline
Moderadora
 
Registrado: jul 2004
Ubicación: Cochabamba, Bolivia
Posts: 2.544
Reputación: 22
Caro Va por buen camino
Hola jandro, también puedes hacerlo de esta forma:

Código Delphi [-]
procedure TForm2.FormMouseMove(Sender: TObject; Shift: TShiftState; X,
  Y: Integer);
begin
  If GetCapture = 0 then
    SetCapture(Self.Handle) ;
  if Not PtInRect(Self.BoundsRect, Mouse.CursorPos) then //Si esta fuera del form
    Self.Hide;
end;

Saluditos
__________________
Disfruten cada minuto de su vida a lado de sus seres queridos como si fuese el ultimo, uno nunca sabe lo que puede pasar.
Responder Con Cita