Keskustelu: Ohjelmointikysymykset: Pascal: Ongelma Delphissä...

Miten esim. Edit1:een saa laitettua koodin avulla desimaaliluvun? Kokonaisluvunhan saa vaikka koodilla

Edit1.Text := IntToStr(Muuttuujan_Nimi);

Mutta tuo ei toimi desimaalilukuun...

Purkkaviritelmällä ainakin.. ;)
Eli jotain vaikka... jos halutaan vaikka 2 desimaalia.
Kai Pascaalista löytyy Int-käsky? :p Ei ole kyllä oikein mitään tietoa kielestä mutta yritetään.. helpompiakin keinoja lienee on.. puhumattakaan paremmuudesta

a := 123.45;
b := a - Int(123.45);
b := b * 100;
Edit1.Text := IntToStr(Int(a)) + "." + IntToStr(Int(b));

Eli a on alkup. luku, b:hen otetaan desimaaliosa. b kerrotaan sadalla, eli jos b=0.45 siitä tulee 45 :)
Mainittakoon vielä loppuun että älä käytä tuota purkkaa.. lieneekö edes toimii.. ;)

Käytä komentoa FloatToStr elikkäs

Edit1.Text := FloatToStr(Muuttuujan_Nimi);