<div dir="ltr"><div class="gmail_quote">On Tue, Jan 31, 2012 at 11:19, Sven Barth <span dir="ltr"><<a href="mailto:pascaldragon@googlemail.com">pascaldragon@googlemail.com</a>></span> wrote:<br><blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">

Am 31.01.2012 09:55, schrieb ik:<div><div class="h5"><br>
<blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">
Hello,<br>
<br>
I wish to create something like this:<br>
<br>
function foo(a : String; b : array of const) : string;<br>
begin<br>
   Result := bar([a] + b);<br>
end;<br>
<br>
But this works only on Sets.<br>
The thing is, that A must be before the rest of "b". and it is different<br>
then the b values, that's why I extract it to a different parameter.<br>
<br>
How can I add a to the list, and make it the first element ?<br>
</blockquote>
<br></div></div>
There is no easy way, only the following:<br>
<br>
function foo(a: String; b: array of const): String;<br>
var<br>
  tmp: array of TVarRec;<br>
  i: LongInt;<br>
begin<br>
  SetLength(tmp, Length(b) + 1);<br>
  tmp[0].VType := vtAnsiString; // Note: Only if "foo" is in a unit with {$H+} set (or mode Delphi)<br>
  tmp[0].VAnsiString := Pointer(a);<br>
  for i := 0 to High(b) do<br>
    tmp[i + 1] := b[i];<br>
  Result := bar(tmp);<br>
end;<br>
<br>
Regards,<br>
Sven<br></blockquote><div><br>Thanks, that's what I was afraid of. :)<br><br>Ido<br> </div><blockquote class="gmail_quote" style="margin:0pt 0pt 0pt 0.8ex;border-left:1px solid rgb(204,204,204);padding-left:1ex">
______________________________<u></u>_________________<br>
fpc-pascal maillist  -  <a href="mailto:fpc-pascal@lists.freepascal.org" target="_blank">fpc-pascal@lists.freepascal.<u></u>org</a><br>
<a href="http://lists.freepascal.org/mailman/listinfo/fpc-pascal" target="_blank">http://lists.freepascal.org/<u></u>mailman/listinfo/fpc-pascal</a><br>
</blockquote></div><br></div>