Double directory explorer

bcohio2001 · Post by **bcohio2001** » Apr 15, 2010 18:41

Some years ago I found a Double Directory Explorer on the web.
So I decided to make my own.

This will NOT intercept any Windows call. Will not change your system in any way.

*** CYA ALERT ***
USE AT OWN RISK!! NOT RESPONSIBLE FOR ANY LOST DATA!!!

Questions, comments and suggestions are welcome!

bcohio2001 · Post by **bcohio2001** » Apr 15, 2010 18:42

Here is a modified version that I use of Loe's wrapper.
Based on the thread http://www.freebasic.net/forum/viewtopic.php?t=9242

I commented on what macros were defined with FB

No code again...see previous post...

bcohio2001 · Post by **bcohio2001** » Apr 19, 2010 22:28

Version 0.2

No comments??? I saw that it has been looked at. Must not be flashy enough for anyone.

Amundo · Post by **Amundo** » Apr 20, 2010 5:17

Been busy as hell lately, so not had a chance to try this, but thanks much for sharing your code!

D.J.Peters · Post by **D.J.Peters** » Apr 20, 2010 6:20

bcohio2001 wrote:Version 0.2

No comments??? I saw that it has been looked at. Must not be flashy enough for anyone.

Code: Select all

Command executed:
fbc DDIR\DDir.bas ddir.rc

Error!
Line 63 of Resource Script (ddir.RC):-
Control type was not recognised:-
End
OBJ file not made

Results:
Compilation failed

D.J.Peters · Post by **D.J.Peters** » Apr 20, 2010 6:32

here are a working version (all files in one *.zip file)
and i removed all warnings

download: DDir.zip

Joshy

Loe · Post by **Loe** » Apr 20, 2010 8:15

thanks Joshy,
last time I compile, Ive got this error:

Code: Select all

Error!
Line 63 of Resource Script (ddir.RC):-
Control type was not recognised:-
End

OBJ file not made

Make done

I wonder if someone can provide sample of drag drop file, into Brian code

MichaelW · Post by **MichaelW** » Apr 20, 2010 9:09

Loe wrote:I wonder if someone can provide sample of drag drop file, into Brian code

I’m not sure exactly what you are asking, but the problem is that resource definitions are case sensitive and posting them between code tags will not preserve the case. Posting them between quote tags will preserve the case, but unfortunately the leading spaces get discarded:
DDir.rc

#define IDM_FileCmds 10001
#define IDM_Copy 10003
#define IDM_Move 10004
#define IDM_Delete 10005
#define IDM_SelAll 10001
#define IDM_InvSel 10003
#define IDM_FileOpenView 10003
#define IDM_Div1 10001
#define IDM_Div2 10014
#define IDM_Div3 10015
#define IDM_Opt 10001
#define IDD_MainDlg 1000
#define IDC_TRVTop 1001
#define IDC_TRVBottom 1002
#define IDC_STCTop 1003
#define IDC_STCBottom 1004
#define IDC_LSVTop 1005
#define IDC_LSVBottom 1006
#define IDR_MENUMain 10000
#define IDM_OpenT 10016
#define IDM_OpenB 10017
#define IDM_CTB 10006
#define IDM_CBT 10007
#define IDM_MTB 10008
#define IDM_MBT 10009
#define IDM_DT 10010
#define IDM_DB 10011
#define IDM_SAT 10004
#define IDM_SAB 10005
#define IDM_IST 10012
#define IDM_ISB 10013
#define IDM_Exit 10002
#define IDM_SaveExit 10003
#define IDM_SaveNow 10014
#define IDD_DLGFExist 1100
#define IDC_RBNSkip 1101
#define IDC_RBNOverW 1102
#define IDC_RBNRenameInput 1103
#define IDC_EDTInput 1104
#define IDC_BTNConfirm 1105
#define IDR_MENUPop 11000
#define IDM_PopOpen 11001
#define IDM_PopDiv1 11002
#define IDM_PopCopy 11003
#define IDM_PopDel 11004
#define IDM_PopMove 11005
#define IDM_PopDiv2 11006
#define IDM_PopAll 11007
#define IDM_PopInv 11008

IDD_MainDlg DIALOGEX 10,10,609,453
CAPTION "IDD_DLG"
FONT 8,"MS Sans Serif",0,0,0
MENU IDR_MENUMain
STYLE 0x10CB0000
BEGIN
CONTROL "",IDC_TRVTop,"SysTreeView32",0x50010027,0,15,120,201,0x00000200
CONTROL "",IDC_TRVBottom,"SysTreeView32",0x50010027,0,231,120,201,0x00000200
CONTROL "Drive",IDC_STCTop,"Static",0x50000000,0,3,603,9
CONTROL "Drive",IDC_STCBottom,"Static",0x50000000,0,219,606,9
CONTROL "",IDC_LSVTop,"SysListView32",0x50010009,123,15,483,201,0x00000200
CONTROL "",IDC_LSVBottom,"SysListView32",0x50010009,123,231,483,201,0x00000200
END

