Jednoducha kalkulacka – Delphi – Fórum – Programujte.com

Rozšířené hledání ›

Nejnovější témata ve fóru

17:02, Software Jak vytvořit crosscompiler pro nestandardní MCU/CPU

10:08, Vzdělání Proč se Češi neprosazují v IT? Kde je chyba?

20:06, Hardware 3.5inch ESP32-32E Display Module

21:47, Číslicová technika Vánoční kvíz pro české programátory

09:50, Offtopic Patent, který skončil jako přísně tajný v sejfu ministerst…

20:54, Inzerce Program pro zpracování dat z GPS přijímače

Stavba Laser Arény
Laser Game Brno

Jednoducha kalkulacka

Anonymní uživatel

~ Anonymní uživatel
~ 0 příspěvků

2. 3. 2009 #1

Chcem si spravit jednoduchu kalkulacku so vstupnym polickom a tlacitkom vyratat. ak si dam:



var i:integer

begin

i := 5+5

edit1.text := IntToStr(i);

end;

Tak mi to vypise "10"
Ale ja som to spravil takto:



i := StrToInt(edit1.text);

i := i;

edit1.text := IntToStr(i);

Ale nefunguje to a aj napriek tomu ze do policka zadam "5+5" vyhodi mi to chybu (ked uz program bezi).

Dufam ze ste ma pochopili :). Dakujem

Nahlásit jako SPAM

IP: 62.169.162.–

KIIV

~ Moderátor

+43

God of flame

2. 3. 2009 #2

jenze strtoint umi prevest pouze jednu hodnotu...
aby ti to zvladlo udelat 5+5 musis to zpracovat pomoci nejakeho parseru a vyhodnotit ...

Nahlásit jako SPAM

IP: 80.188.94.–

_{Program vždy dělá to co naprogramujete, ne to co chcete...}

o-lox0

Super člen

2. 3. 2009 #3

Predpokladam predne ze nechces parsovat 5+5 primo, tedy ze nechces udelat neco co ti prevede retezec
5*(7-9) na pocetni operace

Budes si muset dat tlacitko +,-,*,....

Po prvnim stisku "+" ulozis do globalni promenne g1:=strtoint(); a musis zadavat jen 5 (cislo!) do policka
zaroven smazes edit1.text:='';
ulozis si typ operace scitani (treba vyctovym typem)

Po stisku tlacitka jakehokoliv dalsiho tlacitka (treba "=") udelas operaci(soucet) g1 se strtoint(edit1.text) a vysledek vypises.

No a na rekurzivni prevod/vypocitani celeho vyrazu ti tu to vypisovat nebudu da se toho na internetu najit habadej(nebo se k tomu dokouses casem).
EDIT:vicemene jsem obslehl co psal KIIV.

Nahlásit jako SPAM

IP: 85.71.152.–

Anonymní uživatel

~ Anonymní uživatel
~ 0 příspěvků

2. 3. 2009 #4

OK dakujem, skusim s tym nieco spravit

Nahlásit jako SPAM

IP: 62.169.162.–

← Zpět na seznam vláken ← Zpět do Fóra