Legfrissebb anyagok
LOGOUT témák
- sh4d0w: Netflix? Ugyan, VW előfizetés!
- Elektromos rásegítésű kerékpárok
- WhrlpoolMind: Az eredeti lemez utánozhatatlan illata
- sziku69: Fűzzük össze a szavakat :)
- Geri Bátyó: Megint tahó voltam – SZEMÉLYISÉGFEJLŐDÉS
- Luck Dragon: Asszociációs játék. :)
- Meggyi001: Nyilvános wc-k.....még mindig hiánypótló...
- sziku69: Szólánc.
- Mr Dini: Mindent a StreamSharkról!
- GoodSpeed: AMD Ryzen 7 7700X vs AMD Ryzen 9 9900X Cinebench R23 & R24 Benchmarkokban mérve
PROHARDVER! témák
Mobilarena témák
IT café témák
Új hozzászólás Aktív témák
-
Notes
senior tag
Köszi! Végre életet leheltél a fórumba!
Végül így oldottam meg (Thx to prog.hu community!):
Begin
Close;
Clear;
Add('SELECT *');
Add('FROM TranzTabla');
Add('WHERE (Datum>= :KezdDatum) AND (Datum<= :VegDatum)');
If LekerdFelhComboBox.ItemIndex>0 Then
Add ('AND (Felhasznalo= '+ Quotedstr(LekerdFelhCombobox.text)+')');
If LekerdPartnerComboBox.ItemIndex>0 Then
Add ('AND (Partner= ' + Quotedstr(LekerdPartnerCombobox.text)+')');
If LekerdCimletCombobox.Itemindex>0 Then
Add ('AND '+ VPDataModule.TranzTabla.Fields[(LekerdCimletComboBox.ItemIndex)+5].FieldName +' is not null');
Prepare;
ParamByName('KezdDatum').AsDate:=LekerdDatePicker1.Date;
ParamByName('VegDatum').AsDate:=LekerdDatePicker2.Date;
Open;
end;
end;
Ez egy DBGrid-re irányítva hibátlanul működik. De ha a Query-t egy Reportra teszem és annak az OnPreview eseményekor hívom meg a fenti kódot, akkor mindig csak a feltételeknek elsőként megfelelő rekord jelenik meg, de az annyiszor, ahány rekord megfelel az SQL statement-nek. Nem tudom ez így érthető-e?
Az egyik könyvben azt olvastam, hogy a Query-hez kapcsoljak DataSource-t is. Minek? Lehet közvetlenül is hivatkozni rá nem?
Új hozzászólás Aktív témák
Hirdetés
Aktív témák
Új fizetett hirdetések
Üzleti előfizetők hirdetései
- Bomba ár! Dell Latitude 5300 - i5-8GEN I 8GB I 256SSD I 13,3" HD I HDMI I Cam I W11 I Gari!
- Samsung Galaxy Tab A9+ 5G 128GB, Kártyafüggetlen, 1 Év Garanciával
- Bomba ár! Lenovo ThinkPad L13 G1 - i5-10GEN I 16GB I 512SSD I 13,3" FHD I HDMI I Cam I W11 I Gari!
- Bomba ár! Lenovo ThinkPad X250 - i7-5GEN I 8GB I 256GB SSD I 12,5" HD I Cam I W10 I Garancia!
- ÁRGARANCIA!Épített KomPhone i7 14700KF 32/64GB RAM RX 9070 XT 16GB GAMER PC termékbeszámítással
Állásajánlatok
Cég: FOTC
Város: Budapest