Prikazi cijelu temu 01.04.2011 13:01
dragan59 Van mreze
Clan
Registrovan od:02.11.2010
Lokacija:Mostar


Predmet:Re: Ideje i rjesenja iz teme fiskalizacija
Ja ne radim u Access-u tako da nisam baš dobar sa Basic-om.
Ovako bi nešto išlo u Delfiju (Object Pascal)

function broj_fiskalnog(const : povratna_linija : String) : Integer;
var
i, k, zarez_5, zarez_6 : Integer;

zarez_5 := 0;
zarez_6 := 0;
k := 0;

For i := 1 to Length(povratna_linija) do