Значение переменной

Комментарии

• mvb Казань

  August 2007 отредактировано August 2007

  решил сам
  

       if <FIBQuery1."IS_LESS"> = 1 then
        set('_VAR1', '''увеличилась уменьшилась''') else
        set('_VAR1', '''увеличилась уменьшилась''');
  
• mvb Казань

  August 2007 отредактировано August 2007

  новая проблемка в этом же месте: независимо от значения <FIBQuery1."IS_LESS"> всегда выполняется вторая строка. Значение 1 есть точно. Может где-то в другом месте надо инициализировать переменную _VAR1? Пробоал в Memo.AfterData - переменная вообще пустая (то ли датасет закрыт, то ли вообще в обработчик парсер не заглядывает).
  
  код
  

       if <FIBQuery1."IS_LESS"> = 1 then
        set('_VAR1', '''увеличилась [u]уменьшилась[/u]''') else                                            
        set('_VAR1', '''[u]увеличилась[/u] уменьшилась''');
  
• gpi

  August 2007 отредактировано 03:49

  Попробуйте сделать с использованием скриптовой переменной
• mvb Казань

  August 2007 отредактировано 03:49

  gpi написал: »

  Попробуйте сделать с использованием скриптовой переменной

  
  это как? че та не соображу
• gpi

  August 2007 отредактировано August 2007

  var _VAR1: string;
  procedure Memo23OnBeforePrint(Sender: TfrxComponent);
  begin
  if <FIBQuery1."IS_LESS"> = 1 then
    _VAR1:= 'увеличилась [u]уменьшилась[/u]' 
  else
    _VAR1:= '[u]увеличилась[/u] уменьшилась'; 
  end;
  
• mvb Казань

  August 2007 отредактировано 03:49

  так вообще ничего не выводится...
• gpi

  August 2007 отредактировано 03:49

  Можно взглянуть на шаблон отчёта?
• mvb Казань

  August 2007 отредактировано 03:49

  давай мыло
• gpi

  August 2007 отредактировано 03:49

  См. ПМ. Также можно приложить файл к сообщению на форуме
• mvb Казань

  August 2007 отредактировано 03:49

  gpi написал: »

  См. ПМ. Также можно приложить файл к сообщению на форуме

  
  отправил на мыло
• mvb Казань

  August 2007 отредактировано 03:49

  Все, разобрался, <FIBQuery1."IS_LESS"> возвращало булевы значения (true, false), достаточно было убрать сравнение с единицей:
  
  if <FIBQuery1."IS_LESS"> then
  ...............
• mvb Казань

  August 2007 отредактировано 03:49

  это прикол ФИБплюса, для доменов, в имени которых есть "boolean", формируется объект не целого типа, а ftBoolean...
• malor

  July 2008 отредактировано 03:49

  У меня в шаблоне (fr3) отчета есть Memo-поле, у которого в свойствах на закладке Text вписано: [m26t]
  В закладке Code шаблона отчета вписал:

  var   m26t : Double;  
  procedure Memo26OnBeforePrint(Sender: TfrxComponent);
  begin
     m26t := 5;
  //   m26 := <SUM(<ADOTable1.""Оборот ДЗ"">, MasterData1)>;         
    if <SUM(<ADOTable1.""Сумма оплаты"">, MasterData1)> = NULL then  
      m26t := 10                
    else
      m26t : = 7              
    end;  
  end;
  

  При выполнении выскакивает окошечко со словами:
  The following error(s) have occured:
  
  Script error at 9:12: '=' expected
  
  Что делать ?
• Игорь Акопян

  August 2008 отредактировано 03:49

  пробел между : и = ?