| | | |

2019年7月16日

摘要： procedure TForm1.SpeedButton1Click(Sender: TObject); var Apoint:TPoint; begin APoint:=TSpeedButton(Sender).ClientToScreen(Point(0,TSpeedButton(Sender) 阅读全文

posted @ 2019-07-16 13:51 zyb2016 阅读(394) 评论(0) 推荐(0)