DBGrid - problem z wyświetleniem danych

[LiMeS]

Tym razem problemik wyświetlania mnie unieruchomił.

KOD cpp:   �  UKRYJ  �

KOD cpp:   �  POKAŻ  �

void __fastcall TOkno_glowne::BitBtn20Click(TObject *Sender) //Filtr na zleceniach po rok / numer
{
ObZ_TZlecenia_Zapytanie_Select("SELECT idTZlecenia, CONCAT(Nr_zlecenia, '/', Rok_zlecenia) AS Numer_zlecenia, Data_przewidywany_odbior FROM tzlecenia WHERE rok_zlecenia LIKE '%" + Edit53->Text + "%' AND nr_zlecenia LIKE '%" + Edit55->Text + "%' ORDER BY idTZlecenia DESC");

Kontrola_Czy_Jest_Otwarte_Zlecenie();
}
//---------------------------------------------------------------------------
void __fastcall TOkno_glowne::Kontrola_Czy_Jest_Otwarte_Zlecenie(void) // Kontrola czy są wyświetlone jakieś otwarte zlecenia
{
if(DataModule2->ObZ_ADOTZlecenia->Fields->FieldByName("NR_ZLECENIA")->AsString == "")
        {
        TabSheet13->TabVisible = false;

        DBGrid3->Columns->Items[0]->Visible = false; //idTZlecenia,
        DBGrid3->Columns->Items[1]->Visible = false; //Rok_zlecenia + Nr_zlecenia,
        DBGrid3->Columns->Items[2]->Visible = false; //Data_przewidywany_odbior,

        ShowMessage("Nie ma aktualnie żadnych OTWARTYCH zleceń");
        }
else
        {
        TabSheet13->TabVisible = true;

        DBGrid3->Columns->Items[0]->Visible = false; //idTZlecenia,
        DBGrid3->Columns->Items[1]->Visible = true; //Rok_zlecenia + Nr_zlecenia,
        DBGrid3->Columns->Items[2]->Visible = true; //Data_przewidywany_odbior,
        }
}

W efekcie dostaję coś takiego:



Jak widać kolumna 1 - podaje wartość (VARBYTES), ale jak zawartość pola w bazie wyświetlę np. w Labelu to jest prawidłowa (widoczna nad polem nazwisko i imię).
Dlaczego tak jest ?

[Corvis]

Kod: Zaznacz cały

void __fastcall TOkno_glowne::BitBtn20Click(TObject *Sender) //Filtr na zleceniach po rok / numer
{
ObZ_TZlecenia_Zapytanie_Select("SELECT idTZlecenia, CONCAT(Nr_zlecenia, '/', Rok_zlecenia) AS Numer_zlecenia, Data_przewidywany_odbior FROM tzlecenia WHERE rok_zlecenia LIKE '%" + Edit53->Text + "%' AND nr_zlecenia LIKE '%" + Edit55->Text + "%' ORDER BY idTZlecenia DESC");

Kontrola_Czy_Jest_Otwarte_Zlecenie();
}

1. TRAGEDIA i podstawowy błąd - wsadzanie w kod programu zapytań SQL. Przerób to na procedurę składowaną.
2. Kontrola_Czy_Jest_Otwarte_Zlecenie(); Słaby pomysł na nazywanie funkcji - zawiły.
3. Nazewnictwo kolumn w bazie - polecam poczytać jakieś książki.


To tak po za tematem. Co do problemu.

1. Jakiego typu jest wartość kolumny NR_ZLECENIA ???
2. Cholernie zawiły sposób myślenia i kodowania. Napisz mi dokładnie co chcesz zrobić !!!!!!
3.

if(DataModule2->ObZ_ADOTZlecenia->Fields->FieldByName("NR_ZLECENIA")->AsString == "")

Co to jest ?? Patrz punkt 2

Podsumowując. Napisz co masz i co chcesz osiągnąć. Wtedy ci pomogę.

[LiMeS]

No tak - jeszcze długa nauka przede mną - jestem tego świadomy.

A temat, który chcę zrealizować ?

Mam w bazie pola nr_zlecenia - typu int, rok_zlecenia typu int, a potrzebuję pokazać w dbgridzie połączone pola w postaci : rok_zlecenia / nr_zlecenia i tytuł dbgrida powinien się nazywać numer_zlecenia

[Corvis]

Nie napisałeś jakiego typu jest pole numer zlecenia. Najprawdopodobniej problem leży w konwersji wykonywanej w linii:

Kod: Zaznacz cały

CONCAT(Nr_zlecenia, '/', Rok_zlecenia)

Nie wiem też jakiego serwa bazodanowego używasz. Spróbuj zrobić tak:

Kod: Zaznacz cały

CONCAT(cast(Nr_zlecenia as char), '/', cast(Rok_zlecenia as char))

albo

Kod: Zaznacz cały

