complex

[ b0sanac @ 28.05.2003. 20:57 ] @

Code:

Type complex=RECORD
              re,im:real;
             End;
Type det=array[1..20,1..21] Of complex;
     vektor=array[1..20] Of complex;
Var Determ:det;
    R:vektor;
    BrKnt,i,j,k:integer;
    t:complex;

Problem je u tome sto ja K[1] recimo trebam da pretvorim u string da bi ga mogao staviti u labelu u Delphiu. E kako bi to mogao uraditi?

[ tomdam @ 29.05.2003. 04:20 ] @

Pošto je promenljiva k tipa integer nemoguće je pozivati k[1].
Ako ti treba ceo broj k da prevedeš u string imaš funkciju
inttostr(i:integer):string;

Pozdrav.

[ b0sanac @ 30.05.2003. 13:10 ] @

greska u pisanju treba mi R[1]

[ burner @ 30.05.2003. 14:23 ] @

label1.Caption:=FloatToStr(R[1].re)+'+i'+FloatToStr(R[1].im);

[ b0sanac @ 30.05.2003. 23:07 ] @

E to mi je trebalo
hvala ;)

[ bancika @ 20.04.2004. 12:43 ] @

elegantnije resenje je da napravis objekat Complex, sa metodom ToString, recimo.