Ayuda Delphi!!

[Caroso]

Empezado por oscarac

coloca tu codigo a ver q tienes

Hola oscarac gracias por tu pronta respuesta... te muestro lo que tengo hasta ahora... este codigo lo obtube de este mismo foro...

esto lo ubique en el evento OnDesactivate del formulario...

Código Delphi [-]
procedure TForm1.FormDeactivate(Sender: TObject);
begin
  ReleaseCapture;
end;

y esto otro en el evento OnMouseLeave...

Código Delphi [-]
procedure TForm1.FormMouseMove(Sender: TObject; Shift: TShiftState;
  X, Y: Integer);
begin
  If GetCapture = 0 then
    SetCapture(frmLateralDerecho.Handle) ;
  If PtInRect(Rect(frmLateralDerecho.Left, frmLateralDerecho.Top, frmLateralDerecho.Left + frmLateralDerecho.Width, 
              frmLateralDerecho.Top + frmLateralDerecho.Height), ClientToScreen(Point(x, y))) then
    { Cosas a hacer si el puntero del mouse está dentro del formulario }
  else
    Form1.close; { Cosas a hacer si el puntero del mouse está fuera del formulario }
end;

el codigo anda... pero al sacar el mouse del formulario muy rapidamente el mismo permanece abierto...

Muchas Gracias