Umstieg von QuickReport auf FastReport

[mytbo]

Zitat von harfes:

Was mach ich falsch?

Delphi-Quellcode:

function PrepareVariableValue(const pmcValue: Variant): Variant;
begin
  case VarType(pmcValue) of
    varOleStr, varString, varUString:
      Result := QuotedStr(VarToStr(pmcValue));
    else
      Result := pmcValue;
  end;
end;

procedure ...AddVariable(const pmcCategory, pmcVariableName: String; const pmcValue: Variant);
begin
  Report.Variables.AddVariable(pmcCategory, pmcVariableName, PrepareVariableValue(pmcValue));
end;

AddVariable('Kategorie01', 'Test03', 'Thomas');

Bis bald...
Thomas