[es] - BCB - Kako doznati tip stupca iz tablice?

itf
Zagreb

Član broj: 59794
Poruke: 778
161.53.55.*

ICQ: 337738018

Profil

BCB - Kako doznati tip stupca iz tablice?

^{01.08.2006. u 13:36}

Trebam napisati funkciju koja koja kao argument prima naziv kolone iz jedne tablice u bazi podataka. Nakon toga, ja moram kreirati pomoćnu varijablu koja treba sadržavati staru vrijednost podatka u toj koloni, te kasnije to obrađivati kako već želim. Problem je što ja ne znam kako doznati kojeg tipa treba biti ta pomoćna varijabla jer stupac koji predajem funkciji može sadržavati integer, float, date.... Kako da to realiziram?

^{01.08.2006. u 13:36}

X Files
Vladimir Stefanovic
Pozarevac

SuperModerator
Član broj: 15100
Poruke: 3395
*.nat-pool.po.sbb.co.yu.

Jabber: xfiles@elitesecurity.org
Sajt: www.antivari.com

Profil

Re: BCB - Kako doznati tip stupca iz tablice?

^{01.08.2006. u 15:40}

itf,

Prvo pogledaj ovaj primer (mozda nesto moze i krace, ali sklepao sam ga ovako
na brzinu):

Code:

for ( int i=0; i<ADOTable1->FieldCount; i++ )
{
   AnsiString Field = ADOTable1->Fields->Fields[i]->FieldName;
   ShowMessage( Field + " : " + ADOTable1->FieldByName( Field )->DataType );
   // odnosno u petlji moze i ovako
   // ShowMessage( Field + " : " + ADOTable1->Fields->Fields[i]->DataType );
}

Dakle, tebi treba:

Code:

ADOTable1->FieldByName( Field )->DataType

odnosno:

Code:

ADOTable1->Fields->Fields[i]->DataType

Zatim pogledaj VCL Help: "TFieldType", jer izgleda da vrednosti koje se vracaju
odgovaraju toj tabeli.

U svakom slucaju pogledaj i tip podataka Variant, koji ti resava sve te probleme,
jer moze da primi valjda svaki drugi tip podataka i da ga kasnije pri dodeli ispravno
dodeli.

_{[Ovu poruku je menjao X Files dana 01.08.2006. u 16:59 GMT+1]}

FREEWARE
Di rečnik, v1.0.058 (srp-eng/eng-srp priručni rečnik)
http://www.antivari.com

^{01.08.2006. u 15:40}

itf
Zagreb

Član broj: 59794
Poruke: 778
161.53.55.*

ICQ: 337738018

Profil

Re: BCB - Kako doznati tip stupca iz tablice?

^{02.08.2006. u 07:49}

X Files, hvala na primjeru. Uspio sam isklepati rješenje...:

Code:
void f(TADOTable* Tablica, TField* Kolona, ...){
.
.
AnsiString Pom = Tablica->FieldByName(Kolona->FieldName)->AsString;
}

Sve se predstavi kao AnsiString i nema problema. Jedini problem može biti ako nije moguće podatak pretvoriti u AnsiString, ali koliko sam probao sve dobro radi.

^{02.08.2006. u 07:49}