Krsta Krstić Dejan Programer & Web Developer Kruševac
Član broj: 2461 Poruke: 307 *.ptt.yu
Sajt: www.atec.rs
|
Evo nasao sam za shodno malo vremena, pa da nastavimo...
Pre rada sa Crystal Reports-om iz VB-a potrebno je da napravite CR-ov
izvestaj, tj. fajl sa ekstenzijom .rpt. U tom izvestaju pravite osnovu
po kojoj ce prosledjeni podatci iz VB-a, tj. iz baze podataka imati konacan
izgled, tj stampace se po toj semi. Znaci vi samo odredite koja polja iz
baze treba da se stampaju i po kom kriterijumu, a sam CR ostalo preuzima na
sebe.
Ubacivanje baze u CR vrsite tako sto u samom projektu CR-a,tj. u meniju Database
kliknete na Add Database to Report i navedete putanju do baze koju koristite. Sledeci
korak je da odaberete koju tabelu u bazi koristite, pod uslovom da imate vise tabela.
Dodavanje polja iz baze u CR, vrsite tako sto u meniju Insert kliknete na DatabaseField
i onda klasicnom metodom Drag&Drop prevucete polja koja su vam potrebna za stampu.
U Design modu CR-a sa leve strane primeticete nazive, npr Report Header, Page Header i
slicno, koji horizontalnim linijama dele radni deo CR-a. Logika vam je slicna kao u
naprimer Wordu. Znaci polja koja stavite u delu Report Header stampaju se samo jednom
u vrhu, tj. ako imate vise stranica pojavice se samo na prvoj. Page Header se stampa
na pocetku svih stranica, Details je osnovni deo za stampu u tom delu stavljate podatke
koji se ponavljaju na svakoj stranici. Npr. ako je potrebno stampati racun, ime firme bi
bilo na ReportHeader-u ili na Page Header-u , u zavisnosti od zelje korisnika,
a podatci iz racuna bi bili smesteni u Details-u.
Kada ubacite sva polja iz baze u CR, pristupate samom dizajnu izvestaja, tj.
razmestate polja, menjate font, velicinu slova... U toku dizajniranja izvestaja
uvek mozete pogledati kako to izgleda na ekranu ili odstampati iz samog CR-a.
Po zavrsetku rada snimite fajl u direktorijum gde vam je VB projekat, posto i njega
isporucujete zajedno u Setup-u, a i zbog same preglednosti celog projekta.
CR controlu standardno ubacujete na formu kao i svaki Active X, znaci
Project, pa components i odatle izaberete CR controlu.
Vezivanje CR fajla "nekifajl.rpt" i CR kontrole mozete vrsiti u propertisu
od CR-a ili u samom kodu. Ja licno to radim u kodu VB-a na sledeci nacin.
'-----------DEO ZA CRYSTAL REPORT----------
Report1.WindowState = crptMaximized
Screen.MousePointer = 13
Report1.Destination = 1
Report1.DataFiles(0) = "mojabaza.mdb"
Report1.ReportFileName = "nekifajl.rpt"
On Error GoTo Errorhandler:
Report1.Action = 1
Screen.MousePointer = 0
Exit Sub
Errorhandler:
MsgBox Report1.LastErrorString
Screen.MousePointer = 0
Exit Sub
ERR1:
MsgBox "DOSLO JE DO GRESKE", vbInformation, " "
Screen.MousePointer = 0
End Sub
'---------KRAJ KODA------------------------
Report1.WindowState - velicina preview prozora
Report1.Destination - destinacija,tj. odabir gde proslediti izvestaj
stampac, fajl ....
Report1.DataFiles(0) - baza koju koristimo u CR-u
Report1.ReportFileName - Ime fajla CR-a
Cristal Reports u principu nije mnogo komplikovan, mada je dosta obiman, tj.
imate velike mogucnosti u kreiranju izvestaja, mada kao i kod svakog
programa sto duze radite sa njim vise cete znati, brze i bolje iskoristiti
mogucnosti koje pruza. Ovo sto sam opisao je samo osnova za dalju izgradnju
slozenijih izvestaja u vasem programu, mada za one manje slozenije izvestaje
mozete krenuti odmah.
Poz...!
|