有关图形方面的问题！特奇怪！(200分)

H

huangwei1

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-04-27

• #1

var
Point:TPoint;
begin
GetCursorPos(Point);
POINT:=Image2.ScreenToClient(Point);
Edit1.Text:=IntToStr(GetPixel(handle,Point.x,Point.y));
end;

编辑框的结果竟然是0，有的人说可以正常显示，但是我确不行，哪位高手赐教！

 

车

车金明

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-04-27

• #2

这样处理试试：
Edit1.Text:=IntToStr(GetPixel(image2canvas.handle,Point.x,Point.y));

 

D

doxpix

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-04-27

• #3

缺省的handle应该是指form的handle吧。
Getpixel要的是设备环境的handle,所以楼上的兄弟是对的。

 

R

redcony

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-04-27

• #4

getpixel返回的是RGB值吧，是个16进制的

 

H

huangwei1

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-04-27

• #5

多人接受答案了。