🚀 go-pugleaf

Thanks

Here is Full .cpp
//---------------------------------------------------------------------------

#include <vcl.h>
#pragma hdrstop

#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------

__fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button1Click(TObject *Sender)
{
        if(Edit1->Text.Length()>2)
        OpenDialog1->FileName = Edit1->Text;
        if(OpenDialog1->Execute())
        Edit1->Text = OpenDialog1->FileName;
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button2Click(TObject *Sender)
{
        try
        {
                try
                {
                        hResourceDLL = LoadLibrary(Edit1->Text.c_str());
                        EnumResourceNames(hResourceDLL,
                        "RT_ICON",
                        EnumResProc,
                        NULL
                         );
                }
                catch(...)
                {
                        MessageDlg("Cannot Load Library", mtError, 
TMsgDlgButtons() << mbOK, 0);
                }
        }
        __finally
        {
                FreeLibrary (hResourceDLL);
        }

}
//---------------------------------------------------------------------------

BOOL CALLBACK EnumResProc(  HMODULE hModule,   LPTSTR  lpszType,  char * 
lpszName,  long lParam )
{

   if( 0 == strcmp( lpszType, "RT_ICON" ) ||
         0 == strcmp( lpszType,"RT_GROUP_ICON" ) )
   {
                        iTotalIcons++;
   }

    return (true);
}

Here is .h

//---------------------------------------------------------------------------

#ifndef Unit1H
#define Unit1H
#include <Classes.hpp>
#include <Controls.hpp>
#include <StdCtrls.hpp>
#include <Dialogs.hpp>
//---------------------------------------------------------------------------
BOOL CALLBACK EnumResProc(  HMODULE hModule,   LPTSTR  lpszType,  char * 
lpszName,   long lParam );
        int     iTotalIcons;
//---------------------------------------------------------------------------
class TForm1 : public TForm
{
__published: // IDE-managed Components
        TButton *Button1;
        TEdit *Edit1;
        TOpenDialog *OpenDialog1;
        TButton *Button2;
        TEdit *Edit2;
        TLabel *Label1;
        void __fastcall Button1Click(TObject *Sender);
        void __fastcall Button2Click(TObject *Sender);
private: // User declarations
        HMODULE hResourceDLL;
public:  // User declarations
        __fastcall TForm1(TComponent* Owner);
};
//---------------------------------------------------------------------------
extern PACKAGE TForm1 *Form1;
//---------------------------------------------------------------------------
#endif

and the errors

Build
  [C++ Error] Unit1.cpp(37): E2034 Cannot convert 'int (__stdcall *)(void 
*,char *,char *,long)' to 'int (__stdcall *)()'
  [C++ Error] Unit1.cpp(37): E2342 Type mismatch in parameter 'lpEnumFunc' 
(wanted 'int (__stdcall *)()', got 'int (__stdcall *)(void *,char *,char 
*,long)')

Thanks

jB