FastReport 6 - IIf - не могу победить условие.

[iskurt]

Всем привет.
Как обычно, нужна помощь...
Есть поле в БД rabota (TINYINT(1)) - логическое. Занесены данные, 1 и 0 (Да и Нет)
В fastReport в Memo выводит так же, 1 и 0...
Пробую отрепетировать условие IIf - но на выходе получаю либо все НЕТ, либо вообще пусто... но чаще всего ошибка, ')' Expected
На разных форумах - синтаксис по разному предлагают...
Помогите как правильно написать...
Вот мой пример

[IIf(<frxDBDataset1."rabota">!=1,'yes','no')]

Пробовал с разными вариантами... типа :

[IIf([frxDBDataset1."rabota"]==1,"yes","no")]

Изначально справку взял такую:

6. Примеры использования условного оператора IIF(,,) в дизайнере отчёта.

Приведу формат и парочку примеров, по которым сразу станет ясно использование оператора:

Формат:
[IIf(Condition, True, False)]

Пример 1. Если значение CompleteDate не равен null, тогда выводим текст год, иначе пусто:
[IIf([ActTechnicalEvent.CompleteDate] != null, "год",null)]

Пример 2. Если первая буква имени А, тогда к имени добавляем префикс "*".
[IIf(Length([spt_values.name]) > 1 && UpperCase(Substring([spt_values.name], 0, 1)) == "A", "*" + [spt_values.name], [spt_values.name])]

Внимание! Если у вас ошибка "Error CS0103: The name 'IIF' does not exist in the current context" это из-за того, что название является регистрозависимым, и само имя написано неверно. Следует использовать IIf имя для условного оператора.

[Serge_Bliznykov]

Сообщение от iskurt

Есть поле в БД rabota (TINYINT(1)) - логическое. Занесены данные, 1 и 0 (Да и Нет)

а почему бы в запросе через CASE не получить сразу то, что Вам надо и это поле и выводит в отчёте?

[iskurt]

Сообщение от Serge_Bliznykov

а почему бы в запросе через CASE не получить сразу то, что Вам надо и это поле и выводит в отчёте?

Ув., Сергей, тогда подскажите, у меня на Гриде организованы чекбоксы (ридонли), которые так же формируется всё через тот же запрос и выглядят вот так:
Снимок.PNG

Не помешает ли CASE формированию чекбоксов, если там будет что-то типа НЕТ и ДА?

ну или придется отдельный запрос создавать... чего не хотелось бы

[iskurt]

Всё равно, спасибо, идея оказалась рабочей ;-)

Может кому пригодиться....

  with ADOQuery1 do
  begin
    Close;
    SQL.Clear;
    SQL.Add('SELECT id_contrs, ');
    SQL.Add('CASE rabota WHEN 0 THEN "НЕТ"');
    SQL.Add('WHEN 1 THEN "ДА" END AS rab, ');
    SQL.Add('CONCAT(kod_ifns,'' '', ifns) AS ifn, systemnalogs.sysnalog, comm FROM contrs');
    SQL.Add('LEFT JOIN ifnses ON (id_ifnses = id_ifns)');
    SQL.Add('LEFT JOIN systemnalogs ON (id_sysnalogs = id_sysnalog)');
    SQL.Add('ORDER BY contr');
    Open;
  end;

А прорисовку сделал вот так:

procedure TFContrs.sDBGrid1DrawColumnCell(Sender: TObject; const Rect: TRect;
  DataCol: Integer; Column: TColumn; State: TGridDrawState);
var
  style: Integer;
begin

  if (Column.FieldName = 'rab') then
  begin
    if (Column.Field.Value = 'ДА') then 
      style := DFCS_CHECKED
    Else
      style := DFCS_BUTTONCHECK;

    DrawFrameControl(TsDBGrid(Sender).Canvas.Handle, Rect, DFC_BUTTON, style)
  end;

end;

[Serge_Bliznykov]

Сообщение от iskurt

А прорисовку сделал вот так:

ну, так тоже можно.
но, вообще-то, я вариант проще предлагал - в гриде отображать поле RABOTA (раз в гриде с ним всё хорошо), а в отчёте использовать поле RAB (текст, полученный через CASE).
Но раз устраивает, то можно и так.

Ну и в FastReport тоже можно эту проблему решить (там, насколько я помню, есть разные варианты, вплоть до использования своей функции, которая описывается в коде и её можно использовать в отчёте).