怎么把屏幕的一部分镜象显示

[45749981]

最好给个源码，分不够说话！小弟在此谢了！！

[zwjchina]

。。。，在网吧，方法有，要源就没有！

[ahjoe]

这个问题，是否可以转变为，把一个图片镜像显示？

[45749981]

图片景象可以的，用坐标转换可以吗？？

[GoldShield]

先把屏幕取到一个图片中.再把图片镜像

[kejian]

怎么把屏幕的一部分镜象显示 ??

镜象是个什么概念啊？不就是截图嘛，说的很高深似的。

[nyf1220]

给你个截图的例子参考

procedure TForm1.ScreenCap(LeftPos, TopPos, RightPos, BottomPos: integer);
var
RectWidth,RectHeight:integer;
SourceDC,DestDC,Bhandle:integer;
Bitmap:TBitmap;
begin
RectWidth:=RightPos-LeftPos;
RectHeight:=BottomPos-TopPos;
SourceDC:=CreateDC('DISPLAY','','',nil);
DestDC:=CreateCompatibleDC(SourceDC);
Bhandle:=CreateCompatibleBitmap(SourceDC,RectWidth,RectHeight);
SelectObject(DestDC,Bhandle);
BitBlt(DestDC,0,0,RectWidth,RectHeight,SourceDC,LeftPos,TopPos,SRCCOPY);
Bitmap:=TBitmap.Create;
Bitmap.Handle:=BHandle;
BitMap.SaveToStream(BmpStream);
BmpStream.Position:=0;
LeftSize:=BmpStream.Size;
Bitmap.Free;
DeleteDC(DestDC);
ReleaseDC(Bhandle,SourceDC);
end;

[45749981]

不经过图片转换，有没有办法可直接把屏幕镜像