くだすれDelphi(超初心者向け) Part4
レス数が900を超えています。1000を超えると表示できなくなるよ。
0945デフォルトの名無しさん
NGNGでも次の問題が…
描いたmetacanvasの一部領域のみを、保存したいとき、
もうひとつ保存用のstoreMetafileというのを作ってそこでmetacanvasからcopyrectして
保存という案で
storeMetaFile := TMetaFile.Create;
storeMetaFile.Height := 50;
storeMetaFile.Width := 50;
storeMetaFile.Enhanced:=true;
storeMetaCanvas:=TMetafileCanvas.Create(storeMetaFile, 0);
storemetaCanvas.Pen.Color:=clblack;
storeMetaCanvas.brush.style:=bsClear;
sourceRect := Rect(0,0,50,50);
MyRect := Rect(0,0,50,50)
storeMetacanvas.CopyRect(MyRect,metacanvas,sourceRect);
//eMFの書き込み
storeMetaCanvas.Free;
storeMetaFile.SaveToFile('C:\dtert.emf');
で中身なしのemfファイルができてしまうのです。
これも二時間以上googleとかで調べてもわからない…。
copyrectはビットマップのみなのかなとか諦めムードです。
レス数が900を超えています。1000を超えると表示できなくなるよ。