解凍ソフト（C++builderで作成中）で質問です。

前回に、圧縮解凍ソフトで質問をしました。
結局、かなり勉強が必要だと思いました。
解凍ソフトの解説のある
http://www2.ttcn.ne.jp/tkky/Application/Extract/ …
の内容がそのままできるのかが気になったので、そこだけ試してみようと思いました。
ところが、自分がわかっていないせいか、ビルドするとエラーになりました。自分で考えてみたりしたのですが、やはりわかりませんでした。
ソースを掲載します。

Unit4.cpp
//---------------------------------------------------------------------------

#include <vcl.h>
#pragma hdrstop

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

if (!hDll){
//DLLが見つからなかった場合
Application->MessageBox(
"UNLHA32.DLL が見つかりませんでした。",
"DLL エラー",
MB_ICONSTOP | MB_OK);
Close();
} else
//DLLがあったら関数ポインタを取得する
Unlha = (ProcUnlha)GetProcAddress(hDll, "Unlha");
}
void __fastcall TForm4::FormDestroy(TObject *Sender)
{
//DLLの解放
if (hDll) FreeLibrary(hDll);
}
//書庫ファイル展開
void __fastcall TForm4::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 TForm4::ExitBtnClick(TObject *Sender)
{
Close();
}

;}
//---------------------------------------------------------------------------

ここで、[bcc32エラー]Unit4.cpp(16)E2089'FormActivate'には型指定子は指定できない
となり、わからなくなりました。

ヘッダのほうも載せておきます。

Unit4.h
//---------------------------------------------------------------------------

#ifndef Unit4H
#define Unit4H
//---------------------------------------------------------------------------
#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 TForm4 : public TForm
{
__published: // IDE で管理されるコンポーネント
TMemo *Memo1;
TOpenDialog *OpenDialog1;
TPopupMenu *PopupMenu1;
TButton *ExtractBtn;
TButton *ExitBtn;
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 TForm4(TComponent* Owner);
};
//---------------------------------------------------------------------------
extern PACKAGE TForm4 *Form4;
//---------------------------------------------------------------------------
#endif


こちらは、エラーは出てません。

cppのほうのエラーの原因がわからないので、（というか、エラーメッセージをググったのですが余計わからなくなりました。）どなたか原因がお分かりの方おられましたら、ご教授願います。よろしくお願いいたします。

質問者からの補足コメント

• 

  できれば、どこのコンストラクタをどう変更すればいいのか、ご教授願います。あんまりよくわかっていないので助けてください。お願いします。

  No.1の回答に寄せられた補足コメントです。 補足日時：2015/11/24 08:57

• 

  Unit4.cpp(17): E2316 '_fastcall TForm4::FormActivate(TObject *)' は 'TForm4' のメンバではない
  Unit4.cpp(33): E2316 '_fastcall TForm4::FormDestroy(TObject *)' は 'TForm4' のメンバではない
  Unit4.cpp(39): E2316 '_fastcall TForm4::ExtractBtnClick(TObject *)' は 'TForm4' のメンバではない
  Unit4.cpp(62): E2316 '_fastcall TForm4::ExitBtnClick(TObject *)' は 'TForm4' のメンバではない
  と表示されました。
  詳しい方お願いします。

  No.2の回答に寄せられた補足コメントです。 補足日時：2015/11/24 21:44

• 

  ありがとうございます。
  OnActive
  OnDestory
  はうまくいっているようですが、
  onBtnClickが表示されません。
  また次のようなエラーが出ます。
  [bcc32 エラー] Unit4.cpp(22): E2206 不正な文字 '¼' (0xbc)
  [bcc32 エラー] Unit4.cpp(37): E2206 不正な文字 '\' (0x5c)
  [bcc32 エラー] Unit4.cpp(38): E2206 不正な文字 '\' (0x5c)
  
  よろしくご教授願います。

  No.3の回答に寄せられた補足コメントです。 補足日時：2015/11/26 22:02

No.3 ベストアンサー 回答者： asano_nagi 回答日時： 2015/11/25 10:55

まず、

_fastcall TForm4::FormActivate(TObject *)
_fastcall TForm4::FormDestroy(TObject *)
_fastcall TForm4::ExtractBtnClick(TObject *)
_fastcall TForm4::ExitBtnClick(TObject *)

がどこにも宣言されてないことに気づいてください。

これは、VCL のイベントハンドラです。
C++Builder の「オブジェクトインスペクタ」を表示させて、
そこに、Form(この場合は、TForm4）を選択してください。

「イベント」のタブで、
OnActive
OnDestory
をそれぞれクリックし、右側に発生する空欄をダブルクリックすると、この名前で自動的に登録されます。

_fastcall TForm4::ExtractBtnClick(TObject *)
_fastcall TForm4::ExitBtnClick(TObject *)
は、フォームに乗っているボタンのイベントハンドラです。
同じように該当するボタンを選んで、onBtnClick からハンドラを登録してください。

というか、以上の内容は、C++Builder 自体の操作の初歩です。

この回答へのお礼

ありがとうございます。やっと、意味が分かりました。でもまだエラーが出てます。一度仕切りなおすので、また、手を差し伸べたくださると助かります。

お礼日時：2015/11/28 02:24

No.2 回答者： Wr5 回答日時： 2015/11/24 13:55

>あんまりよくわかっていないので助けてください。

該当環境使ったことないので完全ではありませんが……。

とりあえず、コンストラクタではなにもしないで大丈夫でしょうから、
>void __fastcall TForm4::FormActivate(TObject *Sender)
の前の行に
}
を入れてください。
で、余る最後の方の
>;}
は削除してみてください。

あとは詳しい人の回答待ちでしょうね。

この回答へのお礼

ベストアンサーに選べなかったんですが、ありがとうございます。

お礼日時：2015/11/28 02:24

No.1 回答者： Wr5 回答日時： 2015/11/23 09:53

vclとか判りませんけど…。

>__fastcall TForm4::TForm4(TComponent* Owner)
: TForm(Owner)
>{
>void __fastcall TForm4::FormActivate(TObject *Sender)
>{

コンストラクタの中でのローカル関数定義になってませんか？

http://docwiki.embarcadero.com/RADStudio/XE8/ja/ …には型指定子は指定できない_(C%2B%2B)
で、
>ローカル変数または関数のパラメータ
に該当するかと思われますが。
コンストラクタを適切に定義してください。