如何实现拖动窗(50分)

I

iseek

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-12-03

• #1

不少程序有个拖动窗口,可以实现将选定的文字dragdrop到拖动窗.
我想知道的是,这个窗口上的图象是如何弄上去的.

我曾用richedit试着做了一个拖动窗,它当然可以dragdrop文字了,但我如何在richedit上
“画”一个图像呢？

 

H

honghs

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-01-15

• #2

进入听听

 

卷

卷起千堆雪tyn

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-01-15

• #3

去下载RxRichEdit控件，可以满足你的要求。

 

I

iseek

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-01-15

• #4

卷兄，太费事了吧？
我一直不大喜欢RXRICHEDIT，不好用。

 

W

wind2000

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-01-15

• #5

"画"一个图像简单:
procedure Tform1.RichEditPain;
var
MyCanvas: TControlCanvas;
Begin
MyCanvas:=TControlCanvas.Create;
Mycanvas.control:=RichEdit1;//想在RichEdit1上作画
With Mycanvas do
Begin
Draw(0,0,image1.Picture.Graphic);//作画
Font.Color := clRed;
Brush.Style := bsClear;
TextOut(10,10,'在RichEdit中显示图片');
end;
End;

 

I

iseek

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-01-15

• #6

honghs,这分答应了给你的，接着！
卷雪：
就没你什么事儿了-：）
这帖子好久没人理了。实不相瞒，前不久我自己继承richedit，在上面画了个图。至于
用不用得上我还不知道。