Subversion Repositories DevTools

Rev

Blame | Last modification | View Log | RSS feed

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

#include <vcl.h>
#pragma hdrstop

#include "TestDirectorLogin.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TTestDirectorLoginForm *TestDirectorLoginForm;
//---------------------------------------------------------------------------
__fastcall TTestDirectorLoginForm::TTestDirectorLoginForm(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------

bool TTestDirectorLoginForm::Login( TADOConnection *connection )
{
        bool    result = false;

    m_connection = connection;

        if (ShowModal() == mrOk)
    {
        if (m_connection->Connected)
        {
                result = true;
        }
    }

    return result;
}

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

void __fastcall TTestDirectorLoginForm::FormShow(TObject *Sender)
{
        UseDomainLogin->Checked = true;
    GroupBox1->Enabled = false;
    Username->ReadOnly = true;
    Username->Text = "";

    Password->ReadOnly = true;
        Password->Text = "";

    DatabaseComboBox->ItemIndex = 0;
}
//---------------------------------------------------------------------------

void __fastcall TTestDirectorLoginForm::UseDomainLoginClick(
      TObject *Sender)
{
        GroupBox1->Enabled = !UseDomainLogin->Checked;
    
        Username->ReadOnly = UseDomainLogin->Checked;
        Password->ReadOnly = UseDomainLogin->Checked;
}
//---------------------------------------------------------------------------

void __fastcall TTestDirectorLoginForm::LoginBtnClick(TObject *Sender)
{
        AnsiString      connection_string;

    if (UseDomainLogin->Checked)
    {
        connection_string.sprintf("Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;Initial Catalog=%s;Data Source=%s",
                                  DatabaseComboBox->Text.c_str(),
                                  ServerComboBox->Text.c_str()
                                  );
    }
    else
    {
        connection_string.sprintf("Provider=SQLOLEDB.1;Password=%s;Persist Security Info=False;User ID=%s;Initial Catalog=%s;Data Source=%s",
                                                          Password->Text.c_str(),
                                  Username->Text.c_str(),
                                  DatabaseComboBox->Text.c_str(),
                                  ServerComboBox->Text.c_str()
                                  );
        }

    m_connection->ConnectionString = connection_string;

    m_connection->Connected = true;

    if (m_connection->Connected)
    {
        ModalResult = mrOk;
    }
}
//---------------------------------------------------------------------------