正好在帖子上看到了,功能能夠實現。(wangxian11大哥可真是厲害~~)可惜的是,效果還不是很好,如果將來有更好的希望大家提供吧。
unit Unit1;
//建立一工程,
//粘貼本單元代碼即可看 STringGrid 行列合并效果
//但發現非固定行非固定列的合并效果不好
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
StdCtrls, Db, ADODB, DBTables, Grids;//注意這里要引用
type
TForm1 = class(TForm)
procedure FormCreate(Sender: TObject);
procedure SGDrawCell(Sender: TObject; ACol, ARow: Integer;
延伸閱讀
文章來源于領測軟件測試網 http://www.kjueaiud.com/