frm3_qry1.AfterOpen //自动适应表头或内容列

摘要

frm3_qry1.AfterOpen//添加如下代码
//自动适应表头或内容列
var
  i: Integer;
begin
  inherited;
  for i := 0 to DBGridEh1.Columns.Count - 1 do
  begin
    DBGridEh1.Columns[i].OptimizeWidth;
    DBGridEh1.Col...

frm3_qry1.AfterOpen//添加如下代码
//自动适应表头或内容列
var
  i: Integer;
begin
  inherited;
  for i := 0 to DBGridEh1.Columns.Count - 1 do
  begin
    DBGridEh1.Columns[i].OptimizeWidth;
    DBGridEh1.Columns[i].Title.TitleButton := True;
  end;
  Screen.Cursor := crDefault;
end;

📱 扫码关注公众号

扫描二维码关注我们，获取更多精彩内容
实时更新 · 干货满满

点赞收藏分享

推荐阅读

版权所有：辰峰微网
文章标题：frm3_qry1.AfterOpen //自动适应表头或内容列
文章链接：https://www.14551.cn/Delphi/758.html
版权声明：本站提供的一切软件、教程和内容信息仅限用于学习和研究目的；不得将上述内容用于商业或者非法用途，否则，一切后果请用户自负。本站信息来自网络收集整理，如果您喜欢该程序和内容，请支持正版，购买注册，得到更好的正版服务。我们非常重视版权问题，如有侵权请邮件与我们联系处理。敬请谅解！

扫描二维码，在手机上阅读