我有一个紧急问题(100分)

S

sz_guo

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-03-13

• #1

各位老大，[red][/red]我用画了几个方框和圆形，想击活其中一个，不知该怎么作？
盼盼盼盼盼盼盼！
sz_guo@263.net

 

C

cx139

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-03-13

• #2

不明白

 

S

sz_guo

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-03-13

• #3

我用
self.Canvas.Ellipse(TopLeft.X,TopLeft.Y,BottomRight.X,BottomRight.Y);
self.Canvas.Rectangle(TopLeft.X,TopLeft.Y,BottomRight.X,BottomRight.Y);
画了几个方框和圆形，想击活其中一个，不知该怎么作？
盼盼盼盼盼盼盼！

 

C

cx139

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-03-13

• #4

》》画了几个方框和圆形，想击活其中一个，不知该怎么作

不太明白激活的概念？是不是显示与别人不同？

 

S

sz_guo

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-03-14

• #5

击活其中一个 tuodong

 

C

cx139

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-03-14

• #6

画出来的图形激活是不可能的，建议你判断鼠标的坐标是不是在你画的图形区域，
然后把那个图形重画（加粗/变色），效果应该达到了吧

我睡了，有问题cx139@371.net

 

B

bubble

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-03-14

• #7

放一个panel1上面放一个Image1,
Image1Canvas.Ellipse(TopLeft.X,TopLeft.Y,BottomRight.X,BottomRight.Y);

procedure TForm1.Image1MouseDown(Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer);
begin
releasecapture;
panel1.Perform(WM_syscommand,$f012,0);
end;

 

S

sz_guo

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-03-14

• #8

各位仁兄 能不能在说的详细一点，或给一段源码，谢谢！[!]

 

G

grays

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-03-14

• #9

如果你要实现这样的效果你就得把每一个图形变成一个对象，呀，就像word中得图形一样

 

S

sz_guo

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-03-15

• #10

grays,详细一点，或给一段源码，谢谢！[!]