Динамическое присвоение значения переменной
Динамически создается
q := TQuery.Create(App);
q.SQL.Add('SELECT * FROM TABLE');
q.Open;
и имеется список переменных, находящийся в словаре переменных.
В программе пишу
with frReport.Dictionary do
begin
Variables := 'q.FieldByName(''KONTR'').Value';
.......
end;
и ничего - ошибка! Пробовал и подругому
Variables := 'q.''KONTR'''; и тоже ошибка!
Variables := q.FieldByName(''KONTR'').Value; - если так, то числа передаёт нормально, а строковые данные передает с ошибкой. Например: Если название фирмы ООО "Рога и копыта", то выдает ошибку,что переменная "ООО" не обнаружена!
Подскажите, пожалуйста, что я делаю не так и как нужно правильно?
Заранее спасибо!!!
q := TQuery.Create(App);
q.SQL.Add('SELECT * FROM TABLE');
q.Open;
и имеется список переменных, находящийся в словаре переменных.
В программе пишу
with frReport.Dictionary do
begin
Variables := 'q.FieldByName(''KONTR'').Value';
.......
end;
и ничего - ошибка! Пробовал и подругому
Variables := 'q.''KONTR'''; и тоже ошибка!
Variables := q.FieldByName(''KONTR'').Value; - если так, то числа передаёт нормально, а строковые данные передает с ошибкой. Например: Если название фирмы ООО "Рога и копыта", то выдает ошибку,что переменная "ООО" не обнаружена!
Подскажите, пожалуйста, что я делаю не так и как нужно правильно?
Заранее спасибо!!!
Комментарии
Variables := QuotedStr(q.FieldByName(''KONTR'').Value);