diff options
author | Graeme Geldenhuys <graemeg@gmail.com> | 2014-10-15 23:15:24 +0100 |
---|---|---|
committer | Graeme Geldenhuys <graemeg@gmail.com> | 2014-10-15 23:15:24 +0100 |
commit | 825e203790d4d4e1b4ff51568331c36933579d39 (patch) | |
tree | f32babcf15c8c972ca96cd8c019966bb9c9d3ac4 | |
parent | 67edea50d12e2d00f8fa81b231cc63011f6828ec (diff) | |
download | fpGUI-825e203790d4d4e1b4ff51568331c36933579d39.tar.xz |
uidesigner: Those IFDEF's are not needed for Linux/FreeBSD any more.
-rw-r--r-- | uidesigner/vfdresizer.pas | 8 |
1 files changed, 2 insertions, 6 deletions
diff --git a/uidesigner/vfdresizer.pas b/uidesigner/vfdresizer.pas index 657746b6..a01af27b 100644 --- a/uidesigner/vfdresizer.pas +++ b/uidesigner/vfdresizer.pas @@ -43,7 +43,7 @@ type constructor Create(ACompDesigner: TObject; adirection: integer); reintroduce; procedure Show; end; - + implementation @@ -65,18 +65,14 @@ begin FDragging := True; FDragPosX := x; FDragPosy := y; - {$IFDEF MSWINDOWS} CaptureMouse; - {$ENDIF} end; procedure TwgResizer.HandleLMouseUp(x, y: integer; shiftstate: TShiftState); begin inherited HandleLMouseUp(x, y, shiftstate); FDragging := False; - {$IFDEF MSWINDOWS} ReleaseMouse; - {$ENDIF} end; procedure TwgResizer.HandleMouseMove(x, y: integer; btnstate: word; @@ -91,7 +87,7 @@ begin if (not FDragging) or ((btnstate and MOUSE_LEFT) = 0) then Exit; - + dx := x - FDragPosX; dy := y - FDragPosY; |