在线等

没人知道呀 

咱没人回复昵

路过，帮顶

哎，看来这里的人气真的不行了

可以用代码控制；
但是建议你使用第三方网格控件，网上有的是。

可以用EjunGrid控件
这里有下载 http://www.ejun.cn

建议你使用DevExpress的cxGrid控件.它可以实现你所需要功能.

程序已经做好的，用的是ListView控件，
我想用代码来控制，有谁做过没有过

左边是怎么实现的？

也就是ListView自绘表头，也就是那个类名为SystemHeader32的窗口。先取得其句柄，然后，截获重绘消息并且绘制。
var
  m_hHandle: THandle;
begin
  m_hHandle:= GetWindow(ListView1.Handle, GW_CHILD);

  BitBlt(GetWindowDC(m_hHandle), 0, 0, Image1.Width, Image1.Height, Image1.Canvas.Handle, 0, 0, SRCCOPY);
end；
左边的也是一样的。看看ccrun的ListView自绘的代码。
http://www.ccrun.com/article.asp?i=656&d=qdc7kg