也可以不用DataSetTableProducer,自己将FDQuery1转成HTML文本 webbroker应用——在线成语词典,就是有点麻烦
拖一个DataSetTableProducer1到界面上,假设FDQuery1已正常连接

双击DataSetTableProducer1




改变单元格背景色,uses HTTPProd;

procedure TWebModule1.DataSetTableProducer1FormatCell(Sender: TObject; CellRow, CellColumn: Integer; var BgColor: THTMLBgColor; var Align: THTMLAlign; var VAlign: THTMLVAlign; var CustomAttrs, CellData: string); begin if CellRow = 0 then BgColor := 'Gray' else if CellRow mod 2 = 0 then BgColor := 'Silver'; end;
浙公网安备 33010602011771号