Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Общие вопросы Delphi
Регистрация

Восстановить пароль

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 15.05.2011, 15:32   #1
gufon
Форумчанин
 
Регистрация: 21.12.2010
Сообщений: 224
По умолчанию переработка ип в число

edit1.Text:= idhttp1.Get('http://napricole.dax.ru/ip.php');
label1.Caption:= StringReplace(edit1.Text,'.','+',[rfReplaceAll, rfIgnoreCase]);
label1.Caption:= strtoint(label1.Caption);
хочу сложить все числа ип адреса.
Но
Код:
Incompatible types: 'String' and 'Integer'
на
Код:
 label1.Caption:= strtoint(label1.Caption);
gufon вне форума Ответить с цитированием
Старый 15.05.2011, 15:37   #2
Valio
Сливочное масло
Участник клуба
 
Аватар для Valio
 
Регистрация: 01.01.2011
Сообщений: 1,149
По умолчанию

Значит в label1.Caption явное "не число".

Поставь брекпоинт и погляди что присваивается.

адд: ступил.

label1.Caption:= strtoint(label1.Caption); - это бред. Caption это String. Надо писать тогда

label1.Caption:= label1.Caption; - но это ещё бредовей )

адд: тебе надо руками разделить АПИ на числа и вручную сложить.
Сливочное масло Valio - компиляция как по маслу

Последний раз редактировалось Valio; 15.05.2011 в 15:41.
Valio вне форума Ответить с цитированием
Старый 16.05.2011, 11:45   #3
evg_m
Старожил
 
Регистрация: 20.04.2008
Сообщений: 5,543
По умолчанию

label1.Caption:= StringReplace(edit1.Text,'.','+',[rfReplaceAll, rfIgnoreCase]);
Delphi не является интерпретирующим языком.
программа без дополнительный усилий с о стороны программиста) не может выполнять никакие математические действия записанные в строке
label1.Caption:= StringReplace(edit1.Text,'.','+',[rfReplaceAll, rfIgnoreCase]);
это будет строка 198+132+1+1 и для получения его значения надо будет использовать сторонний (можно собственный) парсер арифметических выражений.
программа — запись алгоритма на языке понятном транслятору
evg_m вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Написать программу, которая за меньшее число ходов отгадывает загаданное число gomz007 Помощь студентам 16 08.11.2009 12:57
Вывести число, предшествующее первому отрицательному и число, следующее за последним отрицательным Rid Паскаль, Turbo Pascal, PascalABC.NET 4 22.12.2008 16:50
Переработка Diablo Hellfire Mordor_XP Gamedev - cоздание игр: Unity, OpenGL, DirectX 1 03.09.2008 19:22
Найти и вывести все слова,у котоpых число гласных букв пpевышает число согласных. Briz Помощь студентам 2 11.05.2008 00:56
Ввести число N и определить делится ли оно без остатка на число M (VBA) Ivanich Microsoft Office Excel 7 24.04.2008 19:43