[es] - Postavljanje slike na QReport

ja034
programer,Zastava oruzje

Član broj: 195596
Poruke: 16
91.150.116.*

Profil

^{06.10.2008. u 09:46 - pre 189 meseci}

Na QReportu treba da postavim sliku i to mi lepo radi kada imam sliku,ali imam problem kada slika ne postoji(dobijam prazan izvestaj bez podataka koje povlacim iz baze).Da li nekom zana kako da resim problem,koristim komponentu QRImage za prikaz slike.
Hvalaaa

Odgovor na temu

X Files
Vladimir Stefanovic
Pozarevac

SuperModerator
Član broj: 15100
Poruke: 4902
*.tekostolac.co.yu.

Jabber: xfiles@elitesecurity.org

+638 Profil

Re: Postavljanje slike na QReport

^{06.10.2008. u 10:09 - pre 189 meseci}

Posto sliku ucitavas u QRImage (a ne u QRDBImage) pretpostavljam da slika nema nikakve veze sa bazom (sto je po meni i bolje), vec se nalazi u nekoj putanji koju poznajes...

E sad, kakva je veza izmedju podataka koji se nalaze na izvestaju (a citaju se iz baze) i te slike koja se nalazi negde na disku?

Mozda ne proveravas postojanje slike (FileExists) pre eventualnog ucitacanja (LoadFromFile) pa ostatak koda ostane neobradjen nakon prekida? Pokazi barem delic tog koda ako nije to sto sam naveo...

Odgovor na temu

ja034
programer,Zastava oruzje

Član broj: 195596
Poruke: 16
*.com
Via: [es] mailing liste

Profil

Re: Postavljanje slike na QReport

^{06.10.2008. u 10:57 - pre 189 meseci}

Veza je upravo nikakva slika-podaci zato mi i nije jasno zasto nemam podatke na izvestaju. Ispitujem da li slika postoji pre ucitavanja.Evo deo koda:

Code:

if QRReport = Nil then QRReport :=TQRReport .Create(Application);
QRReport .Query1.Close;
QRReport .Query1.ParamByName('param').AsString := RxDBGrid1.Fields[0].Text;
QRReport .Query1.Open;
    ////////////////////  kod za slike
    if FileExists(Concat(PutanjaSlika,QPregledParam.Text,'.JPG')) then
    begin
         QRReport.QRImage1.Picture.LoadFromFile(Concat(PutanjaSlika,QPregledPoMBrULMatBr.Text,'.JPG'));
    end else
    begin
             QRReport.QRImage1.Picture.LoadFromFile('D:SlikeNema.JPG');
///ili QRReport.QRImage1.Picture.LoadFromFile(Concat(PutanjaSlika,'Nema','.JPG'));
    end;
    ////////////////////////////////////////// kod za slike
          QRReport.Preview;

Samo napomena da na disku imam konturu za sliku kada ne postoji slika a to je (Nema.JPG)

Edit X Files: Kod stavljaj izmedju tagova predvidjenih za to, jer ce ti u najmanju ruku biti 'pojedeni' backslasjovi u kodu...

Odgovor na temu

priki

Član broj: 24732
Poruke: 700
*.datalab.si.

ICQ: 174153511

+26 Profil

Re: Postavljanje slike na QReport

^{07.10.2008. u 11:01 - pre 189 meseci}

a šta na ovaj tvoj kod kaže debbuger ?

Odgovor na temu

ja034
programer,Zastava oruzje

Član broj: 195596
Poruke: 16
79.101.234.*

Profil

Re: Postavljanje slike na QReport

^{09.10.2008. u 07:53 - pre 189 meseci}

Debbuger ispada u redu:
QRReport.QRImage1.Picture.LoadFromFile('D:\Slike\Nema.JPG');
A ne daje nikakvu poruku da je greska

Odgovor na temu

savkic
Igor Savkić

Moderator
Član broj: 92186
Poruke: 2739

+92 Profil

Re: Postavljanje slike na QReport

^{09.10.2008. u 10:35 - pre 189 meseci}

> Debbuger ispada u redu:
> QRReport.QRImage1.Picture.LoadFromFile('D:\Slike\Nema.JPG');
> A ne daje nikakvu poruku da je greska

Da li imaš jpeg u uses klauzuli? Proveri da nisi isključio u debugger options dobijanje grešaka ili da si uključio ignorisanje određenog tipa grešaka. Pokušaj i sa uitavanjem neke što jednostavnije bmp slike, možda ta jpg slika nije u podržanom formatu.
Kada kažeš da debugger ispada, šta to tačno znači, program se samozatvori?

Do not be a help vampire (http://slash7.com/pages/vampires), use the google.

How to ask questions the smart way:
http://www.catb.org/~esr/faqs/smart-questions.html
http://solair.eunet.rs/~fangor...stions/smart-questions.sr.html

Odgovor na temu

priki

Član broj: 24732
Poruke: 700
*.datalab.si.

ICQ: 174153511

+26 Profil

Re: Postavljanje slike na QReport

^{09.10.2008. u 10:51 - pre 189 meseci}

i jos nesto

probaj da ucitas sliku u stream pa proveri taj stream jel ima nesto u njemu (seek)
ako ima, onda kreiraj sliku i postavi preko Picture.LoadFromStream,
ako ne, ne bi trebalo nista da se desi

imas takvih primera po internetu koliko hoces

Odgovor na temu

ja034
programer,Zastava oruzje

Član broj: 195596
Poruke: 16
91.150.116.*

Profil

Re: Postavljanje slike na QReport

^{09.10.2008. u 11:54 - pre 189 meseci}

Ne znam da li smo se razumeli ,meni je problem sto mi se izvestaj otvara kao prazan sa labelama ali bez podataka iz baze kada nemam sliku koju ucitavam sa odredjene putanje

Odgovor na temu

priki

Član broj: 24732
Poruke: 700
*.datalab.si.

ICQ: 174153511

+26 Profil

Re: Postavljanje slike na QReport

^{09.10.2008. u 12:34 - pre 189 meseci}

mislim da smo dobro razumeli,
pitanje je kako ti razmeš pomoć oko slike što ti pišemo

Odgovor na temu

savkic
Igor Savkić

Moderator
Član broj: 92186
Poruke: 2739

+92 Profil

Re: Postavljanje slike na QReport

^{09.10.2008. u 12:35 - pre 189 meseci}

> Ne znam da li smo se razumeli ,meni je problem sto mi se izvestaj otvara kao prazan sa labelama ali bez podataka iz baze kada
> nemam sliku koju ucitavam sa odredjene putanje

Zašto si onda rekao da ti debugger ispada? Dakle, da li dolazi do greške ili ne dolazi, ako da onda pogledaj moju prethodnu poruku, ako ne, da li vidiš samu sliku (a podatke ne) i šta se dešava kada izbaciš učitavanje slike?

Odgovor na temu

ja034
programer,Zastava oruzje

Član broj: 195596
Poruke: 16
91.150.108.*

Profil

Re: Postavljanje slike na QReport

^{10.10.2008. u 08:09 - pre 189 meseci}

Ne dolazi do greske,slika se pojavljuje ali ne i podaci na izvestaju

Odgovor na temu

savkic
Igor Savkić

Moderator
Član broj: 92186
Poruke: 2739

+92 Profil

Re: Postavljanje slike na QReport

^{10.10.2008. u 13:20 - pre 189 meseci}

Ako izbaciš učitavanje slike da li vidiš podatke?

Odgovor na temu

ja034
programer,Zastava oruzje

Član broj: 195596
Poruke: 16
93.86.141.*

Profil

Re: Postavljanje slike na QReport

^{13.10.2008. u 11:53 - pre 189 meseci}

Resen problem,hvala svima na pomoci!!! Moja 'sitna greska'!!!U query-ju sam pratila samo aktivne radnike a testirala sam program uvek na zaposlenom koji nije aktivan!!!! Zamisli!!!
Hvala jos jednom

Odgovor na temu