우선 쿼리를 날린땐 항상 try catch로 막아주십시요.. 워낙 어디서 언제 에러가 날지 모르기땜시
DB쪽 플밍할때난 소켓플밍할땐 특히 주석과 예외처로 도배를 해야 합니다.ㅋㅋ

예를 들어 이렇게 해보시지요..   

         AnsiString err;

    if (!Database->Connected)
        return NULL;

    Query->Close();
    Query->SQL->Clear();
    Query->SQL->Add(sql);

    try
    {
        if (sql.SubString(1, 6).UpperCase() == "SELECT")
            Query->Open();
        else
            Query->ExecSQL();
    }
    catch (...)
    {
        err = "Query Open or Execute Error";
        throw err;
    }

    if (sql.SubString(1, 6).UpperCase() == "SELECT")
    {
        Query->Last();
        Query->First();
    }

    return Query;