use SMEEngine

procedure TfrmXLSExport.SMExportToXLS1GetCellParams(Sender: TObject;
Field: TField; var Text: String; AFont: TFont; var Alignment: TAlignment;
var Background: TColor; var CellType: TCellType);
begin

  if Assigned(Field) then
  begin
      Text:=Trim(Text);
  end;

end;

  • 相关文章

    • 无相关文章
Last modification：January 6, 2015
© Allow specification reprint
稀罕你