Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Начинающим";
Текущий архив: 2007.07.29;
Скачать: [xml.tar.bz2];

Вниз

64bit HEX преобразовать в DEC строку   Найти похожие ветки 

 
POP   (2007-07-05 16:57) [0]

Как сделать сабж?

Например число $FFFFFFFFFFFFFFFF, нужно преобразовать его в DEC и вывести в виде строки - 18446744073709551615

В int64 не влазит, да и функций таких нет, чтобы в строку преобразовать.


 
Германн ©   (2007-07-05 17:01) [1]


> В int64 не влазит, да и функций таких нет, чтобы в строку
> преобразовать.
>

Влазит
IntToStr


 
POP   (2007-07-05 17:49) [2]

Не влазит, int64  это знаковая переменная


 
Инс ©   (2007-07-05 17:54) [3]

Библиотека FGInt пойдет? Скачать хотя бы здесь:
http://www.delphikingdom.com/zip/FGInt.zip


 
POP   (2007-07-05 18:28) [4]

Мне кажется пихать навороченную библиотеку на все случаи жизни в мою прогу ради того, чтобы один раз преобразовать число не есть гуд.

У меня есть код для обратного преобразования, большое DEC число в HEX.


 
Инс ©   (2007-07-05 18:46) [5]


> Мне кажется пихать навороченную библиотеку на все случаи
> жизни в мою прогу ради того, чтобы один раз преобразовать
> число не есть гуд.


Не такая уж и навороченная, но можно и не пихать. Можно просто выдернуть необходимое.


 
POP   (2007-07-05 19:30) [6]

Я посмотрел, это библиотека для RSA вроде бы.

Ты сам ее юзал?

Как называется функция которая делает то что мне надо?


 
Инс ©   (2007-07-05 19:52) [7]


> Я посмотрел, это библиотека для RSA вроде бы.


В основном да, но именно модуль FGInt.pas практически к RSA не имеет никакого отношения. Это просто модуль для работы с гигантскими целыми.


> Как называется функция которая делает то что мне надо?

Держи:
uses FGInt;

function Convert(Str: String): String;
var
 I: TFGInt;
begin
 HexStringToFGInt(Str,I);
 FGIntToBase10String(I,Result);
end;

Пойдет?


 
POP   (2007-07-05 19:59) [8]

Где ты взял HexStringToFGInt ? Там нет такой функции.

А FGIntToBase10String есть.

Я буду только эти функции брать, придеться под себя переделать, без подключения всего модуля.


 
Инс ©   (2007-07-05 20:02) [9]

Не, ну ты даешь. У меня этот код скомпилировался и выдал на экране то, что ты хотел получить. Посмотри внимательно.


> Я буду только эти функции брать, придеться под себя переделать,
> без подключения всего модуля.


А смысл? Все равно в exe включится только то, что ты реально будешь использовать.


 
Инс ©   (2007-07-05 20:04) [10]

А, ясно, у меня другая версия этого модуля. Выслать на мыло?


 
POP   (2007-07-05 20:06) [11]

Хорошо, высылай на se_m@mail.ru


 
Инс ©   (2007-07-05 20:07) [12]

Проверяй...


 
POP   (2007-07-05 20:44) [13]

Спасибо.

Все скачал и поставил.. работает.

Да уж, оказалось проще весь модуль добавить, чем выуживать все процедуры и функции которые используются :)


 
Инс ©   (2007-07-05 20:48) [14]

Удалено модератором
Примечание: Обсуждение модерирования


 
POP   (2007-07-05 20:50) [15]

Слушай, дак ведь Delphi не компилирует код который не используется, так ведь?

То есть все что я не использую в мою программу не попадет?

Меня просто жаба душит стока мусора в своем софте держать.


 
Инс ©   (2007-07-05 21:05) [16]

Ты посмотри, куда синие точечки ставятся при сборке - то и линкуется. Вот здесь это обсуждалось, хорошо расписано:
http://www.delphikingdom.com/asp/answer.asp?IDAnswer=48630



Страницы: 1 вся ветка

Форум: "Начинающим";
Текущий архив: 2007.07.29;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.48 MB
Время: 0.042 c
15-1183108237
Skyle
2007-06-29 13:10
2007.07.29
DataSnap(Midas) и Turbo Delphi for Win32 Pro. Возможно ли?


6-1166551662
furyz
2006-12-19 21:07
2007.07.29
описание протокола IRC


6-1166812433
Sanek_sd
2006-12-22 21:33
2007.07.29
Помогите советом как отправить ListBox1.Items


2-1183463152
WASM
2007-07-03 15:45
2007.07.29
Как определить нажатые клавиши


15-1183459403
исследователь
2007-07-03 14:43
2007.07.29
Подскажите с покупкой





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский