fastreport字体加粗

procedure MasterData1OnBeforePrint(Sender: TfrxComponent);
begin
         IF  (<frxDB_cdsresult."res_CHR">='↓') THEN
       BEGIN
          frxdb_cdsresultres_chr.FONT.COLOR:=CLblue;
          frxdb_cdsresultres_dec.FONT.COLOR:=CLblue;
          frxdb_cdsresultres_dec.FONT.STYLE:=;
       END
       else IF   (<frxDB_cdsresult."res_CHR">='↑' ) THEN
       BEGIN
          frxdb_cdsresultres_chr.FONT.COLOR:=CLRED;
          frxdb_cdsresultres_dec.FONT.COLOR:=CLRED;
          frxdb_cdsresultres_dec.FONT.STYLE:=fsnone;
       END
       ELSE IF  (<frxDB_cdsresult."res_CHR">='阳性') THEN
       BEGIN
          frxdb_cdsresultres_chr.FONT.COLOR:=CLRED;
          frxdb_cdsresultres_dec.FONT.COLOR:=CLRED;
          frxdb_cdsresultres_dec.FONT.STYLE:=fSBOLD;
       END
       ELSE
       BEGIN
          frxdb_cdsresultres_chr.FONT.COLOR:=CLBLACK;
          frxdb_cdsresultres_dec.FONT.COLOR:=CLBLACK;
          frxdb_cdsresultres_dec.FONT.STYLE:=;
       END;
end;