Forum » Programiranje » Kalkulator v Pascalu
Kalkulator v Pascalu

majstore123 ::
V Lazarusu oz. prog. jeziku Pascal sem naredil kalkulator, ki zna deliti, množiti, seštevati in odštevati.
Sedaj pa bi z gradnikom RadioButton naredil, da lahko izbereš ali kalkulator računa v decimalno ali binarno.
Sam nimam idej kako bi to naredil, oz. ne vem kakšna bi morala biti koda.
Če kdo karkoli ve, prosim če napiše.
Evo še slika: http://shrani.najdi.si/?1Q/Zh/3cyv5dx4/...
Hvala
Sedaj pa bi z gradnikom RadioButton naredil, da lahko izbereš ali kalkulator računa v decimalno ali binarno.
Sam nimam idej kako bi to naredil, oz. ne vem kakšna bi morala biti koda.
Če kdo karkoli ve, prosim če napiše.
Evo še slika: http://shrani.najdi.si/?1Q/Zh/3cyv5dx4/...
Hvala
- spremenilo: majstore123 ()

win64 ::
Logika ostane ista, samo prikaz in vnos števil spremeniš.
Za to pa potrebuješ dve funkciji:
ena, ki ti bo iz decimalnega števila naredila binarno
ter druga, ki ti bo iz binarnega naredila decimalno.
Nekako tako(funkciji bin2int,int2bin je potrebno napisati):
Za to pa potrebuješ dve funkciji:
ena, ki ti bo iz decimalnega števila naredila binarno
ter druga, ki ti bo iz binarnega naredila decimalno.
Nekako tako(funkciji bin2int,int2bin je potrebno napisati):
If RadioButton1.Value = 1 Then x1:=bin2int(Edit1.text) x2:=bin2int(Edit2.text) y:=x1*x2 label2.caption=int2bin(y) else x1:=str2bin(Edit1.text) x2:=str2bin(Edit2.text) label2.caption=float2str(y) end if
Vredno ogleda ...
Tema | Ogledi | Zadnje sporočilo | |
---|---|---|---|
Tema | Ogledi | Zadnje sporočilo | |
» | C# Top tutorialiOddelek: Programiranje | 2611 (1874) | darkkk |
» | [C#] Operacija IN in ALI med dvema int številomaOddelek: Programiranje | 1201 (1014) | LeQuack |
» | [C#] Spreminjanje fahrenheitov v celzijeOddelek: Programiranje | 1392 (1247) | blackwing |
» | java net beans pomočOddelek: Programiranje | 1644 (1532) | i33a |
» | C#, Dodajanje podatkov v Arraylist z GumbomOddelek: Programiranje | 2301 (2140) | Beezgetz |