請教各位前輩：
我想從Delphi 2006.net中，利用table元件做出雙色效果。
( 範例如下列網址 )
http://delphi.ktop.com.tw/board.php?cid=30&fid=66&tid=35569

但是table 沒有DrawColumnCell的事件可以重繪，我可以用什麼方法達到類似的效果?
謝謝各位。

Delphi 2006 小弟沒有用過，但是Table是資料表為不可見元件怎麼會有繪圖的事件？！你講的應該是DBGrid吧！
===================引 用 fivker 文 章===================
請教各位前輩：
我想從Delphi 2006.net中，利用table元件做出雙色效果。
( 範例如下列網址 )
http://delphi.ktop.com.tw/board.php?cid=30&fid=66&tid=35569

但是table 沒有DrawColumnCell的事件可以重繪，我可以用什麼方法達到類似的效果?
謝謝各位。

Stallion 您好：
不好意思，這邊我沒有表達清楚 <(_ _)> 。

文章所提的Table是webcontrol元件，跟Delphi win32使用的Data Access的 Table不同。
(類似表格的東西，感覺很像Word裡面的表格 )

我原本的想法是在事件裡面去觸發，但是webcontrol的table所提供的事件僅有
Databinding / Disposed / Init / Load / PreRender / Unload 這幾項。

我後來有想到的解決方式，(翻書上的範例 )


var
i,icolor,mcolor: Integer;
SqlDA: SqlDataAdapter;
ds: DataSet;
dr: DataRow;
Sql01: string;
begin
ds := DataSet.Create('TableName');
SqlDA := SqlDataAdapter.Create(Sql01, sqlconnection1.ConnectionString);
SqlDA.Fill(ds,'bctime');

for dr in ds.Tables['TableName'].Rows do
begin
mcolor:=icolor mod 2;

Self.insertCells( dr['FieldName1'].ToString,
dr['FieldName2'].ToString,
dr['FieldName3'].ToString,
dr['FieldName4'].ToString,
dr['FieldName5'].ToString,
dr['FieldName6'].ToString,
dr['FieldName7'].ToString,
dr['FieldName8'].ToString,
dr['FieldName9].ToString,
dr['FieldName10'].ToString,
mcolor);
icolor:=icolor 1;
end
/------------呼叫function insertCells----------------/
//裡面再加這一段
if mcolor=0 then
myrow.BackColor:=color.get_white
else
myrow.BackColor:=color.get_Lavender;

既然自行想出方法也提供出來，就煩請結案吧！