Перевод чисел в различные С.С. - Общие вопросы Delphi

Omedus · 05.11.2007, 12:43

Решил написать программу, которая будет переводить числа в "стандартные" системы счисление: двоичную, восьмеричную, десятичную и шестнадцатиричную. Подскажите пожалуйста: Как это лучше устроить? Какие объекты использовать? И как организовать перевод в 16иричную с.с. и из неё, ведь там идут буквы?

Stilet · 05.11.2007, 12:55

Цитата:

перевод в 16иричную с.с.

функцией IntToHex

Omedus · 05.11.2007, 13:27

Цитата:

Сообщение от Stilet

функцией IntToHex

Ошибка...(

Код:

Unit1.pas(362): There is no overloaded version of 'IntToHex' that can be called with these arguments

Stilet · 05.11.2007, 13:35

А код привести не хочешь?

Omedus · 05.11.2007, 13:46

Код:

var
k:real;

procedure TForm1.Button31Click(Sender: TObject);
begin
k:=Int(StrToFloat(Edit1.Text));
k:=IntToHex(k); //Ошибка высвечивается здесь
Edit1.Text:=FloatToStr(k);
end;

_Dmitry · 05.11.2007, 14:06

function IntToHex(Value: Integer; Digits: Integer): string;
используй help, там есть и пример использования

05.11.2007, 12:43	#1
Omedus Пользователь Регистрация: 01.11.2007 Сообщений: 27	Перевод чисел в различные С.С. Решил написать программу, которая будет переводить числа в "стандартные" системы счисление: двоичную, восьмеричную, десятичную и шестнадцатиричную. Подскажите пожалуйста: Как это лучше устроить? Какие объекты использовать? И как организовать перевод в 16иричную с.с. и из неё, ведь там идут буквы? *Генерация случайных чисел — слишком важное дело, чтобы оставлять её на волю случая.* Scientia potentia est

05.11.2007, 13:35	#4
Stilet Белик Виталий :) Старожил Регистрация: 23.07.2007 Сообщений: 57,097	А код привести не хочешь? I'm learning to live...

05.11.2007, 13:46	#5
Omedus Пользователь Регистрация: 01.11.2007 Сообщений: 27	Код: `var k:real; procedure TForm1.Button31Click(Sender: TObject); begin k:=Int(StrToFloat(Edit1.Text)); k:=IntToHex(k); //Ошибка высвечивается здесь Edit1.Text:=FloatToStr(k); end;` *Генерация случайных чисел — слишком важное дело, чтобы оставлять её на волю случая.* Scientia potentia est

Опции темы	Поиск в этой теме
Версия для печати Отправить по электронной почте	Поиск в этой теме: Расширенный поиск

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
Перевод целых чисел из одной системы счисления в другую	=LeonZone=	Помощь студентам	19	12.12.2010 16:18
Различные способы подключения к Sybase	hyperworker	Безопасность, Шифрование	0	05.04.2008 15:24
Перевод чисел в строку	RedWolf	Помощь студентам	6	17.01.2008 00:09
Задача: перевод целых чисел в римские	n0x	Паскаль, Turbo Pascal, PascalABC.NET	4	12.12.2006 19:52

05.11.2007, 14:06	#6
_Dmitry Участник клуба Регистрация: 02.09.2007 Сообщений: 1,193	function IntToHex(Value: Integer; Digits: Integer): string; используй help, там есть и пример использования