Returning 'strings' from a Function

I am trying to return a string type from a PAC function, however the documentation says it is possible but I am getting Error C120 with the following code when it compiles:-

function SceneSelect : string;
begin
SceneSelect := 'test scene';
end;

if string types cannot be returned from a function can anybody help me with the syntax to return an array of char?


Regards

 

You need to have the string as a "var" parameter. Here is an example which returns a string of characters:

Code:

procedure StringOfChar(n : integer; c: char; var s : String);
var
  i : integer;
begin
  s := '';
  for i := 1 to n do
    Append(s, c);
end;

You can use this like so:

Code:

StringOfChar(5, 'x', s); 
WriteLn('result = ',s); 

Which will display:

result = xxxxx

 

Ideal as an alternative to using Functions.

Thanks for the reply