Re: More than 1 DragItem to a window

[[EMAIL PROTECTED]]

Thanks a lot!


Op 20-apr-2006, om 15:58 heeft Hans-Georg het volgende geschreven:

Am 20.04.2006 um 15:54 schrieb Hans-Georg:

If obj.FolderItemAvailable Then
        f.Append obj.FolderItem
        If Obj.NextItem And obj.FolderItemAvailable Then
                f.Append obj.FolderItem
        End If
End If

Change the second if condition to a while loop:

If obj.FolderItemAvailable Then
        f.Append obj.FolderItem
        while Obj.NextItem
                If obj.FolderItemAvailable Then
                        f.Append obj.FolderItem
                End If
        Wend
End If

Hans-Georg

_______________________________________________
Unsubscribe or switch delivery mode:
<http://www.realsoftware.com/support/listmanager/>

Search the archives of this list here:
<http://support.realsoftware.com/listarchives/lists.html>

_______________________________________________
Unsubscribe or switch delivery mode:
<http://www.realsoftware.com/support/listmanager/>

Search the archives of this list here:
<http://support.realsoftware.com/listarchives/lists.html>