Q&A

  • <급질문> 폰트에 색깔주기
procedure TForm2.HRGroup1BeforePrint(Sender: THRCustomControl);

begin

if Table1.FieldByName('car3').asstring <> '' then

HRLabel5.Font.color := clRed;

end;

이런식으로 폰트에 색깔을 주려 하는데 안됩니다.

조건이 맞지 않은것도 빨간색으로 나옵니다/



procedure TForm2.HRLabel5BeforePrint(Sender: THRCustomControl);

begin

if Table1.FieldByName('car3').asstring <> '' then

HRLabel5.Font.color := clRed;

end;

이렇게 주면 다음 data로 넘어가서 색깔을 나타냅니다,

조금이라도 아시면 방법주세요. 급급





0  COMMENTS