Komponent DBComboBox

[rafalskraba]

Witam,

Baza danych Firebird, połaczenie poprzez SimpleDataSet, zapytanie do bazy danych SQLQuery.
do komponentu DBGrid wpisuję dane z tablicy przy pomocy poniższego kodu:

KOD cpp:   �  UKRYJ  �

KOD cpp:   �  POKAŻ  �

        DM1->SQLQuery1->SQL->Add("SELECT USERS.USERS_NAME FROM USERS ORDER BY USERS.USERS_NAME");

        DM1->SQLQuery1->ExecSQL();

        for(DM1->SQLQuery1->Open();!DM1->SQLQuery1->Eof;DM1->SQLQuery1->Next())
        {
                DBComboBox1->Items->Add(DM1->SQLQuery1->Fields->Fields[0]->AsAnsiString);
        }
DBComboBox1->ItemIndex=4;

Dlaczego przy kliknieciu w dowolne pole formularza wartość wyświetlana w DBComboBox jest czyszczona.

W przypadku komponenty ComboBox taka sytuacja nie ma miejsca

KOD cpp:   �  UKRYJ  �

KOD cpp:   �  POKAŻ  �

        DM1->SQLQuery1->SQL->Add("SELECT USERS.USERS_NAME FROM USERS ORDER BY USERS.USERS_NAME");

        DM1->SQLQuery1->ExecSQL();

        for(DM1->SQLQuery1->Open();!DM1->SQLQuery1->Eof;DM1->SQLQuery1->Next())
        {
                ComboBox1->Items->Add(DM1->SQLQuery1->Fields->Fields[0]->AsAnsiString);
        }
        ComboBox1->ItemIndex=0;

Proszę o pomoc

[Cyfrowy Baron]

Pewnie dlatego, że sterowanie DBComboBox odbywa się automatycznie przez bazę danych, gdyż to komponent bazodanowy, a zwykłe ComboBox już nie ma nic wspólnego z bazą danych.

DBComboBox musi być podłączony do bazy danych poprzez właściwości DataField i DataSource. Jeżeli konstrukcja bazy danych nie wymaga użycia DBComboBox, to używaj zwykłego ComboBox.

[Corvis]

Dokładnie jak baron napisał.

Mam jeszcze jedną uwagę do tego co tu zobaczyłem. Jeżeli wczytujesz coś do TComboBox z bazy danych zawsze sobie wczytaj jeszcze ID - klucz główny. Czyli jeżeli masz tabelę USERS i w niej pola ID, USERS_NAME (Tutaj kolejna uwaga dobrą praktyką jest nie używanie znaków "_" gdyż zmniejszają czytelność kodu) zawsze zadaj sobie zapytanie: select ID, USERS_NAME from USERS i wczytaj wynik do listy w taki sposób:

KOD cpp:   �  UKRYJ  �

KOD cpp:   �  POKAŻ  �

sqldtsMain->Open(); // sqldtsMain - data set który wykonał zapytanie
while(!sqldtsMain->Eof) {
  lst->AddObject(sqldtsMain->Fields->Fields[1]->AsString, (TObject*)sqldtsMain->Fields->Fields[0]->AsInteger);
  sqldtsMain->Next();
}
sqldtsMain->Close();
 

Taki sposób pozwoli ci szybciej i bezpieczniej "dobierać się" do danych w tabeli. Po wybraniu pozycji w ComboBox masz od razu jej klucz główny z bazy a co za tym idzie masz pewność, że na pewno użyjesz dobrej wartości.

Odczytanie wartości klucza głównego dla wybranej pozycji z Comboboxa:

KOD cpp:   �  UKRYJ  �

KOD cpp:   �  POKAŻ  �

if(ComboBox1->ItemIndex >=0) {
    int Klucz = (int)ComboBox1->Items->Objects[ComboBox1->ItemIndex];
}