|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
03.05.2014, 19:02 | #1 |
Форумчанин
Регистрация: 25.02.2014
Сообщений: 366
|
сложить число из edit1+edit1, потом удалить последние 3 символа (Поиск ошибки)
Нужно сложить число из edit1+edit1, потом удалить последние 3 символа зашифровать в md5 и сохранить в файл.
Код:
|
03.05.2014, 19:11 | #2 |
Форумчанин
Регистрация: 06.08.2009
Сообщений: 144
|
Судя по скриншоту, выходит число больше чем 2147483647. Наверное это и причина. Ибо больше integer вместить не может.
Если надо 4 байтовое число - используй Cardinal или лучше NativeUINT. Если не важно количество байт - int64. NativeUINT кстати автоматически при 64битной компиляции станет 8 байтным. |
03.05.2014, 19:25 | #3 |
Форумчанин
Регистрация: 25.02.2014
Сообщений: 366
|
А как тут отнять последние 3 символа от SerialNum
Код:
|
03.05.2014, 19:40 | #4 |
Форумчанин
Регистрация: 13.01.2010
Сообщений: 121
|
А как тут отнять последние 3 символа от SerialNum
var SerialNum:Dword; begin keys:=(IntToStr(SerialNum+SerialNum )); keys:=copy(keys,0,length(keys)-3) |
03.05.2014, 19:55 | #5 |
Форумчанин
Регистрация: 25.02.2014
Сообщений: 366
|
мне сначало надо отнять от SerialNum 3 последних символа, а потом только сложить.
|
04.05.2014, 01:03 | #6 |
МегаМодератор
СуперМодератор
Регистрация: 09.11.2010
Сообщений: 7,291
|
Код:
Пишите язык программирования - это форум программистов, а не экстрасенсов. (<= это подпись )
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Удалить Edit1 при нажимание на button | alman12 | Общие вопросы Delphi | 11 | 15.03.2014 19:31 |
[Делфи]Как удалить последний символ в edit1.text? | zotox | Помощь студентам | 3 | 05.08.2009 12:05 |
Копирование данных с Edit1 в Edit1 | Girl | Общие вопросы Delphi | 1 | 02.06.2009 09:19 |
Выдача ошибки при вводе 2 нулей в Edit1..Edit5 | prikolist | Общие вопросы C/C++ | 5 | 11.04.2009 22:44 |
Поиск символа в Edit1.text | Alar | Компоненты Delphi | 0 | 29.10.2006 19:02 |