delphi ile ilgili sorum var??

H

huseyin_58

Üye

Mesajlar

16

• 5 Ocak 2011

• #1

şimdi ben proje ödevi olarak kantin hesap programı yapıorum.
ben listbox içerisine yazdığım kusurlu fiyatları(0.50 0.75 ... ) toplatamıyorum yardımcı olursanız sevinirim

 

the_korsan

Site Admin

Yönetici

Mesajlar

3,002

• 5 Ocak 2011

• #2

listbox itemlerini sırayla saydırıp, x=x+item değeri gibi komut mutlaka kullanmışsınızdır.

Değişken tanımlamalarınızda yada çevirmeleriniz de hata olabilir. Görmeden yorum yapmak zor.

 

opian

Seçkin Üye

Seçkin Üye

Mesajlar

340

• 5 Ocak 2011

• #3

procedure TForm1.Button1Click(Sender: TObject);
var sum : extended;
i : integer;
begin
sum := 0;
for i := 0 to listbox1.Items.Count - 1 do
sum := sum + strToFloat(listbox1.items);
edit1.text := floatToStrF(sum, ffNumber, 20, 3)
end;

seklinde bir kullanim var nette buldugum. delphi olmadigi ixin deneyemeden gonderiyorum. 20 tamsayi kismindaki basamak sayisini, 3 ise ondalikli kismi ifade ediyor. ffnumber ise sanirim float turu degiskenlerin goruntulenme seceneklerinden bir tanesi.
http://www.delphibasics.co.uk/RTL.asp?Name=TFloatFormat

 

H

huseyin_58

Üye

Mesajlar

16

• 8 Ocak 2011

• #4

çokkkkk tşkler