如何在透明image上画多条直线并移动? Delphi / Windows SDK/APIhttp://www.delphi2007.net/DelphiMultimedia/html/delphi_20061030090033189.html
如题,两个image,上面的image透明,如何在这个image上画多条直线?用fillrect
brush.style := bsclear 上次画的直线就被清空了,不用又不能保证透明。
补充:其实我要做一个图像处理的软件,需要画线等功能。
要求在对原始图像进行处理时,其上人为标注的各种信息如直线、文字等不变化。
另外,有没有满足以上要求并且可以使标注信息自由移动的类似控件?
强烈要求分离Image跟前景的线条或者文字。你可以维护一个内部的Bitmap缓冲,然后在FormPaint之类的事件中把图片和文字分别绘制到窗口上。不要考虑重叠的Image。效率太低,而且不灵活。
此外,对于需要可以自由移动的文字,如果要求不高的话,直接动态创建TLabel好了。线条什么的就用Shape。
如果你的窗口闪烁的厉害,可以把Form(或者你绘图的母体)的DoubleBuffered打开。