Jump to content

AutoitExplorer ;)

Holger

By Holger
in AutoIt Example Scripts

 Share

Recommended Posts

Holger Universalist

Holger

Posted
Posted (edited)

Hi :whistle:

this is just my unfinished script so you can see some other possibilities.

The code is not really structured but hey it's just for fun :dance:

Here a small screenshot...

BTW: self created items with Win32 API commands are not supported so please don't ask me :dance:

So long...

Holger

Edit: forgot: newest beta 3.1.1.73 is needed

Autoit3Explorer.au3

Edited by Holger

Old project:GUI/Tray menu with icons and colors

Other old stuff:IconFileScanner, TriState/ThreeState GUI TreeView, GUI ContextMenu created out of a TreeView

Holger Universalist

Holger

Posted
  • Author
Posted (edited)

Yeah, is just for fun and testing some possibilities.

I tried some weeks to create treeview items on the fly with Win3Api and had no luck until end of last week (I think).

Maybe someone can create an explorer shell part with COM.

I tried yesterday COM commands the first time so I have no luck to now.

So, maybe it will take weeks again to study and learning and maybe it is not possible with the COM functions...

But it's not the problem so I can better understand some things for the future :whistle:

(Maybe I will work again on my old DirList/DirTree controls for the GUI - search the forum then you know what I mean :dance: ) ...

So long...

Holger

Edited by Holger

Old project:GUI/Tray menu with icons and colors

Other old stuff:IconFileScanner, TriState/ThreeState GUI TreeView, GUI ContextMenu created out of a TreeView

Frozenyam Wayfarer

Frozenyam

Posted
Posted

Awesome job, it looks amazing. Is it actually in German though?

"... and the Lord said to John, "Come forth and ye shall receive eternal life," but instead John came fifth and won a toaster."

theguy0000 Universalist

theguy0000

Posted
Posted

Awesome job, it looks amazing. Is it actually in German though?

<{POST_SNAPBACK}>

i dont think so, i thinkits just his computer thats in german

The cake is a lie.www.theguy0000.com is currentlyUP images.theguy0000.com is currentlyUP all other *.theguy0000.com sites are DOWN

  • 3 weeks later...
Zach Wayfarer

Zach

Posted
Posted

Nice

