Delphi获取当前鼠标下的控件内容主要函数:GetCursorPos;//获取鼠标的位置WindowFromPoint;//获取制定point下的handleGetClassName;//获取类的名字 functionTForm1.GetEditText:string;var Point:TPoint; Name ...……
新建一张表 Ca int b stringform中添加:组件 名字dbgrid dbgrd1button btn1checklist chklst1;第一步:连接dbgrid到表;sql: select*from C;第二步:button事件中;添加代码beginfori:=0todbgrd1.C ...……