Данные с формы в переменную (FR3.21, Builder 6)

aseroff

При передаче данных с формы (ListBox) в переменную в обработчике кнопки в следущем виде:

Set ("SomeVar", m_pSomeList.Items[m_pSomeList.ItemIndex]);

на форме отчета вываливается ошибка.


"The following error(s) have occured:
Memo17: Error in expression 'ООО "ЧТО-ТО"': ';' expected"


Что это и как это побороть?

gpi

Есть подозрение, что виноваты в этом кавычки 'ООО "ЧТО-ТО"'
Попробуйте использовать скриптовые переменные. При их использовании проблем со строковыми значениями не возникает

aseroff

Если передавать значение в String, потом - в Memo1.Memo.Text, то все нормально.
Но в моей задаче это очень неудобно.

Возможно ли организовать данную операцию через Variables или что-либо подобное?

gpi

Используйте frxReport1.Script.Variables

aseroff

А где онные переменные надо объявлять?
И какова область их видимости?

gpi

При использовании frxReport1.Script.Variables их даже объявлять не нужно.
Переменные глобальные для скрипта

aseroff

Проблема была в кавычках!
В скриптовых переменных String все работает нормально, но при попытке передачи в Variables вылезала таже ошибка.

Кому интересно:
Для того, чтобы передать строковую скриптовую переменную (вида: ООО "Что-то" ) в Variables надо ее добить кавычками вначале и в конце и заменить внутренние кавычки на \" - (слеш+двойная кавычка) для C++Script и '' (две одинарных кавычки) для PascalScript.

Код функции, которая это выполняет (C++Script)

String ReplaceQuote (String sText)
{
  String sRes = "";
  for (int i = 1; i <= Length(sText); i++)
  {
    if (sText[i] == "\"")
      sRes = sRes + "\\\"";
    else
      sRes = sRes + sText[i];
  }
  return ("\"" + sRes + "\"");
}

Получится строка "ООО \"Что-то\"", ее можно свободно передавать в Veriables!