[fpc-pascal] Anybody know X11 and XDND (drag-n-drop)

Henry Vermaak henry.vermaak at gmail.com
Fri Sep 10 10:38:03 CEST 2010


On 10 September 2010 09:08, Graeme Geldenhuys <graemeg.lists at gmail.com> wrote:
> Hi,
>
> I'm having trouble fetching the XdndTypeList data. It works 100% on my
> 32-bit Linux laptop, but now trying on my 64-bit Linux desktop at
> work, the XGetWindowProperty() call under 64-bit linux for the
> XdndTypeList always returns count = 0, when in fact it should be 8, as
> my last section of the output shows. I simply forced count = 8,
> because I knew Nautilus has that many types, and wanted to see if my
> array of TAtom's actually contains the data - which it does!  So it
> does seem to fetch the data, it just doesn't report it in the
> variables: actualformat, count, remaining.
>
> Anybody got experience with this and know how I can resolve this problem?
>
>
> type
>  AtomArray = array [0..0] of TAtom;
>  PAtomArray = ^AtomArray;
> var
>  s: string;
>  actualtype: TAtom;
>  actualformat: Integer;
>  count, remaining, dummy: longword;
>  xdndtypes: PAtomArray;

You should use the ctypes here, since they'll change for 64 bit.

Henry



More information about the fpc-pascal mailing list