eli tein raha muuntimen joka muuttaa eurot frangeiksi. Nyt olis sellanen kysymys et ku pitäis muuttaa tota sen verran et se muuttais eurot dollareiks, et mitenkäs se onnistuu? Kun frangin lyhenne on fr niin mikäs on dollarin? Tässä mun muuntimen koodit.
procedure TForm1.EuroButtonClick(Sender: TObject);
var
Euro, Fr: real;
S1, S2: string;
begin
CurrLabel.Caption := 'Euro';
Euro := StrToFloat(InputEdit.Text);
Fr := Euro * 40.3399;
S1 := FormatFloat('0.00', Euro);
S2 := FormatFloat('0.00', Fr);
EuroLabel.Caption := S1;
BEFLabel.Caption := S2;
end;
procedure TForm1.BEFButtonClick(Sender: TObject);
var
Euro, Fr: real;
S1, S2: string;
begin
CurrLabel.Caption := 'BEF';
Fr := StrToFloat(InputEdit.Text);
Euro := Fr / 40.3399;
S1 := FormatFloat('0.00', Euro);
S2 := FormatFloat('0.00', Fr);
EuroLabel.Caption := S1;
BEFLabel.Caption := S2
end;
procedure TForm1.Button1Click(Sender: TObject);
begin
Close;
end;
initialization
{$I unit1.lrs}
end.
Mitä kohtii pitää muuttaa et se muuttaa noi dollareiks? Ajattelin että voisin tehdä uuden rahamuuntimen kokonaan jos joku neuvois noitte dollareitten kanssa.
Raha muunnin............
kysymys..............
1
5558
Vastaukset
- mitään.....
sain toimimaan ovin neuvoin.
Ketjusta on poistettu 0 sääntöjenvastaista viestiä.
Luetuimmat keskustelut
YLE Äänekosken kaupunginjohtaja saa ankaraa arvostelua
Kaupungin johtaja saa ankaraa kritiikkiä äkkiväärästä henkilöstöjohtamisestaan. Uusin häirintäilmoitus päivätty 15 kesä891839Euroopan lämpöennätys, 48,8, astetta, on mitattu Italian Sisiliassa
Joko hitaampikin ymmärtää. Se on aivan liikaa. Ilmastonmuutos on totta Euroopassakin.2771703Asiakas iski kaupassa varastelua tehneen kanveesiin.
https://www.iltalehti.fi/kotimaa/a/33a85463-e4d5-45ed-8014-db51fe8079ec Oikein. Näin sitä pitää. Kyllä kaupoissa valtava2921470Martina lähdössä Ibizalle
Eikä Eskokaan tiennyt matkasta. Nyt ollaan jännän äärellä.1751379- 51957
- 56957
Jos ei tiedä mitä toisesta haluaa
Älä missään nimessä anna mitään merkkejä kiinnostuksesta. Ole haluamatta mitään. Täytyy ajatella toistakin. Ei kukaan em70937- 66914
Miksi mies tuntee näin?
Eli olen mies ja ihastuin naiseen. Tykkään hänestä ja koskaan hän ei ole ollut minulle ilkeä. Silti ajoittain tunnen kui40901Se nainen näyttää hyvältä vaikka painaisi 150kg
parempi vaan jos on vähän muhkeammassa kunnossa 🤤52888