> >
> > To fix this error,just add this code to your Form::OleDragDrop event:
> >
> >
oDataObject.GetData(15, @aValues )
> > If EMPTY(aValues) &&<------------------------this is new
> > Return
> > Endif &&<-------------------- End of new code
> > For i = 1 To Alen(aValues)
> >
> >
> > and make the list look like a proper listbox.
> >
> > Resize it, and AutoHideScrollbar = 0
> >
> > Now that was much easier to do with a .scx than a prg.
> >
> > Bernard
> >

> >
** If you see someone without a smile, give em one of yours :) **> >
My Blog
>
> -The problem is that i cannot find this error.I drop dozen of images jpg,gif,png,bmp and i dont get any error !
> -if empty(aValues)....But this matrix is never empty and always alen(aValues)>=1.
>
The instructions in the image are very clear
Message ID: 2330591. Drag an image to the listbox
2. drag the listbox item onto the form and release.
Error!
Bernard
** If you see someone without a smile, give em one of yours :) **My Blog