Как передать в переменную значение с другой формы ?

отредактировано April 2023 Раздел: FastReport VCL

Приветствую всех! Появилась такая нужда, что нужно передать значение в переменную с другой формы из Combobox.Text

Есть две формы, первая как раз с комбобоксом, вторая для вывода отчета. Во второй форме, где находится frxReport в Report --> Variables я создал категорию User_VB и переменную Kvartal, в которую нужно передать значение текста с Combobox. Но вот когда я нажимаю на кнопку для формирования отчета появляется ошибка: "Memo1: Error in expression '1-ый квартал': ';' expected". Пробовал вместо Combobox4.text вписать просто текст, но тоже выдает ошибку. Подскажите пожалуйста, как можно значение передать в отчет ? Ни видео, ни в документации не нашел об этом к сожалению

Код формы с combobox

var
 SelectedValue: TKvartal;
begin
 SelectedValue := TKvartal(ComboBox4.ItemIndex);
 DM.DataKvartal.Close;
 DM.DataKvartal.SQL.Clear;
 case SelectedValue of
   k1:
    DM.DataKvartal.SQL.Add('...');
   k2:
   DM.DataKvartal.SQL.Add('...');
   k3:
    DM.DataKvartal.SQL.Add('...');
   k4:
    DM.DataKvartal.SQL.Add('...');
 end;
 // Execute the query
 DM.DataKvartal.Open;
 Form16.frxReport1.Variables['Kvartal'] := Combobox4.Text;
 Form16.Show;
 Form16.frxReport1.ShowReport();
end;



Комментарии

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

Многофункциональный текстовый редактор. Чтобы отредактировать стиль параграфа, нажмите TAB, чтобы перейти к меню абзаца. Там вы можете выбрать стиль. По умолчанию не выбран ни один стиль. Когда вы выберете текст, появится встроенное меню форматирования. Нажмите TAB, чтобы войти в него. Некоторые элементы, такие как многофункциональные вставки ссылок, картинок, индикаторов загрузки и сообщений об ошибок могут быть вставлены в редактор. Вы можете перемещаться по ним, используя стрелки внутри редактора и удалять с помощью клавиш delete или backspace.