![]() |
|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
![]() |
|
|
Опции темы | Поиск в этой теме |
![]() |
#1 |
Пользователь
Регистрация: 24.11.2008
Сообщений: 13
|
![]()
Задача такова - есть эдит(edit1), в который можно вписать 12 символов (цифр), мне необходимо что бы при сложении первого и второго значение = последнему. т.е. - 123456789103, как видим 1+2=3, если все ок выводим сообщение "Вася выдыхай, вася че ты ржешь
![]() |
![]() |
![]() |
![]() |
#2 |
Высокая репутация
СуперМодератор
Регистрация: 27.07.2008
Сообщений: 15,591
|
![]()
Edit1.Text[1] - 1-й символ
Edit1.Text[2] - 2-й символ Edit1.Text[Length(Edit1.Text)] - последний символ StrToInt - перевод из строки в число E-Mail: arigato.freelance@gmail.com
|
![]() |
![]() |
![]() |
#3 | |
Старожил
Регистрация: 29.09.2009
Сообщений: 9,713
|
![]() Цитата:
Разработки и научно-технические публикации :: Видеоблог :: Твиттер
Radar systems engineer & Software developer of industrial automation |
|
![]() |
![]() |
![]() |
#4 |
Старожил
Регистрация: 09.01.2008
Сообщений: 26,229
|
![]() Код:
тогда нужно проверять последние две цифры StrToInt(Copy(s,Length(s)-1,2)) Последний раз редактировалось Serge_Bliznykov; 21.10.2009 в 11:57. |
![]() |
![]() |
![]() |
#5 |
Старожил
Регистрация: 05.06.2008
Сообщений: 4,206
|
![]()
Сложить первый и второй символ в Edit-е можно так:
Код:
Не стоит смеяться над человеком делающим шаг назад, возможно он делает разбег.
|
![]() |
![]() |
![]() |
#6 | |
Пользователь
Регистрация: 24.11.2008
Сообщений: 13
|
![]() Цитата:
|
|
![]() |
![]() |
![]() |
#7 |
Высокая репутация
СуперМодератор
Регистрация: 27.07.2008
Сообщений: 15,591
|
![]()
CyberDemon324
А кто будет в число переводить? У вас не сложение а конкатенация строк. E-Mail: arigato.freelance@gmail.com
|
![]() |
![]() |
![]() |
#8 | |
Пользователь
Регистрация: 24.11.2008
Сообщений: 13
|
![]() Цитата:
|
|
![]() |
![]() |
![]() |
#9 | |
Высокая репутация
СуперМодератор
Регистрация: 27.07.2008
Сообщений: 15,591
|
![]() Цитата:
E-Mail: arigato.freelance@gmail.com
|
|
![]() |
![]() |
![]() |
#10 | |
Пользователь
Регистрация: 24.11.2008
Сообщений: 13
|
![]() Цитата:
']' expected but 'then' found |
|
![]() |
![]() |
![]() |
|
![]() |
||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Первый символ в Edit-e | artemavd | Общие вопросы Delphi | 2 | 24.09.2009 21:35 |
Помогите решить 2 задачки срочно надо а то меня повешают на практике мне надо к 2 июня!!! | серега222 | Паскаль, Turbo Pascal, PascalABC.NET | 0 | 27.05.2009 17:46 |
Excel (работа со вторым листом) | AndreyF | Общие вопросы Delphi | 1 | 23.04.2009 08:16 |
Если введён первый нуль в Edit,и не стоит запятая после него, выдать ошибку | prikolist | Общие вопросы C/C++ | 10 | 28.03.2009 16:51 |