diff options
author | Graeme Geldenhuys <graemeg@gmail.com> | 2010-09-14 23:01:23 +0200 |
---|---|---|
committer | Graeme Geldenhuys <graeme@mastermaths.co.za> | 2010-09-23 16:24:33 +0200 |
commit | 95d6327b7c228c83abaa419238c34277def62a07 (patch) | |
tree | a11cc0a79db7326e6bc56f3eba0927d042df10dc /src/corelib/x11 | |
parent | c6e0a8b6bc4a252bfa210d5da163c3265ca47921 (diff) | |
download | fpGUI-95d6327b7c228c83abaa419238c34277def62a07.tar.xz |
Fixes range-check errors and compiler warnings.
Diffstat (limited to 'src/corelib/x11')
-rw-r--r-- | src/corelib/x11/fpg_x11.pas | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/src/corelib/x11/fpg_x11.pas b/src/corelib/x11/fpg_x11.pas index 68d50199..405e4264 100644 --- a/src/corelib/x11/fpg_x11.pas +++ b/src/corelib/x11/fpg_x11.pas @@ -789,8 +789,8 @@ begin end; FDNDTypeList.Clear; FActionType := 0; - FSrcWinHandle := -1; - FLastDropTarget := -1; + FSrcWinHandle := 0; + FLastDropTarget := 0; end; procedure TfpgX11Application.HandleDNDenter(ATopLevelWindow: TfpgX11Window; @@ -798,7 +798,7 @@ procedure TfpgX11Application.HandleDNDenter(ATopLevelWindow: TfpgX11Window; var actualtype: TAtom; actualformat: cint; - count, remaining, dummy: culong; + count, remaining: culong; xdndtypes: PAtomArray; i: integer; s: TfpgString; |