Navigacija
Lista poslednjih: 16, 32, 64, 128 poruka.

Filtriranje baze

[es] :: Pascal / Delphi / Kylix :: Filtriranje baze

[ Pregleda: 2511 | Odgovora: 2 ] > FB > Twit

Postavi temu Odgovori

Autor

Pretraga teme: Traži
Markiranje Štampanje RSS

mzarko

Član broj: 33636
Poruke: 80
*.ptt.yu.



Profil

icon Filtriranje baze01.10.2005. u 20:46 - pre 225 meseci
Na koji nacin je moguce filtrirati bazu tako da za Polje "Iznos" uvek bude isti uslov
i da za vise polja gde se upisuje datum "Datum1", "Datum2", "Datum3", "Datum4" i "Datum5" da vrsi filtriranje i da za dobijeni rezultat budu ispunjena dva uslova i to za prvi uslov da je iznos veci od 0 i za drugi da pronadje datum od - do u bilo koje polje od navedenih.

ADOTable1.Filter := 'Iznos > 0' +' and Datum1 >= '+quotedstr(datumm)+ 'and Datum1 <= '+quotedstr(datumv);
(datumm - DateTimePicker1.Date a datumv - DateTimePicker2.date)

Na ovaj nacin radi samo za jedno polje sa datumom i sta je potrebno jos uraditi da bi to sve funkcionisalo?

Unapred hvala
 
Odgovor na temu

Srki_82
Srdjan Tot
Me @ My Home
Ljubljana

Član broj: 28226
Poruke: 1403
82.208.201.*

ICQ: 246436949


+10 Profil

icon Re: Filtriranje baze01.10.2005. u 22:09 - pre 225 meseci
Nisam bas siguran da razumem pitanje... uvek mozes u Filter da dodas AND Datum2 >= neki datum AND Datum2 <= neki daum... itd.

Mozda ce ti neko dati bolji odgovor ako bi malo bolje objasnio pitanje i dao nek primer.
 
Odgovor na temu

marcha
Nikola Marcic
Beograd/Leskovac

Član broj: 6454
Poruke: 108
*.124.eunet.yu.

ICQ: 156892888


+1 Profil

icon Re: Filtriranje baze02.10.2005. u 02:56 - pre 225 meseci
Ako sam te doboro razumeo zelis sledece:
(Iznos>0) I ((xDatum izmedju Datum1 i Datum2) ILI (xDatum izmedju Datum3 i Datum4))

Posto nisam siguran da li ADO ima between probaj ovako:
Code:

function QuoteDate(ADatum:TDateTime):string;
begin
   Result:=QuotedStr(DateToStr(ADatum));
end;

function MyFilter(xDatum:TDateTime):string;
var qd:string;
begin
 qd:= QuoteDate(xDatum);
 Result:='((IZNOS>0)AND
               (
                (('+qd+'>=Datum1)and('+qd+'<=Datum2))
               or
                (('+qd+'>=Datum3)and('+qd+'<=Datum4))
               )
               )';
end;

Mozda ima neka zagrada vise-manje ....
Nemam ovde Delphi da isprobam...

Pozdrav





[Ovu poruku je menjao marcha dana 02.10.2005. u 12:02 GMT+1]
Marcha
-----------------------------------
Pretpostavka je majka zajeba.
 
Odgovor na temu

[es] :: Pascal / Delphi / Kylix :: Filtriranje baze

[ Pregleda: 2511 | Odgovora: 2 ] > FB > Twit

Postavi temu Odgovori

Navigacija
Lista poslednjih: 16, 32, 64, 128 poruka.