Legfrissebb anyagok
LOGOUT témák
- sziku69: Fűzzük össze a szavakat :)
- Gurulunk, WAZE?!
- sziku69: Szólánc.
- Luck Dragon: Asszociációs játék. :)
- Austin F.: Intel Iris Xe driver frissítés
- Elektromos rásegítésű kerékpárok
- gban: Ingyen kellene, de tegnapra
- LordAthis: Ismét egy "Idióta" A.I. Projekt, hogy meglovagolja a trendeket...
- NASsoljunk: ZyXEL NSA-310 és az FFP
- tildy: Új élet kezdődik
PROHARDVER! témák
Mobilarena témák
IT café témák
GAMEPOD 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
Aktív témák
- Samsung Galaxy S24 - nos, Exynos
- sziku69: Fűzzük össze a szavakat :)
- Xbox Series X|S
- Samsung Galaxy Z Fold5 - toldozás-foldozás
- Úgy tér vissza a Commodore 64, ahogy titkon mindenki várja
- PlayStation 4
- Gurulunk, WAZE?!
- Óra topik
- Pécs és környéke adok-veszek-beszélgetek
- AMD Ryzen 9 / 7 / 5 7***(X) "Zen 4" (AM5)
- További aktív témák...
Új fizetett hirdetések
- Eladó Vagy Csere Samsung Galaxy Z Fold 4
- EVGA SuperNOVA 750W GT 80 Plus Gold full moduláris tápegység / 53 hónap Alza.hu garancia
- Surface Laptop 4 Touch 13.5 Retina Ryzen7 4980U 4.4Ghz 16GB 512GB Radeon RX Vega8 Win11 Pro Garancia
- Gigabyte AORUS B550I PRO AX ITX Rev 1.2 / Beszámítás OK!
- HP 15 Zbook Studio G8 FHD IPS i7-11850H vPro 32GB 512GB SSD Nvidia A2000 Studio Win11 Pro Garancia
Üzleti előfizetők hirdetései
- LG 65C3 - 65" OLED evo - 4K 120Hz 1ms - NVIDIA G-Sync - FreeSync Premium - HDMI 2.1 - PS5 és Xbox!
- Beszámítás! Sony PlayStation 5 825GB SSD lemezes konzol extra játékokkal garanciával hibátlan
- BESZÁMÍTÁS! MSI H510M i5 10500 32GB DDR4 960GB SSD RTX 3060 12GB Rampage SHIVA ADATA 600W
- Dell D6000 univerzális dokkoló USB-C/ USB-A, DisplayLink & Dell WD15 (K17A) USB-C + 130-180W töltő
- Szinte új, minőségi, állítható ritkítóolló
Állásajánlatok
Cég: PCMENTOR SZERVIZ KFT.
Város: Budapest