PostgreSQL i BCB - połączenie

[JotEmKa]

Nic się nie stało
Połączenie testowałam, powiodło się
Connected cały czas jest true.
Mój program nie działa, cały czas wyświetla komunikat o pustych polach.
Dla jasności, dane, które podaję przy logowaniu są sprawdzone i powinno wyjść przykładowe b
Dane te to właśnie dane logowania.

[Corvis]

Nic mi ten kod nie mówi . Widze tam tylko, że zawsze czyścisz edity. Pokaż deklarację zmiennej dane i moment przekazywania do niej wartości. Może coś tam gubisz ??

[JotEmKa]

KOD cpp:   �  UKRYJ  �

KOD cpp:   �  POKAŻ  �

void __fastcall TLogowanie::LoginBClick(TObject *Sender)
{
  String dane;
  ADOQuery1->SQL->Text="działające zapytanie do bazy";
  try
  {
        ADOQuery1->Open();
        dane=ADOQuery1->FieldByName("cos")->AsString;
        if( dane == "b")
        {
                Form2->Show();
                ImieE->Text="";
                NazwE->Text="";
                HasloE->Text="";
      }
        else
        {
                ShowMessage("Podales nieprawidlowe dane lub nie masz uprawnien!");
                ImieE->Text="";
                NazwE->Text="";
                HasloE->Text="";
        }
  }
  catch (Exception &E)
  {
        if ( !dynamic_cast<ENoResultSet*>(&E) )
        throw;
  }
}

Przed wprowadzonymi zmianami logowanie działało, tyle, że wyskakiwało okienko logowania do bazy.
Tak się właśnie zaczęłam zastanawiać nad wykorzystaniem ADOQuery, bo pewnie tam jest błąd.

[Corvis]

Jeżeli dobrze rozumiem twoje intencie to robisz to tak:

Klikasz w przycisk zaloguj
Pobierasz dane z bazy danych
Jeżeli dana z bazy danych == b to pokazujesz Form2 ( forma logowania ??? )

Dodaj z ciekawości coś takiego:

KOD cpp:   �  UKRYJ  �

KOD cpp:   �  POKAŻ  �

ADOQuery1->SQL->Text="działające zapytanie do bazy";
if(!ADOConnection1->Connected)  {
  ShowMessage("Brak połączenia");
  return; }

Bo poprawnie odwołujesz się do pola z zapytania SQL i jeżeli w tabeli są dane i zapytnie SQL jest dobre to Form2 powinna się pokazać

[JotEmKa]

Moje intencje zrozumiałeś idealnie
Form się nie pokazał
Sprawdziłam zapytanie w działającej wersji logowania (jeszcze z wykorzystaniem BDE i irytującym okienkiem logowania do bazy) i działa.
Z tego wniosek, że coś w połączeniu jeszcze pokręciłam.
Czy możliwe,żeby coś ze sterownikiem było pokręcone?

[JotEmKa]

Poniżej zamieszczam kod mojego logowania:

Kod: Zaznacz cały

void __fastcall TLogowanie::LoginBClick(TObject *Sender)
{
String dane;
ADOQuery1->SQL->Text="działające zapytanie do bazy";
try
{
ADOQuery1->Open();
dane=ADOQuery1->FieldByName("cos")->AsString;
if( dane == "b")
{
Form2->Show();
ImieE->Text="";
NazwE->Text="";
HasloE->Text="";
}
else
{
ShowMessage("Podales nieprawidlowe dane lub nie masz uprawnien!");
ImieE->Text="";
NazwE->Text="";
HasloE->Text="";
}
}
catch (Exception &E)
{
if ( !dynamic_cast<ENoResultSet*>(&E) )
throw;
}
}

W załączniku zamieszczam również dwa screeny, mojego okienka logowania oraz wyskakującego okienka logowania do bazy.
Gdy użyte było komponenty BDE, logowanie wyglądało jak na obrazku logowanie.jpg. Po uzupełnieniu wszystkich pól pokazywał się kolejny form.
Teraz po uruchomieniu programu wyskakuje tylko moje okienko logowania, po wpisaniu danych jak na obrazku i naciśnięciu Login, wyskakuje mi powiadomienie: "Podales nieprawidlowe dane lub nie masz uprawnien!".

Gdy zamiast mojego kodu logowania wpisałam kod podany przez Corvis'a

ADOQuery1->SQL->Text="działające zapytanie do bazy";
if(!ADOConnection1->Connected) {
ShowMessage("Brak połączenia");
return; }

po uruchomieniu programu wyskakuje tylko moje okienko logowania i wpisaniu danych jak na obrazku i naciśnięciu Login, nic się nie dzieje.

[Corvis]

Spakuj projekt w zipa i wrzuć na forum. Zrób to tylko bez plików tymczasowych. Bo tak to sie nie dogadamy

[JotEmKa]

W załączniku kod programu

[Corvis]

Brakuje Unit1.dfm

[JotEmKa]

W tamtym zip'ie plik Unit1.dfm jest, tylko pobawiłam się coś Builderem i niezbędny jest teraz w katalogu projektu katalog PLK.
W załączniku wszystko co potrzebne do uruchomienia aplikacji

[Corvis]

Problem został rozwiązany. Zapytanie SQL zwracało dane ze spacjami na końcu, dlatego porównywanie caly czas dawało wynik FALSE;