PC SOFT

FOROS PROFESIONALES
WINDEVWEBDEV y WINDEV Mobile

Inicio → WINDEV 25 → [WINDEV 19] Converter PDF para Texto
[WINDEV 19] Converter PDF para Texto
Iniciado por pedrosao, 21,feb. 2015 12:39 - No hay respuesta
Miembro registrado
42 mensajes
Publicado el 21,febrero 2015 - 12:39
//Procedimento para Extrair texto de arquivos PDF com Windev
tmpArq is string
tmpArq = fImageSelect(EdtArqPdf,"","Selecione PDF...","PDFs"+TAB+"*.PDF")
IF tmpArq<>"" THEN
EdtArqPdf = tmpArq // mostra o nome do arquivo na tela
ImgPDF = tmpArq // mostra o PDF na tela
StaTextoDoPDF = PDFToText(tmpArq,"1") // extrai texto pg 1
END