IDR_MENUMain MENU
BEGIN
POPUP "File"
BEGIN
POPUP "Open/View"
BEGIN
MENUITEM "Top",IDM_OpenT
MENUITEM "Bottom",IDM_OpenB
END
MENUITEM SEPARATOR
POPUP "Copy"
BEGIN
MENUITEM "Top to Bottom",IDM_CTB
MENUITEM "Bottom to Top",IDM_CBT
END
POPUP "Move"
BEGIN
MENUITEM "Top to Bottom",IDM_MTB
MENUITEM "Bottom to Top",IDM_MBT
END
POPUP "Delete"
BEGIN
MENUITEM "Top",IDM_DT
MENUITEM "Bottom",IDM_DB
END
MENUITEM SEPARATOR
POPUP "Select All"
BEGIN
MENUITEM "Top",IDM_SAT
MENUITEM "Bottom",IDM_SAB
END
POPUP "Invert Selection"
BEGIN
MENUITEM "Top",IDM_IST
MENUITEM "Bottom",IDM_ISB
END
MENUITEM SEPARATOR
MENUITEM "Exit",IDM_Exit
END
POPUP "Options"
BEGIN
MENUITEM "Always save on exit",IDM_SaveExit
MENUITEM "Save current as default",IDM_SaveNow
END
END

IDD_DLGFExist DIALOGEX 10,10,198,66
CAPTION "File exists at destination"
FONT 8,"MS Sans Serif",0,0,0
STYLE 0x10C20800
BEGIN
CONTROL "Skip this file",IDC_RBNSkip,"Button",0x50010009,9,9,90,9
CONTROL "Overwrite",IDC_RBNOverW,"Button",0x50010009,9,18,93,9
CONTROL "Rename as",IDC_RBNRenameInput,"Button",0x50010009,9,27,48,12
CONTROL "suggeted file name here",IDC_EDTInput,"Edit",0x50010000,57,27,135,12,0x00000200
CONTROL "OK",IDC_BTNConfirm,"Button",0x50010000,57,48,27,15
END

IDR_MENUPop MENU
BEGIN
MENUITEM "Open/View",IDM_PopOpen
MENUITEM SEPARATOR
MENUITEM "Copy",IDM_PopCopy
MENUITEM "Delete",IDM_PopDel
MENUITEM "Move",IDM_PopMove
MENUITEM SEPARATOR
MENUITEM "Select All",IDM_PopAll
MENUITEM "Invert selections",IDM_PopInv
END

The DDir.rc from DDir.zip has neither of these problems.

bcohio2001 · Post by **bcohio2001** » Apr 20, 2010 20:15

Would it help if I changed it from "Code" tag into "Quote" tag in the first post?

BastetFurry · Post by **BastetFurry** » Apr 20, 2010 20:40

@bcohio2001:
I havent a Windows open to test it, could you please post some screenys of this orthodox file manager of yours? :)
(Yeah, they are all called like that, old Uncle NortonCommander, Total Commander, Servant Salamander, FAR-Manager, ....)

bcohio2001 · Post by **bcohio2001** » Apr 21, 2010 0:09

(Removed attempted graphic link)

Will not allow remote linking....damn.

@Loe
If I ever get the shot up here, you will see that a "drag and drop" is not really needed. Here is a "text" representation:
----------------------
Tree1|ListView1|
----------------------
Tree2|ListView2|
----------------------

The trees can be navigated to 2 different paths.

Select files in one Listview, right click and a menu pops up with options to Move/Copy/Delete. If you select Move or Copy, it will assume that you want to Move/Copy to the other selected path.

Screenshot on site at first post.

srvaldez · Post by **srvaldez** » Apr 21, 2010 0:20

looks good :)

Loe · Post by **Loe** » Apr 21, 2010 0:47

@brian,@michael

If I ever get the shot up here, you will see that a "drag and drop" is not really needed. Here is a "text" representation:

Brian project working as expected ^_^
I mean drag drop feature looks fancy. Altough its not 'iconized', there was sample of 'text' drag drop sample like Old Norton Commander.

Brian, good work.

bcohio2001 · Post by **bcohio2001** » Apr 22, 2010 23:42

I thought about adding icons to the treeviews by showing a drive icon, closed folder and open folder.

Maybe add when get all the main operations done.

As for the listviews, the icon would depend on the type of file. What program would open it.

bcohio2001 · Post by **bcohio2001** » May 05, 2010 0:03

v0.3 05/04/2010
Added:
-- Copy/Move/Delete when folder is selected.
----No recycle bin for deleted files!
-- Check for drive added/removed, such as Pen drive (USB).

Working on:
-- Sort routine for listview header click

On the back burner:
-- Trapping events on the file viewer:
---- Open/View file when user hits enter key
-- Send deleted files to recycle bin...possible?
-- Find default editors for files -- Open With.