H hongtaosh Unregistered / Unconfirmed GUEST, unregistred user! 2003-09-14 #1 我想在一个Image画布上单击鼠标左键, 在Edit1和Edit2中显示单击点处的X和Y坐标,怎么我的显示不了啊? 请帮忙了,各位!
T takashiki Unregistered / Unconfirmed GUEST, unregistred user! 2003-09-14 #2 Edit1.text:=inttostr(x); Eidt2.text:=inttostr;
H hongtaosh Unregistered / Unconfirmed GUEST, unregistred user! 2003-09-14 #3 procedure TtForm7.tImage1MouseDown(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer); begin Edit6.Text:=IntToStr(X); Edit7.Text:=IntToStr(Y); end; 鼠标点了半天,怎么一点反应都没有?
procedure TtForm7.tImage1MouseDown(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer); begin Edit6.Text:=IntToStr(X); Edit7.Text:=IntToStr(Y); end; 鼠标点了半天,怎么一点反应都没有?