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

hikiasi

Приветствую всех! Появилась такая нужда, что нужно передать значение в переменную с другой формы из 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;

    

        
            
        
    

Stalker4

Hi,

Попробуйте так:

Form16.frxReport1.Variables['Kvartal'] := CHR(39)+Combobox4.Text+CHR(39);

hikiasi

https://forum.fast-report.com/ru/discussion/comment/37354#Comment_37354

Действительно сработало! Спасибо большое!!!🤗