pdfファイル中を検索について

解決

のりたま 2020-08-11 11:07:06 No: 148988

こんにちは。

Windows 10 Pro 64bit
Delphi Berlin Ent

以上の環境で　あるpdfファイルに記載されている例えば「Z」から始まる文字列を検索したいのですが
そのようなことが可能でしょうか？
もし、可能でしたらヒントでも構いませんので
ご案内頂ければ助かります。
よろしくお願いいたします。

のりたま 2020-08-11 14:35:43 No: 148989

ネット検索していましたら、
xdoc2txt.exeというpdfファイルをテキストデータに変換するアプリをみつけました。

xdoc2txt.exe　と　1.pdfを　C:\TMPフォルダに入れて
以下のようにして実行したのですがtmp_1.txtファイルは作成されませんでした。
コマンドラインではtmp_1.txtファイルは作成されるのですが
何がおかしいのでしょうか？

ShellExecute(Handle, 'open', PChar('C:\TMP\xdoc2txt.exe'), PChar(' C:\TEMP\1.pdf' + ' > ' + 'C:\TMP\tmp1.txt'), nil, SW_NORMAL);

au 2020-08-11 16:40:27 No: 148990

下記だとどうですか？
ShellExecute(Handle, 'open', PChar('C:\TMP\xdoc2txt.exe'), PChar(' -f C:\TEMP\1.pdf'), nil, SW_NORMAL);

Mr.XRAY 2020-08-12 08:09:19 No: 148991

以下のようにしみてください．
引数に，変数ではない文字列を直接渡す場合は，
PChar でキャストしないようにします．
　
  　
procedure TForm1.Button1Click(Sender: TObject);
var
  LCmdLine : string;
begin
  LCmdLine := '/c C:\TMP\xdoc2txt.exe C:\TEMP\1.pdf > C:\TMP\tmp1.txt';
  ShellExecute(Handle, '', 'cmd.exe', PChar(LCmdLine), nil, SW_HIDE);
end;

のりたま 2020-08-15 14:18:34 No: 148998

auさん、Mr.XRAYさんご回答ありがとうございます。