Problem sa ucitavanjem slike...? pls help (HITNO)

Problem sa ucitavanjem slike...? pls help (HITNO) 21.03.2008. u 22:13 · pre 226 meseci #1

E ljudi, hitno mi je, zato molim vas pomognite sto pre,
Znaci imam neke dinamicke komponente tipa TImage. Tj. dvodimenzionalni niz komponenti. kada hocu da pozovem sliku sa HDD-a javlja se greska: Bitmap image is not valid.

A ovako pozivam sliku:

Code:

Image[1, 1].Picture.LoadFromFile('C:/herc.bmp'); //na C: particiji imam sliku herc.bmp

Pozz

Re: Problem sa ucitavanjem slike...? pls help (HITNO) 21.03.2008. u 23:23 · pre 226 meseci #2

Probaj Image[1, 1].Picture.LoadFromFile('C:\\herc.bmp'); ?

Re: Problem sa ucitavanjem slike...? pls help (HITNO) 21.03.2008. u 23:58 · pre 226 meseci #3

A zasto '\\' zasto ne: Image[1, 1].Picture.LoadFromFile('C:\herc.bmp');? Ovo nije C/C++ pa da mora da escapeuje znak '\'...

Potpis

ex Strog

http://www.zeussoftware.rs

Re: Problem sa ucitavanjem slike...? pls help (HITNO) 22.03.2008. u 00:10 · pre 226 meseci #4

ok. sad radi. Thx. A btw kako da ubacim .jpg u Delphiu (u TImage)?

Re: Problem sa ucitavanjem slike...? pls help (HITNO) 22.03.2008. u 01:03 · pre 226 meseci #5

Vidi TJPEG klasu.

@Bojan
Zato sto brza izmena poruke nije prikazivala single backslash, pa sam morao da stavim dupli. Neki bug.

Re: Problem sa ucitavanjem slike...? pls help (HITNO) 22.03.2008. u 01:21 · pre 226 meseci #6

Ajd da ne otvaram teme bespotrebno, ovde cu da pitam jos samo ovo. Znaci imam TNiz[1..6] tipa Byte; tj. Tniz: array [1..6] of Byte;

i sad imam procedure-u u kojoj se unosi niz tj.
procedure check(Niz: array of Byte);
begin
//Ovde mi se javlja problem (u ovoj proceduri)
end;

Npr. Kad pozovem procedure-u check(TNiz);
Niz[1] se razlikuje od TNiz[1] Nije mi jasno zasto?

Re: Problem sa ucitavanjem slike...? pls help (HITNO) 22.03.2008. u 01:28 · pre 226 meseci #7

Ako zelis da u check() proceduri unosis niz i da kasnije sve te izmene koje su nastale u proceduri vaze, moras da stavis var ispred niza, dakle procedure Check(var Niz : Array of Byte)
Drugo, na jednom mestu imas deklarisan niz kao Array[1..6] of Byte dok ti je u proceduri deklarisan kao Array of Byte (dakle nije mu definisan opseg) i index prvog elementa tog niza u proceduri je 0, ne 1.

Re: Problem sa ucitavanjem slike...? pls help (HITNO) 22.03.2008. u 01:30 · pre 226 meseci #8

Ok. Thanks. Sad vidim da je problem bio u tome sto je u ovom nizu prvi element 0 a ne 1. A jel mogu nekako da namestim da i niz u proceduri pocinje od 1?

Re: Problem sa ucitavanjem slike...? pls help (HITNO) 22.03.2008. u 01:39 · pre 226 meseci #9

Napravis type TNiz, pa ga dalje koristis u programu gde ti zatreba:

Code:
type
  TNiz = Array[1..6] of Byte;

procedure Check(var niz : TNiz);
begin
end;

var
  nekiniz : TNiz;

begin
  check(nekiniz);
end.

Re: Problem sa ucitavanjem slike...? pls help (HITNO) 22.03.2008. u 01:41 · pre 226 meseci #10

E hvala puno!

Re: Problem sa ucitavanjem slike...? pls help (HITNO) 22.03.2008. u 09:24 · pre 226 meseci #11

> Ok. Thanks. Sad vidim da je problem bio u tome sto je u ovom nizu prvi element 0 a ne 1.

Bez obzira kako je niz (ili neki drugi prebrojivi tip) definisan opseg uvek možeš saznati pomoću Low i High funkcija. Npr.

Code:

type
  TA = array [5..10] of Char;
  TB = (tbJedan, tbDva, tbTri);
  TC = array['a'..'f'] of Double;

var
  a: TA;
  b: TB;
  c: TC;
  i: Integer;
  f: TB;
  g: Char;
begin
  for i := Low(a) to High(a) do
    ;

  for f := Low(b) to High(b) do
    ;

  for g := Low(c) to High(c) do
    ;
end;

Potpis

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

Re: Problem sa ucitavanjem slike...? pls help (HITNO) 22.03.2008. u 19:53 · pre 226 meseci #12

E za low i high funkcije nisam znao.

Pozz

Forum kao aplikacija na telefonu

Srodne teme