Thanks strongm, that is amazing. The only thing I haven't been able to figure out is how to increase the size of the thumbnails. I tried changing all the parameters in your FolderViewMode but the thumbnails always remained tiny.
Then I need to deal with the aspect ratio of the Image control but...
Thanks Andy, I already tried that method but it can be very slow loading a few hundred jpg's
Experience is something you don't get until just after you need it.
My wife isn't computer literate so I wrote a programme that opens up in the folder where she has all her photo's. It's preferred if she can see her photo thumbnails so she can easily view them then select individual images to view full screen and copy to for posting to Facebook.
It would be...
Is there a way to force the CommonDialog control to stay open, or is there an alternative control which will do that?
Experience is something you don't get until just after you need it.
Mike, let me try to explain myself better:
C:\Folder\video\File1 - CopyFolder C:\Video\File1, D:\, False
C:\Folder\Video\File2 - CopyFolder C:\Video\File2, D:\, False
C:\Folder\Video\File3 - CopyFolder C:\Video\File3, D:\, False
If the folder D:\Video exists on the destination drive but that...
@strongm are you trying to only copy files that are newer than matching file in the destination (i.e if source file is older than a file in the destination you do not want to overwrite it)?
Yes, that is exactly what I was hoping to achieve by using CopyFolder. But now that I realise that...
That is the problem. Not only does it not overwite existing folders, it doesn't copy new files from source to destination into an existing folder.
Experience is something you don't get until just after you need it.
If I set the switch to FALSE i.e. fso.CopyFolder ListFolders.List(i), DriveLetter, FALSE - it doesn't copy newer files if the folder already exists on the receiving drive.
Is there a way round this?
Experience is something you don't get until just after you need it.
I use 2 labels on a picture box to add a caption to a photograph. Set a transparent background and offset the x and y of one label and set the foreground colour of the rearmost label to black. This gives the appearance of a shadow.
Experience is something you don't get until just after you...
@strongm, just a query because I've not done it for years but can you not just declare the strings as fixed length?
Experience is something you don't get until just after you need it.
I searched the internet looking for a way to force the Common Dialog Control to always start with Extra Large Icons, but I didn't find any help with this.
Does anybody know if this can be done?
Experience is something you don't get until just after you need it.
This solution is based on Andrzejek idea:
Private Declare Sub mouse_event Lib "user32.dll" (ByVal dwFlags As Long, ByVal dx As Long, ByVal dy As Long, ByVal cButtons As Long, ByVal dwExtraInfo As Long)
Const MOUSEEVENTF_LEFTDOWN = &H2
Private Sub Form_Load()
Timer1.Interval = 50000...
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.