Question

Piszę obecnie program kalkulator w języku Pascal w programie Delphi6 i potrzebuję procedury, dzięki której obliczona liczba będzie konwertowana z liczby dziesiętnej na liczbę binarną lub szesnastkową, zaleznie od tego jaki radiobutton wciśnie uzytkownik.

Jeśli mam coś wrzucić dla ułatwienia to proszę pisać.

Answer 1

Case MojRadiobutton.itemIndex of

 -1: //nic nie zostało wybrane

  0: String := IntToHex(Integer, 6); //system heksadecymalny; 6 dla int, 8 dla int64 jeżeli dobrze pamiętam

  1: String := IntToBin(Integer, 32); //system binarny; 32 dla int, 64 dla int64

End;

 

(rzecz jasna nie będzie to działać dla liczb "z przecinkiem", ponieważ oba w/w systemy takich liczb oficjalnie nie obsługują).

 

PS: wypadałoby poobcinać pierwsze zera, ale to już zostawiam tobie do wykonania :) 

PS2:

Moja rada:

Jeżeli nie potrafisz samodzielnie wyszukiwać informacji w internecie oraz nie potrafisz korzystać z dokumentacji, to mierny będzie z ciebie programista.