DELPHI盒子
!实时搜索: 盒子论坛 | 注册用户 | 修改信息 | 退出
检举帖 | 全文检索 | 关闭广告 | 捐赠
技术论坛
 用户名
 密  码
自动登陆(30天有效)
忘了密码
≡技术区≡ ①
DELPHI技术
lazarus/fpc/Free Pascal
移动应用开发
Web应用开发
数据库专区
报表专区
网络通讯
开源项目
论坛精华贴
≡发布区≡ ②
发布代码
发布控件
文档资料
经典工具
≡事务区≡ ③
网站意见
盒子之家
招聘应聘
信息交换
论坛信息
最新加入： jeff1314
今日帖子： 17
在线用户： 13
导航： 论坛 -> 发布代码 斑竹:liumazi,ruralboy  
作者：
男 robin_tlh (robinttt) ▲▲▲▲△ -
普通会员
2023/10/22 23:32:43
标题：
分享个空白Pdf生成函数 浏览:855
加入我的收藏
楼主： Procedure PdfCreate(DesFile: String);
Const
  BasePdf: TBytes = [$25, $50, $44, $46, $2D, $31, $2E, $37, $0D, $0A, $25, $E2, $E3, $CF, $D3, $0D, $0A, $0D, $0A, $32, $20, $30, $20, $6F, $62, $6A, $0D, $0A, $3C, $3C,
    $2F, $4B, $69, $64, $73, $20, $5B, $20, $5D, $20, $2F, $54, $79, $70, $65, $20, $2F, $50, $61, $67, $65, $73, $20, $2F, $43, $6F, $75, $6E, $74, $20, $30, $20, $3E,
    $3E, $0D, $0A, $65, $6E, $64, $6F, $62, $6A, $0D, $0A, $33, $20, $30, $20, $6F, $62, $6A, $0D, $0A, $3C, $3C, $2F, $4C, $65, $6E, $67, $74, $68, $20, $38, $33, $35,
    $20, $2F, $54, $79, $70, $65, $20, $2F, $4D, $65, $74, $61, $64, $61, $74, $61, $20, $2F, $53, $75, $62, $74, $79, $70, $65, $20, $2F, $58, $4D, $4C, $20, $3E, $3E,
    $0D, $0A, $73, $74, $72, $65, $61, $6D, $0D, $0A, $3C, $3F, $78, $70, $61, $63, $6B, $65, $74, $20, $62, $65, $67, $69, $6E, $3D, $22, $EF, $BB, $BF, $22, $20, $69,
    $64, $3D, $22, $57, $35, $4D, $30, $4D, $70, $43, $65, $68, $69, $48, $7A, $72, $65, $53, $7A, $4E, $54, $63, $7A, $6B, $63, $39, $64, $22, $3F, $3E, $0A, $3C, $78,
    $3A, $78, $6D, $70, $6D, $65, $74, $61, $20, $78, $6D, $6C, $6E, $73, $3A, $78, $3D, $22, $61, $64, $6F, $62, $65, $3A, $6E, $73, $3A, $6D, $65, $74, $61, $2F, $22,
    $20, $78, $3A, $78, $6D, $70, $74, $6B, $3D, $22, $41, $64, $6F, $62, $65, $20, $58, $4D, $50, $20, $43, $6F, $72, $65, $20, $35, $2E, $32, $2D, $63, $30, $30, $31,
    $20, $36, $33, $2E, $31, $33, $39, $34, $33, $39, $2C, $20, $32, $30, $31, $30, $2F, $30, $39, $2F, $32, $37, $2D, $31, $33, $3A, $33, $37, $3A, $32, $36, $20, $20,
    $20, $20, $20, $20, $20, $20, $22, $3E, $3C, $72, $64, $66, $3A, $52, $44, $46, $20, $78, $6D, $6C, $6E, $73, $3A, $72, $64, $66, $3D, $22, $68, $74, $74, $70, $3A,
    $2F, $2F, $77, $77, $77, $2E, $77, $33, $2E, $6F, $72, $67, $2F, $31, $39, $39, $39, $2F, $30, $32, $2F, $32, $32, $2D, $72, $64, $66, $2D, $73, $79, $6E, $74, $61,
    $78, $2D, $6E, $73, $23, $22, $3E, $3C, $72, $64, $66, $3A, $44, $65, $73, $63, $72, $69, $70, $74, $69, $6F, $6E, $20, $72, $64, $66, $3A, $61, $62, $6F, $75, $74,
    $3D, $22, $22, $20, $78, $6D, $6C, $6E, $73, $3A, $70, $64, $66, $3D, $22, $68, $74, $74, $70, $3A, $2F, $2F, $6E, $73, $2E, $61, $64, $6F, $62, $65, $2E, $63, $6F,
    $6D, $2F, $70, $64, $66, $2F, $31, $2E, $33, $2F, $22, $20, $78, $6D, $6C, $6E, $73, $3A, $64, $63, $3D, $22, $68, $74, $74, $70, $3A, $2F, $2F, $70, $75, $72, $6C,
    $2E, $6F, $72, $67, $2F, $64, $63, $2F, $65, $6C, $65, $6D, $65, $6E, $74, $73, $2F, $31, $2E, $31, $2F, $22, $3E, $3C, $70, $64, $66, $3A, $50, $72, $6F, $64, $75,
    $63, $65, $72, $3E, $46, $6F, $78, $69, $74, $20, $50, $44, $46, $20, $45, $64, $69, $74, $6F, $72, $20, $2D, $20, $46, $6F, $78, $69, $74, $20, $53, $6F, $66, $74,
    $77, $61, $72, $65, $20, $49, $6E, $63, $2E, $3C, $2F, $70, $64, $66, $3A, $50, $72, $6F, $64, $75, $63, $65, $72, $3E, $0D, $0A, $3C, $64, $63, $3A, $63, $72, $65,
    $61, $74, $6F, $72, $3E, $3C, $72, $64, $66, $3A, $42, $61, $67, $3E, $3C, $72, $64, $66, $3A, $6C, $69, $3E, $41, $64, $6D, $69, $6E, $69, $73, $74, $72, $61, $74,
    $6F, $72, $3C, $2F, $72, $64, $66, $3A, $6C, $69, $3E, $0D, $0A, $3C, $2F, $72, $64, $66, $3A, $42, $61, $67, $3E, $0D, $0A, $3C, $2F, $64, $63, $3A, $63, $72, $65,
    $61, $74, $6F, $72, $3E, $0D, $0A, $3C, $64, $63, $3A, $74, $69, $74, $6C, $65, $3E, $3C, $72, $64, $66, $3A, $41, $6C, $74, $3E, $3C, $72, $64, $66, $3A, $6C, $69,
    $20, $78, $6D, $6C, $3A, $6C, $61, $6E, $67, $3D, $22, $78, $2D, $64, $65, $66, $61, $75, $6C, $74, $22, $3E, $E6, $97, $A0, $E6, $A0, $87, $E9, $A2, $98, $3C, $2F,
    $72, $64, $66, $3A, $6C, $69, $3E, $0D, $0A, $3C, $2F, $72, $64, $66, $3A, $41, $6C, $74, $3E, $0D, $0A, $3C, $2F, $64, $63, $3A, $74, $69, $74, $6C, $65, $3E, $0D,
    $0A, $3C, $78, $6D, $70, $3A, $43, $72, $65, $61, $74, $65, $44, $61, $74, $65, $3E, $32, $30, $32, $33, $2D, $30, $37, $2D, $30, $38, $54, $31, $36, $3A, $34, $32,
    $3A, $33, $34, $2B, $30, $38, $3A, $30, $30, $3C, $2F, $78, $6D, $70, $3A, $43, $72, $65, $61, $74, $65, $44, $61, $74, $65, $3E, $0D, $0A, $3C, $78, $6D, $70, $3A,
    $4D, $6F, $64, $69, $66, $79, $44, $61, $74, $65, $3E, $32, $30, $32, $33, $2D, $30, $37, $2D, $30, $38, $54, $31, $36, $3A, $34, $32, $3A, $34, $32, $2B, $30, $38,
    $3A, $30, $30, $3C, $2F, $78, $6D, $70, $3A, $4D, $6F, $64, $69, $66, $79, $44, $61, $74, $65, $3E, $0D, $0A, $3C, $78, $6D, $70, $3A, $4D, $65, $74, $61, $64, $61,
    $74, $61, $44, $61, $74, $65, $3E, $32, $30, $32, $33, $2D, $30, $37, $2D, $30, $38, $54, $31, $36, $3A, $34, $32, $3A, $33, $34, $2B, $30, $38, $3A, $30, $30, $3C,
    $2F, $78, $6D, $70, $3A, $4D, $65, $74, $61, $64, $61, $74, $61, $44, $61, $74, $65, $3E, $0D, $0A, $3C, $2F, $72, $64, $66, $3A, $44, $65, $73, $63, $72, $69, $70,
    $74, $69, $6F, $6E, $3E, $0D, $0A, $3C, $2F, $72, $64, $66, $3A, $52, $44, $46, $3E, $0D, $0A, $3C, $2F, $78, $3A, $78, $6D, $70, $6D, $65, $74, $61, $3E, $0D, $0A,
    $0A, $3C, $3F, $78, $70, $61, $63, $6B, $65, $74, $20, $65, $6E, $64, $3D, $22, $77, $22, $3F, $3E, $0D, $0A, $65, $6E, $64, $73, $74, $72, $65, $61, $6D, $0D, $0A,
    $65, $6E, $64, $6F, $62, $6A, $0D, $0A, $31, $20, $30, $20, $6F, $62, $6A, $0D, $0A, $3C, $3C, $2F, $50, $61, $67, $65, $73, $20, $32, $20, $30, $20, $52, $20, $2F,
    $54, $79, $70, $65, $20, $2F, $43, $61, $74, $61, $6C, $6F, $67, $20, $2F, $4D, $65, $74, $61, $64, $61, $74, $61, $20, $33, $20, $30, $20, $52, $20, $3E, $3E, $0D,
    $0A, $65, $6E, $64, $6F, $62, $6A, $0D, $0A, $34, $20, $30, $20, $6F, $62, $6A, $0D, $0A, $3C, $3C, $2F, $41, $75, $74, $68, $6F, $72, $20, $28, $41, $64, $6D, $69,
    $6E, $69, $73, $74, $72, $61, $74, $6F, $72, $29, $20, $2F, $43, $72, $65, $61, $74, $69, $6F, $6E, $44, $61, $74, $65, $20, $28, $44, $3A, $32, $30, $32, $33, $30,
    $37, $30, $38, $31, $36, $34, $32, $33, $34, $2B, $30, $38, $27, $30, $30, $27, $29, $20, $2F, $4D, $6F, $64, $44, $61, $74, $65, $20, $28, $44, $3A, $32, $30, $32,
    $33, $30, $37, $30, $38, $31, $36, $34, $32, $34, $32, $2B, $30, $38, $27, $30, $30, $27, $29, $20, $2F, $54, $69, $74, $6C, $65, $20, $28, $FE, $FF, $65, $E0, $68,
    $07, $98, $98, $29, $20, $2F, $50, $72, $6F, $64, $75, $63, $65, $72, $20, $28, $5B, $43, $69, $72, $63, $61, $73, $73, $69, $61, $6E, $53, $6F, $6E, $5D, $2D, $42,
    $6F, $61, $72, $64, $34, $41, $6C, $6C, $2E, $62, $69, $7A, $29, $20, $3E, $3E, $0D, $0A, $65, $6E, $64, $6F, $62, $6A, $0D, $0A, $78, $72, $65, $66, $0D, $0A, $30,
    $20, $35, $0D, $0A, $30, $30, $30, $30, $30, $30, $30, $30, $30, $30, $20, $36, $35, $35, $33, $35, $20, $66, $0D, $0A, $30, $30, $30, $30, $30, $30, $30, $39, $39,
    $35, $20, $30, $30, $30, $30, $30, $20, $6E, $0D, $0A, $30, $30, $30, $30, $30, $30, $30, $30, $31, $39, $20, $30, $30, $30, $30, $30, $20, $6E, $0D, $0A, $30, $30,
    $30, $30, $30, $30, $30, $30, $37, $34, $20, $30, $30, $30, $30, $30, $20, $6E, $0D, $0A, $30, $30, $30, $30, $30, $30, $31, $30, $36, $32, $20, $30, $30, $30, $30,
    $30, $20, $6E, $0D, $0A, $74, $72, $61, $69, $6C, $65, $72, $0D, $0A, $3C, $3C, $2F, $53, $69, $7A, $65, $20, $35, $20, $2F, $52, $6F, $6F, $74, $20, $31, $20, $30,
    $20, $52, $20, $2F, $49, $6E, $66, $6F, $20, $34, $20, $30, $20, $52, $20, $2F, $49, $44, $20, $5B, $20, $3C, $46, $41, $36, $45, $43, $36, $33, $30, $45, $38, $41,
    $31, $37, $38, $38, $41, $44, $31, $33, $37, $34, $35, $36, $41, $41, $43, $31, $42, $31, $41, $46, $41, $3E, $20, $3C, $46, $41, $36, $45, $43, $36, $33, $30, $45,
    $38, $41, $31, $37, $38, $38, $41, $44, $31, $33, $37, $34, $35, $36, $41, $41, $43, $31, $42, $31, $41, $46, $41, $3E, $20, $5D, $20, $3E, $3E, $0D, $0A, $73, $74,
    $61, $72, $74, $78, $72, $65, $66, $0D, $0A, $31, $32, $34, $34, $0D, $0A, $25, $25, $45, $4F, $46, $0D, $0A];
