掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
クリップボードの内容をストリームに書き出すには？ (ID:22397)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
CF_BITMAPならこんな感じで取得可能ですが、 ここで言う「TDIBSection」が不明だと取得できないということです。 正確には私にはできないだけだと思います。 調べれば恐らくできると思うのですが、今のところ調べてません。 procedure TForm1.Button2Click(Sender: TObject); var hdc,hWnd,hBitmap,hdc_mem:THandle; bm:Pointer; SrcDIB: TDIBSection; begin if (IsClipboardFormatAvailable(CF_BITMAP)) then begin Clipboard.Open; hBitmap := Windows.GetClipboardData(CF_BITMAP); hdc_mem := CreateCompatibleDC(Canvas.Handle); SelectObject(hdc_mem, hBitmap); GetObject(hBitmap, sizeof(SrcDIB), @SrcDIB); BitBlt(Canvas.Handle, 0, 0, SrcDIB.dsBm.bmWidth, SrcDIB.dsBm.bmWidth, hdc_mem, 0, 0, SRCCOPY); DeleteDC(hdc_mem); Clipboard.Close; end; end;
←解決時は質問者本人がここをチェックしてください。
更新する
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.