cast(CONCAT(Nr_zlecenia, '/', Rok_zlecenia) as char)

Troche strzelam bo nie mam wszystkich danych. Takich jak gdzie są pobierane dane z bazy ? Do jakiego DataSeta, czy pola w datasecie są stałe czy dynamicznie tworzone ? jeżeli stałe jakiego typu jest pole odpowiadające za wyświetlanie numeru zlecenia.

[LiMeS]

No to po kolei:

Kod: Zaznacz cały

SELECT idTZlecenia, CONCAT(Nr_zlecenia, '/', Rok_zlecenia) AS Numer_zlecenia

samo polecenia jako tako działa - sprawdziłem w MySQL Query Browserze i po wprowadzeniu tworzy się widok zawierający poprawnie wypełnione pole Numer_zlecenia.

Czyli problem jest w samym wyświetlaniu danych w DBGridzie.

Parę odpowiedzi na wcześniejszy post:
Baza: MySQL 5.1
Podłączona za pomocą kontrolki ADOConnection
Tabela zlecenia ADOQuery z TDataSource. DBGrid wskazuje na DSZlecenia.
Pola w DBGridzie wypełniane są dynamicznie przy wykonywanym SELECT;cie.

Ps.
Kompilator C++Builder 2007

[Corvis]

Czyli problem jest w samym wyświetlaniu danych w DBGridzie.

To, że select działa w konsoli, nie znaczy że będzie poprawnie wyświetlony w TDbGrid - już nie raz się o tym przekonałem. Sprawdziłeś to co ci podałem ???

Możesz jeszcze, żeby było lepiej to zrobione, przerobić to tak:

1. Skoro masz MySql polecam używać dbExpressa zamiast ADO .
2. Zestaw połączenie i komponenty tak:

TSqlConnection TSqlDataSet TDataSetProvider TClientDataSet TDataSource TDBGrid

ClientDataSet łączysz z DataSetProvider poprzez PROVIDER NAME.

3. Ustaw zapytanie w SqlDataSet
4. Otwórz ClientDataSet - (nie SqlDataSet !!!!)


I Sprawdź wyniki, daj znać też czy sprawdziłeś to co ci podałem z Cast

[LiMeS]

Zarówno próba pierwszego zastosowania zapytania z cast jak i drugiego zapytania kończy się błędem.



Co do połączenia komponentów dbExpress - niestety nie radzę sobie z ich prawidłowym podpięciem.

[Corvis]

1.Wklej SQL
2. Z czym dokładnie sobie nie radzisz ?

[LiMeS]

1.Wklej SQL

Ech... Corvis - do MySQL Query Browsera wklejałem zapytanie z palca - działało; co CBuildera wrzucałem z kodu programu i nie działało. Stworzyłem sobie edita do którego wkleiłem treść zapytania i... EUREKA - cholernego przecinka nie zauważyłem.

SELECT idTZlecenia, CONCAT(cast(Nr_zlecenia as char), '/', cast(Rok_zlecenia as char)), Data_otwarcia, Stan_zlecenia, FROM tzlecenia ORDER BY idTZlecenia DESC

Kod: Zaznacz cały

SELECT idTZlecenia, CONCAT(cast(Nr_zlecenia as char), '/', cast(Rok_zlecenia as char)), Data_otwarcia, Stan_zlecenia FROM tzlecenia ORDER BY idTZlecenia DESC

Jednym słowem gra i buczy - serdeczne dziękuję.
Zmodyfikowałem to jeszcze, by pole wynikowe wyglądało w miarę OK

Kod: Zaznacz cały

SELECT idTZlecenia, CONCAT(cast(Nr_zlecenia as char), '/', cast(Rok_zlecenia as char)) as Numer_zlecenia, Data_otwarcia, Stan_zlecenia, FROM tzlecenia ORDER BY idTZlecenia DESC

Ad. 2 - Postawiłem sobie komponenty dbExpress na nowej formie i nie bardzo wiedziałem w jaki sposób je połączyć. W ADO wydawało mi się to znacznie prostsze.

[Corvis]

Napisałem ci jak to połączyć

TDbGrid TDataSource (w gridzie ustawiasz DataSource)
TDataSource TClientDataSet (w DataSource ustawiasz DataSet)
TClientDataSet TDataSetProvider (w cds ustawiasz to poprzez provider name)
TDataSetProvider TDataSet ( w providerze ustawiasz DataSet)


Gdzie jest problem ??

[LiMeS]

Hmmm. Dzisiaj poszło od strzału. Wniosek - musiałem ostatnio coś naknocić.
Dziękuje raz jeszcze i... do następnego razu .

[Corvis]

Sprawdź sobie czy w dbexpressie potrzebny jest CAST w zapytaniu SQL

[LiMeS]

Hmmm. Cast niepotrzebny - tabela zachowuje się tak jak w MySQL Query Browserze. Bez CAST'a działa, z CAST'em też działa .