7z add display in GUICtrlCreateEdit

[thexshadow]

Title kind of says it all, I have tried to use this UDF http://www.autoitscript.com/forum/index.php?showtopic=91283, but I always error. Is there an easier way to stream the 7z add or 7z extract to a GUICtrlCreateEdit box?

[thexshadow]

Sorry for the bump, 24 hr.

I have also tried this.

http://www.autoitscript.com/forum/index.php?showtopic=85094&hl=7zip&st=0

I always get an error.

or with a different dll.

Any ideas?

Edited March 11, 2010 by thexshadow

[thexshadow]

No one?

[logo78]

ur are probably using the wrong 7z.dll

Take this one.

[thexshadow]

That's the exact one I used.

[GEOSoft]

I don't have what I need to play with this right now but here is a suggestion.

Run the command using 7z.exe but direct the results to a text file using > somefile.txt

If the file is generated then you can use GUICtrlSetData($hEdit, FileRead("somefile.txt")

[thexshadow]

I get this when trying to use the exe.

[GEOSoft]

As I suspected, the code is not coming from your script. Without checking 7Zip.au3 I'll take a guess that it's okay to add a line before that one that reads as follows

If NOT IsArray($aRet) Then Return SetError(1, 1)

[thexshadow]

Ok, that removed the error popups, but now this is what I get.

[enaiman]

Don't you think it is about time you provide some code?

I think it is only a matter of time until people will completely stop helping you, playing "guess what I do wrong in my script?" game is annoying.

It is likely that you call some function with the wrong parameters.

[thexshadow]

I have tried using all of the provided example scripts in the archive (In Rasims download) to test, but all of them fail. I have yet to make anything as it is not working!

Edited March 26, 2010 by thexshadow

[thexshadow]

#include <7Zip.au3>

;Example #1
$ArcFile = FileOpenDialog("Select archive", "", "Archive Files (*.7z;*.zip;*.gzip;*.bzip2;*.tar)")
If @error Then Exit

$Output = FileSelectFolder("Select output folder", "")
If @error Then Exit

$retResult = _7ZIPExtract(0, $ArcFile, $Output)
If @error = 0 Then
    MsgBox(64, "_7ZIPExtractEx", $retResult)
Else
    MsgBox(64, "_7ZIPExtractEx", "Error occurred")
EndIf

;Example #2
$ArcFile = FileOpenDialog("Select archive", "", "Archive Files (*.7z;*.zip;*.gzip;*.bzip2;*.tar)")
If @error Then Exit

$Output = FileSelectFolder("Select output folder", "")
If @error Then Exit

$retResult = _7ZIPExtract(0, $ArcFile, $Output, 0, 0, 1, 0, 0, 0, "*.wav")
If @error = 0 Then
    MsgBox(64, "_7ZIPExtractEx", $retResult)
Else
    MsgBox(64, "_7ZIPExtractEx", "Error occurred")
EndIf

[enaiman]

Your first example works very well; I've tested on a *.zip file and everything was OK.

Be sure that 7-zip.dll is in your script folder.

[thexshadow]

Bah, stupid. I'm stupid, I was running it in x64 mode, tried in x86 and bam, works. Thank's everyone.

One last error.

I have tried removing Local and adding in Global, but that dos not work. I cant really think of anything else, any ideas?

Func _Archive($hWnd, $Msg, $nState, $ExInfo)
    Local $iFileSize, $iWriteSize, $iPercent = 0
    
    If $nState = 0 Then
        Local $EXTRACTINGINFO = DllStructCreate($tagEXTRACTINGINFO, $ExInfo)    <-----------------------------
        
        GUICtrlSetData($BE, DllStructGetData($EXTRACTINGINFO, "szSourceFileName") & @CRLF, 1)
    
        $iFileSize = DllStructGetData($EXTRACTINGINFO, "dwFileSize")
        $iWriteSize = DllStructGetData($EXTRACTINGINFO, "dwWriteSize")
    
        $iPercent = Int($iWriteSize / $iFileSize * 100)
    
        GUICtrlSetData($Progress, $iPercent)
        Return 1
    EndIf
    
    If $nState = 2 Then GUICtrlSetData($Progress, 100)
    
    Return 1
EndFunc

Edited March 30, 2010 by thexshadow

[thexshadow]

No one?

[thexshadow]

Bump.

[thexshadow]

[thexshadow]

Ahhh, no one?

[GEOSoft]

Without my crystal scriptalyzer to see the pertinant part of your code it's pretty much guess work since firstly there are not 84 lines of code there (Line 84) and the pertinant part of the code

If NOT IsArray($aRet) Then Return SetError(1, 1)

also isn't there so just on a hunch I'm going to say that either $aRet is not declared at all or it's declared after the fact OR you have it inside of some function and you are attempting to reference it from another function.

Try putting

Global $aRet at the top of the script and then lets see what errors you get.

[thexshadow]

I added Global $aRet to the top in the first place, but forgot to run it in x86 mode again... Thank you again Geo, you are god.