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

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

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

Восстановить пароль
Повторная активизация e-mail

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

Закрытая тема
Ваша тема закрыта, почему это могло произойти? Возможно,
Нет наработок или кода, если нужно готовое решение - создайте тему в разделе Фриланс и оплатите работу.
Название темы включает слова - "Помогите", "Нужна помощь", "Срочно", "Пожалуйста".
Название темы слишком короткое или не отражает сути вашего вопроса.
Тема исчерпала себя, помните, один вопрос - одна тема
Прочитайте правила и заново правильно создайте тему.
 
Опции темы Поиск в этой теме
Старый 13.07.2012, 15:47   #1
danil123
Пользователь
 
Регистрация: 06.07.2012
Сообщений: 80
Лампочка Pos возвращает 0

Использую гет запрос, помещаю результат в мемо и использую pos для нахождения определенной подстроки.
Однако непонятно почему pos вовзращает 0, даже тогда, когда подстрока гарантированно есть
danil123 вне форума
Старый 13.07.2012, 16:00   #2
Serge_Bliznykov
Старожил
 
Регистрация: 09.01.2008
Сообщений: 26,229
По умолчанию

раз Pos вренул ноль, - значит, нет её.
(отличается регистр символов, или символы не в той кодировке, или ищете не в той строке и т.д. и т.п.)

выкладывайте демку проекта "с глюком" - посмотрим...
Serge_Bliznykov вне форума
Старый 13.07.2012, 16:04   #3
danil123
Пользователь
 
Регистрация: 06.07.2012
Сообщений: 80
По умолчанию

Код:
unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, IdBaseComponent, IdComponent, IdTCPConnection, IdTCPClient, IdHTTP,
  StdCtrls;

type
  TForm1 = class(TForm)
    Button1: TButton;
    IdHTTP1: TIdHTTP;
    Memo1: TMemo;
    procedure Button1Click(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
var a,b:integer;
s:string;
begin
a:=0;
b:=0;
memo1.text:=idhttp1.Get('http://www.gamer.ru/users/all');
a:=pos('{<a href="}/users/',memo1.Text);
b:=pos('" class="user_id_link">',memo1.Text);
//memo1.Text:=copy(memo1.Text,a+16,b-a-16);
memo1.Text:=inttostr(a);
end;

end.
У меня в мемо выводится 0, хотя это явно не так
danil123 вне форума
Старый 13.07.2012, 16:06   #4
Пепел Феникса
Старожил
 
Аватар для Пепел Феникса
 
Регистрация: 28.01.2009
Сообщений: 21,000
По умолчанию

нет там строки с фигурными скобками(да и в HTML не должно быть)
вы ничего не перепутали?
Хорошо поставленный вопрос это уже половина ответа. | Каков вопрос, таков ответ.
Программа делает то что написал программист, а не то что он хотел.
Функции/утилиты ждут в параметрах то что им надо, а не то что вы хотите.
Пепел Феникса вне форума
Старый 13.07.2012, 16:06   #5
danil123
Пользователь
 
Регистрация: 06.07.2012
Сообщений: 80
По умолчанию

сорри, действительно просто в pos не ту строку вводил)
danil123 вне форума
Закрытая тема


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



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
if not Pos Shouldercannon Общие вопросы Delphi 9 01.02.2012 15:48
Copy и pos Zloy_Doomer Общие вопросы Delphi 8 03.07.2011 06:13
Функция Pos возвращает 0 gufon Общие вопросы Delphi 16 14.03.2011 22:10
Запрос возвращает пустую таблицу, если один из подзаросов возвращает пустую таблицу ArtInt SQL, базы данных 9 12.05.2010 15:40