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
5568
Vastaukset
- mitään.....
sain toimimaan ovin neuvoin.
Ketjusta on poistettu 0 sääntöjenvastaista viestiä.
Luetuimmat keskustelut
Riikka Purra haluaa muuttaa
maahanmuuttopolitiikkaa. Me suomalaiset halutaan, että Riikka Purra muuttaa pois suomesta eikä tuu ikinä takas....2119795Onnea Riikka! Työttömyys aste on nyt täysi kymppi!
🎯 💪 Kiitoksia Riikalle ansiokkaasta työstä Suomen kansantalouden tuhoamisessa. V.Putin suljetun rajan tuolla puolen504577Hyvällä tuurilla Suomen väkiluku nousee 7 miljoonaan
Vuoteen 2050 mennessä, mikäli onnistumme maahanmuuttopolitiikassa hyvin. Näin analysoi väestötieteen tohori Hiilamo. ht1304080Riikka jytkytti työttömyyden uuteen ennätykseen!
Erinomaista työtä jälleen kerran irvistelevältä saksiniekalta. ”Yhtä korkeaa työttömyysastetta ei löydy työvoimatutkimu1143959- 2103733
Päivän Riikka: Valmet Automotive aloittaa jättimäiset muutosneuvottelut
😭😭😭😭😭😭😭 Tämäkin vielä, Brutukseni. Että ei olisi Suomen historian pahimmat työttömyysluvut riittäneet, niin Riik433068Aamun Riikka: sakset tiputtavat 31 000 lasta köyhyysrajan alle
✂️ STM:n tuoreen arvion mukaan Riikan leikkaukset pudottavat peräti 31 000 lasta köyhyysrajan alle, kun aikaisempi THL171751Rakastan sua mutten uskalla jutella sulle
Kumpa sä näkisit tämän viestin❤️ Kaipaan sua vaikka oot välillä ihan lähellä mutten saa sanottua sulle enää mitään. Ujos1571613Mihin rakastuin sinussa?
Rakastuin siihen, miten katsoit minua Rakastuin siihen, miten hymyilit minulle Rakastuin siihen, kuinka hyväksi sait its971561- 1151356