Delphi:如何使用 TJvRichEdit 将文本和图像(不仅仅是 .bmp)加载或保存到文件或 firebird blob 字段？

Question

关于 TJvRichEdit 和 Delphi...怎么样？

1. 从文件加载/保存 rtf(包括文本和图像 - 不仅是 .bmp)？
2. 从 Firebird blob 字段读取/写入 rtf(包括文本和图像 - 不仅是 .bmp)？
3. 在插入 TJvRichEdit rtf 之前，自动将从剪贴板 (Ctrl-V) 粘贴的屏幕转储转换为 .jpg 格式？

指导/建议、示例/代码和有用的 URL 都很有帮助。谢谢。

Answer 1

关于3，我建议从剪贴板创建位图加载(请参阅LoadFromClipboardFormat、SaveToClipboardFormat)，转换为jpeg保存到剪贴板，从剪贴板粘贴richedit，

从位图转换为 jpeg:

Jpg := TJPEGImage.Create;
jpg.Assign(Bitmap);
jpg.CompressionQuality := 50;