delphi - 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 に変換してクリップボードに保存し、クリップボードからリッチエディット ペーストすることをお勧めします。

ビットマップから jpeg への変換:

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

Answer 2

blob フィールドに関する限り、tBlobStreamとコンポーネントの SaveToStream / LoadFromStream メソッドを使用します。ファイルの場合、同じメソッドでtFileStreamを使用します。

Answer 3

JVCL ダウンロードに付属するデモ (..\jvcl\examples\JvRichEdit\EditorDemo.dpr) を見つけました。コンパイルして実行すると、質問のパート 1 に答えるコードが含まれているように見えます。