Rar dan dosya çıkartma işlemi??

[Shou]

Merhabalar, delphi 7 ile rar dan dosyayı nasıl çıkartabılırım yardımcı olursanız sevinirim, şimdiden teşekkürler..

[mkysoft]

winrar kurduğunuzda winrarın konsol uygulaması (rar.exe ve unrar.exe) da kuruluyor. Kullanım kılavuzlarına bakarsanız nasıl kullanıldığını bulabilrisiniz. Ayrıca birde dll dosyası vardı bu iş için. yine winrar tarafından yayınlanıyor, onu da kullanabilrisiniz.

[Shou]

Hocam dediğiniz gibi araştırdım ama google'da bulamadım delphi 7 ile nasıl yaparım unrar.exe çift tıkladıgımda ekran gelip gidiyor?

[Battosai]

her türü sıkıştırılmış dosya için linkteki 7zip api sini kullanabilirsiniz...
http://www.progdigy.com/?page_id=13

[SimaWB]

Hocam dediğiniz gibi araştırdım ama google'da bulamadım delphi 7 ile nasıl yaparım unrar.exe çift tıkladıgımda ekran gelip gidiyor?

Google'da "use unrar.exe" aratınca çıkan ilk sayfadaki tüm sonuçlar bu konuyu anlatıyor????

[Shou]

Abi şimdi ben bunu nasıl kullanıcam delphi'de rar içinden buraya çıkart gibi çıkartsın istiyorum?

[SimaWB]

unrar'ın kullanımı: unrar e C:\deneme.rar C:\Deneme\
Delphi'de parametre vererek bir programı çalıştırmak için bkz. WinExec ve ShellExecute

[Shou]

abi şimdi pas dosyası eklıyorum ama hata verıyor bi örnek proje yaparmısın ben nıye yapamıyorum ilginç.

[SimaWB]

abi şimdi pas dosyası eklıyorum ama hata verıyor bi örnek proje yaparmısın ben nıye yapamıyorum ilginç.

Çalışmayan kodlarınız üzerinden gidelim, daha kolay yardımcı oluruz

[Shou]

Abi şimdi uses kısmına,

Kod: Tümünü seç

sevenzip

yazdım sorun yok hata vermıo ama dosya çıkartmak için şunu eklıyorum,

Kod: Tümünü seç

OpenFile('c:\test.zip');   
ExtractTo('c:\test');

öyle yazıo açıklamada yabancı olarak bende öyle yapıom ama olmuo?

[SimaWB]

Abi şimdi uses kısmına,

Kod: Tümünü seç

sevenzip

yazdım sorun yok hata vermıo ama dosya çıkartmak için şunu eklıyorum,

Kod: Tümünü seç

OpenFile('c:\test.zip');   
ExtractTo('c:\test');

öyle yazıo açıklamada yabancı olarak bende öyle yapıom ama olmuo?

Ben yazdıklarımı WinRar için yazmıştım. Hiç sevenzip kullanmadım.

[Shou]

Peki abi winrar için bir örnek proje yaparmısın yardımcı olursan çok sevinirim?

[unicorn64]

eğer sadece yazdığınız kadarını kopyaladıysanız siteden, çalışmaması normal...

Kod: Tümünü seç

with CreateInArchive(CLSID_CFormatZip) do
 begin
   OpenFile('c:\test.zip');
   ExtractTo('c:\test');
 end;

demişler çünkü...

[unicorn64]

winrar ın kullanımı hakkında da @SimaWB gerekli şeyleri yazmış zaten...

Hocam dediğiniz gibi araştırdım ama google'da bulamadım delphi 7 ile nasıl yaparım unrar.exe çift tıkladıgımda ekran gelip gidiyor?

Google'da "use unrar.exe" aratınca çıkan ilk sayfadaki tüm sonuçlar bu konuyu anlatıyor????

unrar'ın kullanımı: unrar e C:\deneme.rar C:\Deneme\
Delphi'de parametre vererek bir programı çalıştırmak için bkz. WinExec ve ShellExecute

önce cevapları daha dikkatli okumalı, sonra da cevapda belirtilenleri araştırmaya uygulamaya çalışmalısınız....

[Shou]

çok teşekkür ederim dediğiniz gibi oldu ama abi bulunduğu klasöre çıkartsın nasıl yaparım?