В чем загвоства, C++

[Sergius X]

Прога

void __fastcall TForm1::Button1Click(TObject *Sender)
{
   if (OpenDialog1->Execute())
   {
      LoadPdfFile(OpenDialog1->FileName);
   }
}
//---------------------------------------------------------------------------
void __fastcall TForm1::LoadPdfFile(AnsiString filename)
{
   TStringList *pdf = new TStringList;
   AnsiString pdf_file = filename;

   pdf->LoadFromFile(pdf_file);
   int i, j;
   for (i; i<pdf->Text.Length(); i++)
   {
    if (Text.Pos("Page"))
    {
    j++;
    }
   }
   MessageDlg("Документ содержит " + IntToStr(j) + " страниц", mtInformation, TMsgDlgButtons() << mbOK, 0);

   delete pdf;
}

То есть я выбираю pdf файл, и пытаюсь найти там слово Page, но он что то не ищет, результат выводит 0

[Sparkman]

Откройте pdf файл с помощью блокнота и найдите там слово Page

[Sergius X]

что вы имели в виду? Мне нужно посчитать сколько страниц содержит в себе выбранный файл pdf. Начало страницы начинается с /Page

[Sparkman]

Я открыл pdf файл с помощью блокнота и увидел это...

ўЂі5«п±Yќ§чІ|©нк
Р’EЉ6w!UFI=«*оКЫY1N— jрBу‘э+JVжј¶т3<6ЦЙpн+Ѓ9@ЯЇ>µ¦тЪk<±v 9гЁП8ч*Kя

Таким же образом открывает файл pdf ваш алгоритм и видит тоже самое.
Используйте акробатовские библиотеки для открытия и чтения pdf файлов.

upd: хотя действительно есть слова Page, Pages... Попробуйте найти /Count, справа от него количество страниц

Pos - ищет первую попавшуюся строку в тексте.

[Sergius X]

То что вы скопировали, это всего лишь навсего текст. Просмотрите весь файл и вы увидите допустим это:

3 0 obj
<< 
   /Type /Page
   /Parent 2 0 R
   /Resources << 
   /ProcSet [/PDF /Text ]
   /Font << 
   /F1 6 0 R
   /F2 9 0 R
>>
>>
   /MediaBox [0 0 595 842]
   /Contents 4 0 R
>>
endobj

Это описание объекта содержащего страницу, вот я и хочу посчитать сколько страниц содежит файл

Count не подходит, так как он не везде указан. А страница начинается именно с /Page. Но есть еще проблемка в том что по идее он будет учитывать такие слова как Pages, PageMode, а мне это надо как то обойти...

[Sergius X]

Ну я сделал так:

void __fastcall TForm1::Button1Click(TObject *Sender)
{
   if (OpenDialog1->Execute())
   {
      LoadPdfFile(OpenDialog1->FileName);
      CreateXMLFile(OpenDialog1->FileName);
   }
}
//---------------------------------------------------------------------------
void __fastcall TForm1::LoadPdfFile(AnsiString filename)
{
   TStringList *pdf = new TStringList;
   AnsiString pdf_file = filename;

   pdf->LoadFromFile(pdf_file);
   int i, j;

   for (i; i<pdf->Count; i++)
   {
    if (pdf->Strings[i].Pos("Page"))
    {
    j++;
    }
   }
   MessageDlg("Документ содержит " + IntToStr(j) + " страниц", mtInformation, TMsgDlgButtons() << mbOK, 0);

   delete pdf;
}

Теперь надо как то избавиться от проблемы того что он считает не только слово "Page", но и похожие "PageMode", "Pages"

[Sparkman]

проверяйте символ за словом "Page", если там не "s" или "M", то увеличить счетчик.
Pos возвращает индекс первой буквы искомой строки, а не логическое значение.

[Sergius X]

Сообщение от Sparkman

проверяйте символ

А не могли бы это кодом набросать?))

[Sparkman]

Сообщение от Sergius X

А не могли бы это кодом набросать?))

Примерно так:

   for (i; i<pdf->Count; i++)
   {
    if (pdf->Strings[i][pdf->Strings[i].Pos("Page")+4] !="s")&&(pdf->Strings[i][pdf->Strings[i].Pos("Page")+4] !="M")
    {
    j++;
    }
   }

[Sergius X]

Да и встречаются не только слова где следующая буква s или M, но и другие могут быть, которые неизвестны
Лучше наверное как нибудь сделать

if (pdf->Strings[i][pdf->Strings[i].Pos("Page")+4] ="")

Только тогда выдает вот это:
[C++ Error] Unit1.cpp(37): E2034 Cannot convert 'char *' to 'char'
[C++ Warning] Unit1.cpp(37): W8060 Possibly incorrect assignment

А на ваш код выдает
[C++ Error] Unit1.cpp(37): E2034 Cannot convert 'char' to 'char *'
[C++ Error] Unit1.cpp(37): E2188 Expression syntax
[C++ Error] Unit1.cpp(42): E2379 Statement missing ;