Primeri brisanja objekata
Primer sakrivanja objekata na ispisu, koji imaju u pozadini programski kod (1)
Pogledajmo primer sakrivanja objekata na ispisu, koji imaju u pozadini programski kod. Radićemo na našem novom ispisu, kojeg najpre otvorimo u ispisu za oblikovanje. Označimo liniju ispod naziva dokumenta. Ime objekta, kojeg brišemo je mTitle2, kojeg možemo videti i u prozoru Object Inspector (kao što prikazuje slika).
To je takodje naziv za koji je vezan programski kod. Pre brisanja možemo na panelu Code da vidimo tj. da potražimo preko kombinacije tastera Ctrl+F.
Kada smo videli kod, koji se odnosi za naš objekat, vratimo se na panel Page, označimo je i izbrišemo tasterom Delete. Ispis sačuvamo i ponovo ga pokrenemo iz uređivača. To uradimo tako što u glavnom meniju izaberemo File|Preview. Program nas postavi na panel Code i javi grešku na slici, kako bi je popravili.
Poruka nam kaže da FastReport u kodu ne nalazi objekat sa imenom mTitle2. Naravno da ne može da ga pronađe jer smo ga izbrisali i više ne postoji. U kodu izbrišemo sledeći red.
mTitle2.Width := mTitle1.CalcWidth + fKljuc.CalcWidth - 8;
Vratimo se na panel Page1 i sačuvamo promene i pogledamo ispsi u pregledu.
Otvaranje ispisa iz uređivača ispisa se koristi samo za pregled oblike ispisa, ali to ne garantuje da su podaci uvek tačni.
Ako mislimo da će nam kod zatrebati ubuduće možemo samo da »komentarišemoo«. To znači, da je kod i dalje zapisan, samo program to ne vidi. To napravimo tako, što na početku reda dodamo dve kose crte. Gornji red se sad zapisuje na sledeći način:
// mTitle2.Width := mTitle1.CalcWidth + fKljuc.CalcWidth - 8;
Primer sakrivanja objekata na ispisu, koji imaju u pozadini programski kod (2)
Objekat sa podacima o preduzeću na vašem ispisu Moj_Račun sa imenom mDokumentA i mDokumentB pokušajte da obrišete. Pre brisanja se uverite da li objekat u pozadini ima programski kod.
Možemo zaključiti sledeće:
Ako izbrišemo objekat mDokumentB, moramo pobrisati sledeći kod:
mDokumentB.Text := <tbParameter."ACCOMPANYPRTTEXTB">;
mDokumentA.Width := dlValueInRange(mDokumentA.CalcWidth, mDokumentA.Width, 11 * fr1cm);
Ako izbrišemo još objekat mDokumentA, moramo brisati i sledeći kod:
mDokumentA.Text := <tbParameter."ACCOMPANYPRTTEXTA">;
mDokumentA.Width := dlValueInRange(mDokumentA.CalcWidth, mDokumentA.Width, 11 * fr1cm);
Primer skrivanja objekata na ispisu, koji imaju u pozadini programski kod (3)
Pogledajmo kako brišemo bend DetailFooter2, na kom je zapisana napomena na dokumentu.
Pre početka se setimo koji je bend bio pre njega i iza njega. U našem slučaju prethodni bend je DetailFooter, sledeći je bIzjavaTekst. Najbolje je da ispis sačuvamo i i zatim će redosled bendova se videti na. Bend izbrišemo i sačuvamo ispis.
Ako bend ne obrišemo, već brišemo samo kod za vidljivost, biće tamo gde bi trebalo opomena biti na ispisu, prazan prostor.
Ispis pokrećemo iz uređivača. Program nas postavi na panel Code i javi detaljnu grešku kao u prethodnom primeru. Kad izbrišemo red
DetailFooter2.visible := VarToStr(<qReportIzpisD."acNote">) <> '';
ispis će se otvoriti ali se podaci u nastavku ispisa neće prikazivati. Da bi se ovi podaci ponovo prikazali, kliknemo na bend bNacinPlacI i otvorimo prozor Object Inspector. Osobine Child dodelimo ime bendu, koji je prethodno bio bendu koga smo upravo obrisali. U našm primeru je to bend bIzjavaTekst. Tada će program prikazivati podatke na kraju ispisa onako kako je potrebno.
