Hirdetés
Legfrissebb anyagok
PROHARDVER! témák
- Kockázatmentesen a helyesebb testtartásért
- Androidos fejegységek
- AMD GPU-k jövője - amit tudni vélünk
- Kezdő fotósok digitális fényképei
- Milyen TV-t vegyek?
- Milyen notebookot vegyek?
- Androidos tablet topic
- Fejhallgató erősítő és DAC topik
- Milyen billentyűzetet vegyek?
- Ne várj sokat a vásárlással: drágulás a láthatáron
Mobilarena témák
IT café témák
Keresés
Ú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
- Kuponkunyeráló
- Lecsap az S26 Ultra az Exynos 2600-ra
- Xiaomi 15T - reakció nélkül nincs egyensúly
- Telekom otthoni szolgáltatások (TV, internet, telefon)
- Audi, Cupra, Seat, Skoda, Volkswagen topik
- Kockázatmentesen a helyesebb testtartásért
- Napelem
- Elektromos autók - motorok
- Androidos fejegységek
- Autós topik
- További aktív témák...
Új fizetett hirdetések
- Apple iPhone 15 Pro Max 256 GB Natural Titanium 1 év Garancia Beszámítás Házhozszállítás
- Dior Sauvage Eau de Parfum 200 ml
- Ryzen 5 2600X, MSI 1060 Armor OC 6GB, 16GB DDR4 RAM
- Sony PlayStation 5 (PS5) Slim Ghost of Yōtei Gold Limited Edition 3 év garancia
- Iphone 13 PRO MAX 128GB GOLD 91% Akku! CSODASZÉP, DOBOZBAN MINT AZ ÚJ!
Üzleti előfizetők hirdetései
- BESZÁMÍTÁS! ASRock B450M R5 3500X 16GB DDR4 512GB SSD RTX 3050 8GB GameMax STORM Black EVGA 600W
- BESZÁMÍTÁS! Xiaomi 15 Ultra 5G 16GB / 512GB okostelefon garanciával hibátlan működéssel
- HP Thunderbolt 4 kábel
- REFURBISHED - Lenovo ThinkPad 40AC Thunderbolt 3 Dock
- Dell Latitude E7440 - i5, 8GB RAM, HDMI, eu bill - számla, 6 hó garancia
Állásajánlatok
Cég: Laptopműhely Bt.
Város: Budapest
Cég: PCMENTOR SZERVIZ KFT.
Város: Budapest




