Undeclared identifier '___StringHelper'

Comments

• AlexTZ

  October 2004 edited 12:10AM

  Change the fs_iinterpreter.pas:
  
  constructor TfsScript.Create(AOwner: TComponent);
  begin
  inherited;
  FItems := TStringList.Create;
  FItems.Sorted := True;
  FLines := TStringList.Create;
  FStatement := TfsStatement.Create(Self, '', '');
  FSyntaxType := 'PascalScript';
  FUnitLines := TStringList.Create;
  Add('__StringHelper', TfsStringHelper.Create);
  Add('__ArrayHelper', TfsArrayHelper.Create('__ArrayHelper', -1, fvtVariant, ''));
  end;
  
• christian

  October 2004 edited 12:10AM

  Thanks for your anwser.
  I modified the source as you wrote, but now I receive this error in "TfsMethodHelper.GetValue" function:
  "Invalid variant type conversion"
  
  I'm running the same pascal script.
  
  Regards
  Christian
• AlexTZ

  October 2004 edited 12:10AM

  Your script syntax is not valid:
  
  if (Text>'') and (Text[1]) = 'A' then
  
  should be:
  
  if (Text<>'') and (Text[1] = 'A') then