Bonjour,
Je reconconter une erreur de compilation pour ce bout de code:
(Désolé, les balises ne fonctionnent plus
Erreur de compilation: (le pointeur s'arrète derrière 'Filenamein' de la ligne ShellExecute)
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5 uses:gsapi, ghosttools, shellapi,... var: Filenamein, FilenameOut : string;... Filenamein:= ExtractFilePath(opendialog1.FileName)+sid+' - '+IntToStr(myYear)+' '+Month+' '+Day+' '+Hour+''+Min+''+Sec+' - '+Prof+'.pdf'; FilenameOut:= ExtractFilePath(opendialog1.FileName)+sid+' - '+IntToStr(myYear)+' '+Month+' '+Day+' '+Hour+''+Min+''+Sec+' - '+Prof+'.tif'; ShellExecute(Handle,'Open','gs -dBATCH -dNOPAUSE -sDEVICE=tiffg4 -r600x600 -sDither=fast -sOutputFile='+FilenameOut+' '+Filenamein,nil,Nil,SW_SHOWDEFAULT);
[DCC Avertissement] pdf_to_txt.pas(203): W1058 Transtypage de chaîne implicite avec perte de données potentielle de 'string' en 'AnsiString'
[DCC Erreur] pdf_to_txt.pas(256): E2010 Types incompatibles : 'PWideChar' et 'string'
[DCC Avertissement] pdf_to_txt.pas(431): W1058 Transtypage de chaîne implicite avec perte de données potentielle de 'string' en 'AnsiString'
[DCC Erreur fatale] Project1.dpr(5): F2063 Impossible de compiler l'unité utilisée 'pdf_to_txt.pas'
J'ai tenté plusieurs variantes mais sans résultat
Merci pour vos suggestions...
Joyeux Noël![]()
Partager