Warning version 5.26
[dcc32 Warning] frxExportPDF.pas(1413): W1057 Implicit string cast from 'AnsiString' to 'string'
Lines 1413 to 1423 frxExportPDF
correct
meta_xml := StringReplace(meta_xml, AnsiString('{0}'), AnsiString(UTF8Encode(FCreator)), [rfReplaceAll]);
meta_xml := StringReplace(meta_xml, AnsiString('{1}'), AnsiString(UTF8Encode(FSubject)), [rfReplaceAll]);
meta_xml := StringReplace(meta_xml, AnsiString('{2}'), AnsiString(UTF8Encode(FTitle)), [rfReplaceAll]);
meta_xml := StringReplace(meta_xml, AnsiString('{3}'), AnsiString(current_time), [rfReplaceAll]);
meta_xml := StringReplace(meta_xml, AnsiString('{4}'), AnsiString(UTF8Encode(FKeywords)), [rfReplaceAll]);
meta_xml := StringReplace(meta_xml, AnsiString('{5}'), AnsiString(UTF8Encode(FProducer)), [rfReplaceAll]);
meta_xml := StringReplace(meta_xml, AnsiString('{6}'), AnsiString(FFileID), [rfReplaceAll]);
meta_xml := StringReplace(meta_xml, AnsiString('{7}'), AnsiString(FFileID), [rfReplaceAll]);
// may be changed for another Pdf/A Compliance versions
meta_xml := StringReplace(meta_xml, AnsiString('{8}'), AnsiString('2'), [rfReplaceAll]);
meta_xml := StringReplace(meta_xml, AnsiString('{9}'), AnsiString('A'), [rfReplaceAll]);
just does not work. Reinstall version 5.2.4.
Lines 1413 to 1423 frxExportPDF
correct
meta_xml := StringReplace(meta_xml, AnsiString('{0}'), AnsiString(UTF8Encode(FCreator)), [rfReplaceAll]);
meta_xml := StringReplace(meta_xml, AnsiString('{1}'), AnsiString(UTF8Encode(FSubject)), [rfReplaceAll]);
meta_xml := StringReplace(meta_xml, AnsiString('{2}'), AnsiString(UTF8Encode(FTitle)), [rfReplaceAll]);
meta_xml := StringReplace(meta_xml, AnsiString('{3}'), AnsiString(current_time), [rfReplaceAll]);
meta_xml := StringReplace(meta_xml, AnsiString('{4}'), AnsiString(UTF8Encode(FKeywords)), [rfReplaceAll]);
meta_xml := StringReplace(meta_xml, AnsiString('{5}'), AnsiString(UTF8Encode(FProducer)), [rfReplaceAll]);
meta_xml := StringReplace(meta_xml, AnsiString('{6}'), AnsiString(FFileID), [rfReplaceAll]);
meta_xml := StringReplace(meta_xml, AnsiString('{7}'), AnsiString(FFileID), [rfReplaceAll]);
// may be changed for another Pdf/A Compliance versions
meta_xml := StringReplace(meta_xml, AnsiString('{8}'), AnsiString('2'), [rfReplaceAll]);
meta_xml := StringReplace(meta_xml, AnsiString('{9}'), AnsiString('A'), [rfReplaceAll]);
just does not work. Reinstall version 5.2.4.
Comments