Delphi StringGrid使用全书3

关键字：Delphi StringGridTstringGrid 的行列合并研究【这段代码来自wangxian11】 

正好在帖子上看到了，功能能够实现。（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.ltesting.net