GARANTIR DESCONTO

Fórum Localizando string em pdf. #274221

28/03/2005

0

Gostaria de saber como eu posso localizar uma string em um arquivo PDF . Por exemplo, existe um arquivo pdf aberto, sendo que ele é muito grande, gostaria de fazer uma busca dentro deste pdf, colocaria um edit com a palavra a ser buscada e um botao para localizar esta string dentro do pdf, como faria isso ?????????


Paulovitor

Paulovitor

Responder

Posts

28/03/2005

Motta

use um TFindDialog (dialogs), o exemplo do help (método OnFind) é claro !!


Responder

Gostei + 0

28/03/2005

Paulovitor

use um TFindDialog (dialogs), o exemplo do help (método OnFind) é claro !!


cara não entendi o que você kiss dizer será q poderia colocar a linha de comando como exemplo.


Responder

Gostei + 0

28/03/2005

Motta

This example requires a TRichEdit, a TButton, and a TFindDialog.
Clicking the button click will display a Find Dialog to the right of the edit control.  Filling in the "Find what" text and pressing the Find Next button will select the first matching string in the Rich Edit control that follows the previous selection.

procedure TForm1.Button1Click(Sender: TObject);

begin
  FindDialog1.Position := Point(RichEdit1.Left + RichEdit1.Width, RichEdit1.Top);
  FindDialog1.Execute;
end;

procedure TForm1.FindDialog1Find(Sender: TObject);
var
  FoundAt: LongInt;
  StartPos, ToEnd: Integer;
begin
  with RichEdit1 do
  begin
    { begin the search after the current selection if there is one }
    { otherwise, begin at the start of the text }
    if SelLength <> 0 then

      StartPos := SelStart + SelLength;
    else

      StartPos := 0;

    { ToEnd is the length from StartPos to the end of the text in the rich edit control }

    ToEnd := Length(Text) - StartPos;

    FoundAt := FindText(FindDialog1.FindText, StartPos, ToEnd, [stMatchCase]);
    if FoundAt <> -1 then
    begin
      SetFocus;
      SelStart := FoundAt;
      SelLength := Length(FindDialog1.FindText);
    end;
  end;
end;


fonte help do D5


Responder

Gostei + 0

28/03/2005

Motta

Putz !! Esquece , confudi pdf com rtf !!!


Responder

Gostei + 0

29/03/2005

Paulovitor

Putz !! Esquece , confudi pdf com rtf !!!


Alguem sabe como resolver este meu problema ???


Responder

Gostei + 0

29/03/2005

Motta

Tentando de redimir .... :)

Localizei no Google

http://www.ozgrid.com/Services/acrobat-text-convert.htm


Responder

Gostei + 0

29/03/2005

Paulovitor

Tentando de redimir .... :) Localizei no Google http://www.ozgrid.com/Services/acrobat-text-convert.htm


Trankilo veio, mas esse link tem não, po essa parada varias pessoas procuraram saber aqui no forum e nenhuma teve sucesso ate agora, mas acredito que tenha como fazer, só não sei como !!!


Responder

Gostei + 0

29/03/2005

Marcelo Saviski

vc está abrindo esse PDF dentro do Delphi?


Responder

Gostei + 0

29/03/2005

Gandalf.nho

Estava dando uma pesquisada e aparentemente isso só é possível usando-se a SDK do Acrobat, que só acompanha a versão completa do produto e não o Acrobat Reader.


Responder

Gostei + 0

30/03/2005

Paulovitor

[quote:de7028b61b=´Marcelo Saviski´]vc está abrindo esse PDF dentro do Delphi?[/quote:de7028b61b]

sim sim eu estou abrindo o delphi dentro da aplicação...


Responder

Gostei + 0

30/03/2005

Paulovitor

Estava dando uma pesquisada e aparentemente isso só é possível usando-se a SDK do Acrobat, que só acompanha a versão completa do produto e não o Acrobat Reader.


a ta vou da uma olhada , mas com isso perco na rapidez do meu sistema , pq ele teria que abrir a aplicação e quando solicitase a abertura do pdf iria ter que abrir o adobe acrobat que por sinal é um pouco pesado, e demora um pouco a carregar. Vo ve se so tiver essa alternativa vou tentar fazer com que ao abrir a aplicação o adobe ira abrindo aos poucos tmb.. vo ve mas se alguem encontrar algo me avisa !!! abs


Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar