🚀 go-pugleaf

I'm trying to create a function that accepts two integers, one for language
and the other is the components tag value.  I create two variables called
dbDatabase and qryQuery of type TDatabase and TQuery respectively.  The
Database is for login prompt use only and the Query is for the SQL
statements to execute.  Now here's the problem: when I build the code for
the DLL, The linker returns me several errors.  I have included the file
MEMMGR.LIB because I return AnsiStrings from my functions and the ODBCs are
correctly set so it's not those things that make it not work.  Maybe I
forgot to #include<> a header file...  Here are the errors:

Note : The source code follows the error messages.

1. [Linker Error] Unresolved external '__fastcall
Dbtables::TDatabase::SetDatabaseName(const System::AnsiString)' referenced
from C:\MES DOCUMENTS\C++ BUILDER 5 PROJECTS\GESTICO\CAPTIONS.OBJ

2. [Linker Error] Unresolved external '__fastcall
Dbtables::TDBDataSet::SetDatabaseName(const System::AnsiString)' referenced
from C:\MES DOCUMENTS\C++ BUILDER 5 PROJECTS\GESTICO\CAPTIONS.OBJ

3. [Linker Error] Unresolved external '__fastcall Db::TParams::GetItem(int)'
referenced from C:\MES DOCUMENTS\C++ BUILDER 5 PROJECTS\GESTICO\CAPTIONS.OBJ

4. [Linker Error] Unresolved external '__fastcall
Db::TParam::SetAsInteger(int)' referenced from C:\MES DOCUMENTS\C++ BUILDER
5 PROJECTS\GESTICO\CAPTIONS.OBJ

5. [Linker Error] Unresolved external '__fastcall
Dbtables::TQuery::Prepare()' referenced from C:\MES DOCUMENTS\C++ BUILDER 5
PROJECTS\GESTICO\CAPTIONS.OBJ

6. [Linker Error] Unresolved external '__fastcall Db::TDataSet::Open()'
referenced from C:\MES DOCUMENTS\C++ BUILDER 5 PROJECTS\GESTICO\CAPTIONS.OBJ

7. [Linker Error] Unresolved external '__fastcall
Db::TDataSet::FieldByName(const System::AnsiString)' referenced from C:\MES
DOCUMENTS\C++ BUILDER 5 PROJECTS\GESTICO\CAPTIONS.OBJ

8. [Linker Error] Unresolved external '__fastcall Db::TDataSet::Close()'
referenced from C:\MES DOCUMENTS\C++ BUILDER 5 PROJECTS\GESTICO\CAPTIONS.OBJ

----------------
Here's the code
----------------
//--------------------------------------------------------------------------
AnsiString GetCaptionWithTag(int intLang, int intTag)
{
    AnsiString strCaption = "";
    TQuery *qryQuery;
    TDatabase *dbDatabase;

    // Set dbParams
    dbDatabase->DatabaseName = "Gestico";
    dbDatabase->LoginPrompt = false;

    // Set qryParams
    qryQuery->DatabaseName = "Gestico";

    // Make sure that query is closed before opening it again
    qryQuery->Close();

    // Set SQL select
    qryQuery->SQL->Clear();

    // Select field depending on language
    switch(intLang)
    {
        case mintENGLISH:
        {
            qryQuery->SQL->Add("SELECT Cap_String_Eng AS Caption");
            break;
        }
        case mintFRENCH:
        {
         qryQuery->SQL->Add("SELECT Cap_String_Fre AS Caption");
            break;
        }
        default:;
    }

    qryQuery->SQL->Add("FROM Captions");
    qryQuery->SQL->Add("WHERE Cap_Tag = :Tag");
    qryQuery->Params->Items[0]->AsInteger = intTag;

    // Prepare and open query
    if(!qryQuery->Prepared)
    {
     qryQuery->UniDirectional = true;
        qryQuery->Prepare();
    }

    // Open query
    qryQuery->Open();

    // Get caption and bind to component
    if(!qryQuery->Eof)
     strCaption = qryQuery->FieldByName("Caption")->AsString;
    else
     strCaption = "zError";

    // Close query
    qryQuery->Close();

    return strCaption;
}
//--------------------------------------------------------------------------