С++: правильный импорт dll

[apromix]

Подскажите, я новичок в C++ (раньше юзал Delphi), как импортировать в С из dll. На Дельфи это делается одной строкой, а на С++ я использую громоздкий код, как его упростить, есть другой метод?

На С++ делаю так:

void __fastcall TForm1::Button1Click(TObject *Sender)
{
    void* hl = LoadLibrary("QBox.dll");
    if(hl) {
       QBoxFunc qbInit = 0;
       qbInit = GetProcAddress(hl, "qbox_Init");
       if(qbInit) {
          int ret = qbInit();
          char msg[64], dig[16];
          lstrcpy(msg, "QBox ret = ");
          itoa(ret, dig, 10);
          lstrcat(msg, dig);
          MessageBox(0, msg, "-=Info=-", 0);
       } else MessageBox(0, "GetProcAddress fail!", "-=Info=-", 0);
       FreeLibrary(hl);
    }
}

На Delphi

function QBox_Init: Integer; stdcall; external 'qbox.dll' name 'qbox_Init';

...

procedure TForm1.BitBtn1Click(Sender: TObject);
begin
  ShowMessage(IntToStr(QBox_Init));
end;

Спасибо.

[lennon]

DWORD GetAddr(const char * dll, const char * func, HANDLE &hh)
{
	HANDLE h = LoadLibraryA(dll);
	if (!h) return -1;
        hh = h;
	DWORD ret = ::GetProcAddress(h,func);
	if (!ret) return -1;
	return ret;
}

int _tmain(int argc, _TCHAR* argv[])
{
        HANDLE h;
	int (*func)(const char *);
	func = &GetAdd("test.dll","Func",h);
	func("aa");
        FreeLibrary(h);
	return 0;
}

ну типо такого не подойдет? короче незя =)