[SOLVED] Benutzen der 7zip.dll in einem PB Programm

[R3booz]

Wie binde ich diese DLL ein?
Ich hab es mit Openlibrary() versucht aber dann findet er die funktionen der dll nicht und wenn ich
include benutze kommt syntax error z1 was völliger quatsch ist
hat irgendjemand eine ahnung???

Hier die Links wovon ich sie habe:
DLL: http://www.csdinc.co.jp/archiver/lib/7-zip32.html
Englisches Readme: http://www.csdinc.co.jp/archiver/lib/7-zip32api-en.txt

mfg R3booz

EDIT:
Hier noch der Code:

Code: Alles auswählen

systemdll = OpenLibrary(0, "7zip.dll")
If systemdll = 0
  MessageRequester("Fehler","Kann DLL nicht finden!")
  End
EndIf

temp.s = GetTemporaryDirectory()

Procedure entpackedateien()
  file.s = "bin\files.bin"
  If CallFunction(0,"SevenZipOpenArchive",0, @file, 0) = 0
    Debug "Fehler"
  EndIf
EndProcedure

entpackedateien()

[ts-soft]

Hier: https://dl.dropbox.com/u/3086026/7-zip.zip
Alles dran, alles drin

[R3booz]

asoooo
ok vielen dank
freu

mfg R3booz

[RSBasic]

Alles dran, alles drin

SCNR.

[ts-soft]

Beispiele im engl. Forum im Original-Thread:
http://www.purebasic.fr/english/viewtop ... 33#p188133
Ziemlich alter Kram und kein Support mehr meinerseits. Das Entpacken
von 7zip Dateien wird von PB5.10 nativ unterstützt, lediglich das Packen
nicht.

Gruß
Thomas

[R3booz]

danke aber bei mir kommt nur syntax error bei

Code: Alles auswählen

  If Not SevenZipFindFirst.l(HARC, "*.*", @INFO)

PS:Beta hab ich mir noch nicht geholt

[ts-soft]

Entferne das .l von dem Funktionsaufruf.

[R3booz]

funktioniert
und wie kann ich ein passwortgeschütztes öffnen?

mfg R3booz

[ts-soft]

Keine Ahnung und werde ich auch keine Zeit für opfern.
Besser wäre es, wenn Du die 7z.dll und die 7zG.exe vom Orginal-Paket
nutzt, da kannste dann mit Runprogram arbeiten. Im ProgrammExitCode
findeste evtl. Fehler und in der 7-zip.chm alle Parameter.

Viel Spaß, und sorry, dies war der letzte Tip zu 7-zip (hab da keine Lust und Zeit für)

thomas

[R3booz]

ok nicht schlimm

trotzdem vielen dank für deine hilfe

mfg R3booz