|
Poslao: 22 Feb 2007 19:22
|
offline
- N1k0l4
- Prijatelj foruma
- Pridružio: 06 Sep 2005
- Poruke: 3800
- Gde živiš: Beograd
|
Imam problem.
U list box se unose neki brojevi, kada se u combobox-u izabere minimum ili maximum u edit polju gde je rezultat treba da mi pokaze minimum ili maximum.
Maximum radi, ali minimum nece.Samo pokaze 0.
Evo tog dela koda, ako neko moze da vidi u cemu je greska.
case combobox1.ItemIndex of
0: begin
min:=x[1];
for i:=2 to strtoint(edindex.Text) do
if min>x[i] then min:=x[i];
edrez.Text:=floattostr(min);
end;
1: begin
max:=x[1];
for i:=2 to strtoint(edindex.Text) do
if max<x[i] then max:=x[i];
edrez.Text:=floattostr(max);
end;
Unapred hvala.
|
|
|
|
|
Registruj se da bi učestvovao u diskusiji. Registrovanim korisnicima se NE prikazuju reklame unutar poruka.
|
|
|
|
|
Poslao: 22 Feb 2007 21:44
|
offline
- N1k0l4
- Prijatelj foruma
- Pridružio: 06 Sep 2005
- Poruke: 3800
- Gde živiš: Beograd
|
uspeo sam da se snadjem.
Nisam ti dao dovoljno podataka, x je niz, a edindex broj koji se uvecava za jedan svaki put
x[1]
x[2]....
stvar je bila jer brojac treba da se krece do strtoint(edindex.text)-1 , jer ako ide do bez -1, onda zadnji racuna kao nulu.
imam samo jos jedno pitanje, jer moze da se koristi funkcija mod sa realnim brojevima.
Meni ne moze nikako.....
|
|
|
|
|
|
|
Poslao: 22 Feb 2007 21:58
|
offline
- beli0135
- Executor
- Pridružio: 03 Jan 2005
- Poruke: 2990
- Gde živiš: Beograd
|
nikom ne moze...
koristi FRAC...
da bi dobio MOD, napravi nesto ovako
function MyMOD(AValue:double):integer;
begin
result:= Trunc(Frac(AValue)*10);
end;
|
|
|
|
|
|
|
Poslao: 23 Feb 2007 01:28
|
offline
- NuLLCoDe
- Legendarni građanin
- Đuro Glumac
- dipl. ing. informatike
- Pridružio: 08 Feb 2004
- Poruke: 3640
- Gde živiš: ApAtIn
|
Sta ti je u Edit-u "edindex"? Duzina niza?
Verovatno kod minimuma probijes duzinu niza pa za naredne indexe koje nemas u nizu uzme 0 i to ti ispise.
|
|
|
|
|
|
|
Poslao: 23 Feb 2007 12:20
|
offline
- N1k0l4
- Prijatelj foruma
- Pridružio: 06 Sep 2005
- Poruke: 3800
- Gde živiš: Beograd
|
Reseni su svi problemi.
Hvala.
@NuLLCoDe
Jeste u tome problem.napisao sam u prethodnom postu, samo nisi video.
|
|
|
|
|
|
|
Poslao: 23 Feb 2007 13:41
|
offline
- NuLLCoDe
- Legendarni građanin
- Đuro Glumac
- dipl. ing. informatike
- Pridružio: 08 Feb 2004
- Poruke: 3640
- Gde živiš: ApAtIn
|
Ups, sorry. Sad videh, taj deo sam preskocio.
|
|
|
|
|
|
