if then else sentence
Hedley
Peru
hello :
i have a field with EXO value
but after this procedure, the text is always red , why ???? whats wrong in the if then else sentence
thanks
hedley
procedure alum1sAS2VOnBeforePrint(Sender: TfrxComponent);
begin
IF (<alumLs."AST2V">) = 'EX0' THEN
alum1sAS2V.font.color := clBlack
ELSE
IF <alumLs."AS2V"> < <profls."NOTAMIN"> THEN
alum1sAS2V.font.color := clRed
ELSE
alum1sAS2V.font.color := clBlack
end;
i have a field with EXO value
but after this procedure, the text is always red , why ???? whats wrong in the if then else sentence
thanks
hedley
procedure alum1sAS2VOnBeforePrint(Sender: TfrxComponent);
begin
IF (<alumLs."AST2V">) = 'EX0' THEN
alum1sAS2V.font.color := clBlack
ELSE
IF <alumLs."AS2V"> < <profls."NOTAMIN"> THEN
alum1sAS2V.font.color := clRed
ELSE
alum1sAS2V.font.color := clBlack
end;
Comments
the best bet is to change font.color in obp of band and reset it in oap of object or band.