Var
  Stm: TFileStream;
Begin
  Stm := TFileStream.Create(DesFile, fmCreate);
  Stm.WriteBuffer(BasePdf[0], Length(BasePdf));
  Stm.Free;
End;
此帖子包含附件:robin_tlh_20231022233243.txt 大小:7.8K
----------------------------------------------
快乐工作，快乐生活
作者：
男 hguhgu (满汉全席) ★☆☆☆☆ -
普通会员
2023/10/23 8:21:07
1楼： 这个有啥用？直接拷贝一个文件不是更快？
----------------------------------------------
-
作者：
男 mricy (Ｉｃｙ) ▲▲▲▲△ -
普通会员
2023/10/23 8:45:58
2楼： 不知道多少年前的时候常用 实际上除了特定的一些场景
楼上的说的一点没错。
此帖子包含附件:
PNG 图像
大小:39.0K
----------------------------------------------
哦哟喂,看过来: http://zelig.cn
作者：
男 tuao (tuao) ★☆☆☆☆ -
盒子活跃会员
2023/10/23 11:33:10
3楼： 不论如何，都要感谢楼主的分享，总会有些场景、有些人会用到。
就算用不到，也可以学一下pdf的文件头构成。
----------------------------------------------
tuao
作者：
男 delphiilove (乌羽玉) ★☆☆☆☆ -
普通会员
2023/10/24 10:38:45
4楼： 好
----------------------------------------------
-
信息
登陆以后才能回复
Copyright © 2CCC.Com 盒子论坛 v3.0.1 版权所有 页面执行105.4688毫秒 RSS