procedure TForm1.DBGrid1TitleClick(Column: TColumn); var i : Integer; begin for i:= 1 to DBGrid1.Columns.Count do begin //恢复所有标题字体为默认 DBGrid1.Columns[i-1].Title.Font.Color := clWindowText;
Copyright © 2005-2025 51CTO.COM 版权所有 京ICP证060544号