作为我自己的"看看"教程,我正在构建一个PHP脚本来从POP3邮箱收集电子邮件.在尝试使用二进制附件时,我一直试图弄清楚如何处理附件信息.
给定一个将从电子邮件中收集的字符串:
------ = _ Part_16735_17392833.1229653992102内容类型:image/JPEG; 名称= trans2.jpg内容传输编码:BASE64 X-附件-ID:f_fow87t5j0内容处置:附件; 文件名= trans2.jpg
/ 9J/4AAQSkZJRgABAgEASABIAAD/4QxrRXhpZgAATU0AKgAAAAgABwESAAMAAAABAAEAAAEaAAUA AAABAAAAYgEbAAUAAAABAAAAagEoAAMAAAABAAIAAAExAAIAAAAUAAAAcgEyAAIAAAAUAAAAhodp
(......)
EAgEAgEAgEAgEAg8IBQRL/Lbe/tJrScHqZ2lkmE4XUP2XcSDZZ2VvZ28dtbsDIYmhkbRxAIJCAQC AQCAQf/ScyAQCAQCAQCAQCAQCAQCAQCAQCAQCAQf/9k = ------ = _ Part_16735_17392833.1229653992102--
有没有办法将数据保存到磁盘,以便它是一个可用的格式？
如何从XMPP vcard(头像图片,我认为是JPEG格式)中读取照片并将其显示在Delphi TImage控件中？
XMPP服务器发送此XML:
<presence id="e3T50-75" to="cvg@esx10-2022/spark" from="semra@esx10-2022"
type="unavailable">
<x xmlns="vcard-temp:x:update">
<photo>897ce4538a4568f2e3c4838c69a0d60870c4fa49</photo>
</x>
<x xmlns="jabber:x:avatar">
<hash>897ce4538a4568f2e3c4838c69a0d60870c4fa49</hash>
</x>
</presence>
我有一个64基本编码的字符串,其中包含PDF文件数据.
使用EncdDecd命名空间我可以将字符串解码为字节数组.
这是我遇到麻烦的地方,我尝试将字符保存到字符串但是一旦它达到空值(ascii = 0),字符串就不再附加..
示例
var
EncodedString:String;
报告:字符串;
Base64Bytes:TBytes; //包含二进制数据
begin
Base64Bytes := DecodeBase64(EncodedString);
for I := 0 to Length(Base64Bytes) - 1 do
begin
Report := Report + Chr(Base64Bytes[I]);
end;
end;
写入文本文件似乎更好,但在将其重命名为pdf后,它无法正确打开.
如何在delphi中写入二进制文件？甚至将数据保存到流中？
基本上我只是尝试获取编码的字符串并将其保存为pdf文件,或在delphi中显示pdf.
谢谢
PS
我已经看了很多,并找到了一个可能的解决方案 使用Delphi 2007将Base64字符串保存为磁盘作为二进制文件,但还有另一种方法吗？