2021年4月5日 星期一

10.4.2 ListView.ScrollViewChange存在的问题 - 红鱼儿

红鱼儿| 博客园_红鱼儿 |11:08:00

procedure TPageListDialogFrame.ListView1ScrollViewChange(Sender: TObject); var allheight: real; begin with Sender as TListView do begin allheight := S