交替行或文本框的背景顏色

Question

由於Crystal沒有數據網格，因此我使用VS2010 SQLServer的Crystal報表中的數據來自數據庫，顯示在文本框中。

我該如何替換那些文本框的背景顏色？

Answer 1

創建自定義公式：稱之爲「彩色化」：

//Color every other row as light tan (alter RGB to suit tastes) 
Function (Numbervar row, Optional Numbervar Color := RGB(239,235,220)) 

If Remainder(row,2)=0 Then 
    Color 
Else 
    crNoColor 

添加下面的詳細信息部分的背景顏色的條件格式化公式：

Colorize(RecordNumber) 

//or over-ride color 
Colorize(RecordNumber, crSilver) 

您還可以通過將GroupNumber關鍵字與組頭部分使用它：

Colorize(GroupNumber) 

如果你正在做什麼花哨的瓦特/分組，您可能需要使用一個磨合的總公式：

//{@G1} 
WhilePrintingRecords; 
Numbervar i; 
i:=1+1; 

將此公式添加到組標題部分，然後將其禁用。

更改石斑魚報頭的條件式來：

WhilePrintingRecords; 
Numbervar i; 
Colorize(i); 

Answer 2

有兩種方法可以做到這一點。第一個是最簡單但最不健壯的。在詳細信息部分，您可以添加背景顏色格式公式，如下所示：if recordnumber mod 2 = 0 then crgray else crnocolor

第二種是如果您需要對格式設置有更多控制權，比方說，如果您不顯示詳細信息部分，並且只是組頁腳/頭。它只涉及跟蹤一個布爾變量。在要觸發的部分中，將此添加到您的背景顏色格式公式中：

whileprintingrecords; 
booleanvar fliprow; 
fliprow := not fliprow; 
if fliprow then crgray else crnocolor