ImageEn for Delphi and C++ Builder ImageEn for Delphi and C++ Builder

 

ImageEn Forum
Profile    Join    Active Topics    Forum FAQ    Search this forumSearch
Forum membership is Free!  Click Join to sign-up
Username:
 Password:
Save Password
Forgot your Password?

 All Forums
 ImageEn Library for Delphi, C++ and .Net
 ImageEn and IEvolution Support Forum
 IncludeSubFolders and IEFolderMView1.SetFolderEx ?		  New Topic  Reply to Topic
Author Previous Topic Topic Next Topic  

klausdoege

Germany
389 Posts
Posted - Jan 19 2017 :  11:55:01  Show Profile  Reply
Hi,
i have found the following, when I do:

IEFolderMView1.IncludeSubFolders: = false;
IEFolderMView1.SetFolderEx (dir, iefAllImagesAndVideos, '');

And immediately:

IEFolderMView1.IncludeSubFolders: = true;
IEFolderMView1.SetFolderEx (dir, iefAllImagesAndVideos, '');

Then the following procedure will run twice at the second time for each image.

TForm1.ILolderMViewImageAdd (Sender: TObject; idx: Integer; const sFilename: string; bFolder, bHiddenFile: Boolean;
  IFileSizeBytes: Int64; CreateDate, EditDate: TDateTime; Var bAllow: Boolean);
Begin
    Label1.Caption: = inttostr (idx);
    If odd (idx) then application.ProcessMessages;
end;


What can i do ?


Klaus
www.klausdoege.de

xequte

38613 Posts
Posted - Jan 19 2017 :  18:12:32  Show Profile  Reply
Hi Klaus

So, to clarify, if you remove the first call to SetFolderEx() then OnImageAdd is added only once per image?

So you are see values of idx like the following:

0
0
1
1
2
2
3
3
...


Nigel
Xequte Software
www.xequte.com
nigel@xequte.com
Go to Top of Page

klausdoege

Germany
389 Posts
Posted - Jan 20 2017 :  02:55:16  Show Profile  Reply
Hi Nigel,
first without subfolder
0,1,2,3,.....
then draw picture

second with subfolder
0,1,2,3,4....
0,1,2,3,4....
then draw picture

third with subfolder
0,1,2,3,4...
then draw picture

only when first without subfolder and then with subfolder
then 0,1,2.. 0,1,2,..


Klaus
www.klausdoege.de
Go to Top of Page
  Previous Topic Topic Next Topic  
 New Topic  Reply to Topic
Jump To: