Странное поведение при проверке булевой переменной

Lem0ntiLem0nti Санкт-Петербург
отредактировано 08:07 Раздел: FastScript
Есть такой код в обработчике:
procedure MasterData1OnBeforePrint(Sender: TfrxComponent);
begin
  if <frxDBDataset1."Deleted"> then
    frxDBDataset1NameTovar.Font.Style:=frxDBDataset1NameTovar.Font.
        Style+fsStrikeOut
  else                            
    frxDBDataset1NameTovar.Font.Style:=frxDBDataset1NameTovar.Font.
        Style-fsStrikeOut;          
end;
Проблема в том, что текст у меня получается перечёркнутым через строчку, как будто значение поля меняется с тру на фалс и наоботор с каждой записью, но я знаю что это не так. Подскажите, что я не так делаю?

Оставить комментарий