Maybe somone can explain this to me, I use this, and hit my c drive, or I use explorer and hit my c drive - and any thing else and it takes between 2 minutes and 5 minutes for it to give me a listing (and I am using a 2.6 ghz machine with a gig of ram - maybe not the fastest in the west, but fast enough.

On the other hand, I have built the same exact type of program, complete with the directory listing on the side, and the files to the right - even has a thumbnail, list, details mode for the file listings - did this in php and I get the directory listing instantly.

Just curious if someone knows off the top of their head what the difference is

this-is-me Universalist

this-is-me

Posted
Posted

Holger, do you realise that this takes up gobs of memory? I picked my system32 directory and autoit was using 415MB of Memory! Is this normal/a bug/autoit's fault?

Who else would I be?
  • 4 months later...
randallc Universalist

randallc

Posted
Posted (edited)

Autoit3Ex.au3

Hi,

Again, just for interest; the GUI was slow, and hit the 4000 limit, so I fiddled a workaround to scroll etc.

What do you think?

[also some other minor changes for speed]

[for functionality because I may use it for the Search Dir program indexed later; , double-click a file brings up explorer..]

Best, Randall

Edited by randallc
ExcelCOM... AccessCom.. Word2... FileListToArrayNew...SearchMiner... Regexps...SQL...Explorer...Array2D.. _GUIListView...array problem...APITailRW
jaenster Universalist

jaenster

Posted
Posted (edited)

1: why the 0 ?

Global Const $TVM_INSERTITEM = $TV_FIRST + 0

Read wouter

; TV functions
Global Const $TVM_INSERTITEM            = $TV_FIRST + 0
Global Const $TVM_GETITEMRECT             = $TV_FIRST + 4
Global Const $TVM_SETIMAGELIST                = $TV_FIRST + 9
Global Const $TVM_SETITEM             = $TV_FIRST + 13
Global Const $TVM_HITTEST             = $TV_FIRST + 17

Number 1 /\ With +0 .Number 2 \/ with out +0

; TV functions
Global Const $TVM_INSERTITEM            = $TV_FIRST 
Global Const $TVM_GETITEMRECT             = $TV_FIRST + 4
Global Const $TVM_SETIMAGELIST            = $TV_FIRST + 9
Global Const $TVM_SETITEM             = $TV_FIRST + 13
Global Const $TVM_HITTEST             = $TV_FIRST + 17

Wouter please tell my what is easyer to read?

EDit : lol sorry i dont get them good , lined out

Edited by jaenster

-jaenster

  • 11 months later...
tony01 Seeker

tony01

Posted
Posted

Randallc :

I ran Autoit3Ex.au3 and when I double-click a file brings up explorer then I got error message :

>"C:\Program Files\AutoIt3\SciTE\..\autoit3.exe" /ErrorStdOut "C:\Program Files\AutoIt3\Scripts\Autoit3Ex.au3"

C:\Program Files\AutoIt3\Scripts\Autoit3Ex.au3 (177) : ==> Subscript used with non-Array variable.:

If $arInfo[4] = $nTreeView And $arInfo[2] And WinActive($hGui) Then

If $arInfo^ ERROR

>Exit code: 0 Time: 19.849

Can you fix it please?

TIA.

The Kandie Man Universalist

The Kandie Man

Posted
Posted

Randallc :

I ran Autoit3Ex.au3 and when I double-click a file brings up explorer then I got error message :

>"C:\Program Files\AutoIt3\SciTE\..\autoit3.exe" /ErrorStdOut "C:\Program Files\AutoIt3\Scripts\Autoit3Ex.au3"

C:\Program Files\AutoIt3\Scripts\Autoit3Ex.au3 (177) : ==> Subscript used with non-Array variable.:

If $arInfo[4] = $nTreeView And $arInfo[2] And WinActive($hGui) Then

If $arInfo^ ERROR

>Exit code: 0 Time: 19.849

Can you fix it please?

TIA.

I fixed it. Took two seconds. All you had to do is before that If statement is check to make sure that $arInfo[4] is an array. Seems to work fine now. I also want to point out that this was a good project and I don't think it should be abandoned, especially when it is this far done.

I also want to point out the 4000 list objects limit no longer applies because you just use _GUICtrlListViewInsertItem() and the limit no longer applies because the memory of the listview is edited via memory functions.

To fix that problem that you pointed out, do this:

If IsArray($arInfo) Then ;insert this at line 177
        If $arInfo[4] = $nTreeView And $arInfo[2] And WinActive($hGui) Then
            $nFlag = 0
            $hItem = TV_Hittest($nTreeView, $nFlag)
            If BitAnd($nFlag, $TV2HT_ONITEMBUTTON) Or BitAnd($nFlag, $TV2HT_ONITEM) Then
                GUISetState(@SW_LOCK)
                CheckTreeFill($nTreeView, $hItem)
                GUISetState(@SW_UNLOCK)
                GUICtrlSetData($nAddressbar, GetTreePath($nTreeView, $hItem, "\"))
            EndIf
            $hItem = GUICtrlSendMsg($nTreeView, $TVM_GETNEXTITEM, $TVGN_CARET, 0)
            $szCurrentPath = GetTreePath($nTreeView, $hItem, "\")
            If BitAnd($nFlag, $TV2HT_ONITEM) Then GUICtrlSetData($nAddressbar, $szCurrentPath)
            If $szOldPath <> $szCurrentPath Then
                $szOldPath = $szCurrentPath
                GUISetState(@SW_LOCK)
                For $i = $nFirstItem To $nLastItem
                    GUICtrlDelete($i)
                Next
                GUISetState(@SW_UNLOCK)
                ;UpdateCtrl($hGui, $nListView)
                $nFirstItem = 0
                $nLastItem  = 0
                $nOldItem   = 0
                GUICtrlSetData($nAddressbar, $szCurrentPath)
                GUICtrlSetCursor($nListView,1)
                GUICtrlSetCursor($nTreeView,1)
                DirToList($szCurrentPath)
                GUICtrlSetCursor($nListView,2)
                GUICtrlSetCursor($nTreeView,2)
            EndIf
        ElseIf _IsPressed("6B") And ControlGetFocus($hGui) = "SysTreeView321" Then
            $hItem = GUICtrlSendMsg($nTreeView, $TVM_GETNEXTITEM, $TVGN_CARET, 0)
            CheckTreeFill($nTreeView, $hItem)
        EndIf
    Endif ;insert this at line 212

-The Kandie Man

"So man has sown the wind and reaped the world. Perhaps in the next few hours there will no remembrance of the past and no hope for the future that might have been." & _"All the works of man will be consumed in the great fire after which he was created." & _"And if there is a future for man, insensitive as he is, proud and defiant in his pursuit of power, let him resolve to live it lovingly, for he knows well how to do so." & _"Then he may say once more, 'Truly the light is sweet, and what a pleasant thing it is for the eyes to see the sun.'" - The Day the Earth Caught Fire

randallc Universalist

randallc

Posted
Posted

Randallc :

I ran Autoit3Ex.au3 and when I double-click a file brings up explorer then I got error message :

>"C:\Program Files\AutoIt3\SciTE\..\autoit3.exe" /ErrorStdOut "C:\Program Files\AutoIt3\Scripts\Autoit3Ex.au3"

C:\Program Files\AutoIt3\Scripts\Autoit3Ex.au3 (177) : ==> Subscript used with non-Array variable.:

If $arInfo[4] = $nTreeView And $arInfo[2] And WinActive($hGui) Then

If $arInfo^ ERROR

>Exit code: 0 Time: 19.849

Can you fix it please?

TIA.

Hi, Thanks to KandieMan;

but i don't have time to fix it properly;

the various changes since beta100 have upset various parts of this, i think.

best, randall

ExcelCOM... AccessCom.. Word2... FileListToArrayNew...SearchMiner... Regexps...SQL...Explorer...Array2D.. _GUIListView...array problem...APITailRW
tony01 Seeker

tony01

Posted
Posted

Thanks to The Kandie Man, Now It works like a charm.

Excellent tool !!!! Randallc.

Can be enhanced and added more stuff .

Thans a million.

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
 Share
Go to topic listing

  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...