電子書籍の厳選無料作品が豊富!

前回の質問で、ほぼコンパイルが通るようになったのですが、肝心の「UNLHA32.DLL」をどこにおけばいいのかわからなくて困っています。ほかにLIBファイルとかもあるのですがこれもどこのセットすればいいのか困っています。さらに、解凍したときどこに解凍されるのかわからないです。どこにおけばいいのか、解凍先をお分かりの方おられましたら、ご教授願います。

ソース
Unit6.cpp
//---------------------------------------------------------------------------

#include <vcl.h>
#pragma hdrstop

#include "Unit6.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm6 *Form6;
//---------------------------------------------------------------------------
__fastcall TForm6::TForm6(TComponent* Owner)
: TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TForm6::FormActivate(TObject *Sender)
{
//DLLのロード
hDll = LoadLibrary(L"UNLHA32.DLL");

if (!hDll){
//DLLが見つからなかった場合
Application->MessageBox(
L"UNLHA32.DLL が見つかりませんでした。",
L"DLL エラー",
MB_ICONSTOP | MB_OK);
Close();
} else
//DLLがあったら関数ポインタを取得する
Unlha = (ProcUnlha)GetProcAddress(hDll, "Unlha");

}
//---------------------------------------------------------------------------
void __fastcall TForm6::FormDestroy(TObject *Sender)
{
//DLLの解放
if (hDll) FreeLibrary(hDll);
}
//---------------------------------------------------------------------------
void __fastcall TForm6::ExtractBtnClick(TObject *Sender)
{
AnsiString lzhName, //書庫名
cmdLine; //コマンド変数

OpenDialog1->Filter = "圧縮ファイル (*.lzh)|*.lzh";

//ファイルが選択されなければ処理終わり
if (!OpenDialog1->Execute()) return;

lzhName = OpenDialog1->FileName;//解凍ファイル名

//コマンドライン作成(空白パスなどには未対応)
cmdLine = "x " + lzhName;//解凍する書庫名

//Unlha 操作
Unlha(Application->Handle, cmdLine.c_str(), "", 0);

//結果表示用 Memo1 をクリア
Memo1->Lines->Clear();
Memo1->Lines->Add("ファイル \"" + lzhName +
"\" の解凍が終了しました。");
}
//---------------------------------------------------------------------------
void __fastcall TForm6::ExitBtnClick(TObject *Sender)
{
Close();
}
//---------------------------------------------------------------------------

ヘッダ
Unit6.h
//---------------------------------------------------------------------------

#ifndef Unit6H
#define Unit6H
//---------------------------------------------------------------------------
#include <System.Classes.hpp>
#include <Vcl.Controls.hpp>
#include <Vcl.StdCtrls.hpp>
#include <Vcl.Forms.hpp>
#include <Vcl.Dialogs.hpp>
#include <Vcl.Menus.hpp>
//---------------------------------------------------------------------------
class TForm6 : public TForm
{
__published: // IDE で管理されるコンポーネント
TMemo *Memo1;
TOpenDialog *OpenDialog1;
TPopupMenu *PopupMenu1;
TButton *ExtractBtn;
TButton *ExitBtn;
void __fastcall FormActivate(TObject *Sender);
void __fastcall FormDestroy(TObject *Sender);
void __fastcall ExtractBtnClick(TObject *Sender);
void __fastcall ExitBtnClick(TObject *Sender);
private: // ユーザー宣言
//DLLのロードのための変数宣言
HINSTANCE hDll;

//DLL呼び出し関数の宣言(Unlha32.dllのUnlha関数を呼び出す)
typedef int WINAPI (*ProcUnlha)(const HWND _hwnd,
LPCSTR _szCmdLine,
LPSTR _szOutput,
const DWORD _dwSize);

//関数ポインタ
ProcUnlha Unlha;
public: // ユーザー宣言
__fastcall TForm6(TComponent* Owner);
};
//---------------------------------------------------------------------------
extern PACKAGE TForm6 *Form6;
//---------------------------------------------------------------------------
#endif

A 回答 (2件)

>解凍先は、デスクトップでした。



UNLHA32に渡すオプションで指定するものかと思われますが…。
COMMAND.TXTにオプションについて記述されている筈ですので確認した方がよいでしょう。
未指定の場合はレジストリに記録されていればそちらに、なければカレントディレクトリではないですかね。
Win32APIのGetOpenFileName()使っているなら指定したファイルのある場所にカレントディレクトリが変更されているかも知れません。

>静的リンク版がどこのソースをどうすればいいのか、わかれば、そうしてみたいです。

UNLHA32.TXTには…
> UNLHA32.LIB : VC++ でコンパイルするためのインポートライブラリです。
となっていますので、C++builderでは使えない可能性もあるかと思われますが。
    • good
    • 0

統合アーカイバのサイトから持ってきたものでインストールすれば


特に気にする必要が無いはずですが何か不都合があるのでしょうか?
   インストーラによって必要なところにコピーされています

実行時に必要なのはDLLのみでLIBはリンク時に必要になるだけです

書くなら
>「UNLHA32.DLL」をどこにおけばいいのか
32ビットなら基本的にWindows\System32(インストーラで書きこまれてるはず)
64ビットなら基本的にWindows\SysWoW64(インストーラで書きこまれてるはず)
もしくは実際使うアプリケーションの実行モジュールと同じフォルダ(バージョン混在など特殊な事情の時)

>解凍したときどこに解凍されるのか
自分で解凍先設定できるはずですが・・・・・
標準であれば
32ビット C:\Program Files\ArchiverDLL\UNLHA32
64ビット C:\Program Files (x86)\ArchiverDLL\UNLHA32
になっているはずです

というか最初の質問が静的リンクするとか言ってませんでしたっけ?
静的リンクした場合DLLはモジュール内に埋め込まれるような気が・・・
(DLLを静的リンクしようとしたことないので違ってるかも)
    • good
    • 0
この回答へのお礼

回答くださり、ありがとうございます。
どうも、DLLはパスが通っていれば、どこでも行けそうです。
解凍先は、デスクトップでした。

静的リンクで作りたかったのですが、情報が少なく、初心者が手を出せそうもなかったので。あきらめました。

静的リンク版がどこのソースをどうすればいいのか、わかれば、そうしてみたいです。

ありがとうございました。

お礼日時:2015/11/29 04:17

お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!


おすすめ情報