Форум по Delphi программированию

Delphi Sources



Вернуться   Форум по Delphi программированию > Все о Delphi > [ "Начинающим" ]
Ник
Пароль
Регистрация <<         Правила форума         >> FAQ Пользователи Календарь Поиск Сообщения за сегодня Все разделы прочитаны

Закрытая тема
 
Опции темы Поиск в этой теме Опции просмотра
  #1  
Старый 11.06.2015, 14:10
Stanei Stanei вне форума
Новичок
 
Регистрация: 21.05.2015
Сообщения: 55
Версия Delphi: Rad Studio 10
Репутация: 10
По умолчанию парсинг и условие

Добрый день, снова нужна ваша помощь)
Вот я спарсил данные с сайта и мне нужно задать условие, если то, что спарсилось больше 200, то выполняется код.

Пытался так:
Код:
site:=idhttp1.Get('site');
s:=pars('от',site,'до');
if s>200 then //тут ошибка
begin
...
end;
но этот мусор не работает, пробовал добавить переменную, и данные присвоить переменой, а потом по ней делать условие

Код:
site:=idhttp1.Get('site');
s:=pars('от',site,'до');
d:=s; //тут ошибка
if d>200 then
begin
...
end;

но у эта чепуха не прокатила. Уже не знаю что придумать, знания очень скудные( погуглил, только про парсинг и переменные пишут, то что надо, так и не смог найти
Заранее спасибо)
  #2  
Старый 11.06.2015, 15:17
ganster0076 ganster0076 вне форума
Прохожий
 
Регистрация: 29.07.2014
Сообщения: 5
Версия Delphi: Delphi XE3
Репутация: 10
По умолчанию

Если есть memo, то лучше просчитывать кол-во строк в нем, и если их 200, то начало нового процесса. П.С. привел самый простой пример...
  #3  
Старый 11.06.2015, 15:27
Stanei Stanei вне форума
Новичок
 
Регистрация: 21.05.2015
Сообщения: 55
Версия Delphi: Rad Studio 10
Репутация: 10
По умолчанию

что то не дошло до меня, что мне можно с этим сделать? Мне бы желательно без выводов на форму.
К примеру, интернет магазин. Прога заходит на страницу, парсит цену, если цена у товара больше 200р, то добавляет в корзину. (ну это так, с потолка пример).

Хотя, ты мне другую идею подсказал, пойду попробую, если прокатит, то отпишусь
  #4  
Старый 12.06.2015, 15:34
Аватар для Страдалецъ
Страдалецъ Страдалецъ вне форума
Гуру
 
Регистрация: 09.03.2009
Адрес: На курорте, из окна вижу теплое Баренцево море. Бррр.
Сообщения: 4,721
Репутация: 52347
По умолчанию

Я так понял, больше 200 - это в смысле в site больше 200 строк?
Тогда лучше так:
Код:
var 
 site: TStringList;
begin
 site := TStringList.Create;
 site.text:=idhttp1.Get('site');
 if site.count > 200 then ShowMessage('> 200');
__________________
Жизнь такова какова она есть и больше никакова.
Помогаю за спасибо.
  #5  
Старый 13.08.2015, 16:08
Аватар для savage911
savage911 savage911 вне форума
Прохожий
 
Регистрация: 11.08.2015
Адрес: Санкт-Петербург
Сообщения: 11
Версия Delphi: XE2 - XE5
Репутация: 10
По умолчанию

Автор темы, а у тебя S какого типа переменная? Не строковая часом? По уму с 200 ты число должен сравнивать.
  #6  
Старый 13.08.2015, 18:25
Аватар для M.A.D.M.A.N.
M.A.D.M.A.N. M.A.D.M.A.N. вне форума
Sir Richard Abramson
 
Регистрация: 05.04.2008
Сообщения: 5,505
Версия Delphi: XE10
Репутация: выкл
По умолчанию

Цитата:
Сообщение от savage911
Автор темы, а у тебя S какого типа переменная? Не строковая часом? По уму с 200 ты число должен сравнивать.
Да ты запарил флеймить.
__________________
— Как тебя понимать?
— Понимать меня не обязательно. Обязательно меня любить и кормить вовремя.


На Delphi, увы, больше не программирую.
Рекомендуемая литература по программированию
Закрытая тема


Delphi Sources

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск
Опции просмотра

Ваши права в разделе
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения

BB-коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.
Быстрый переход


Часовой пояс GMT +3, время: 18:54.


 

Сайт

Форум

FAQ

RSS лента

Прочее

 

Copyright © Форум "Delphi Sources" by BrokenByte Software, 2004-2023

ВКонтакте   Facebook   Twitter