[fpc-pascal] Problem with array of const
Vojtěch Čihák
vojtech.cihak at atlas.cz
Sun Oct 29 01:31:16 CEST 2017
Looking to docs: https://www.freepascal.org/docs-html/ref/refsu69.html
I tried writeln(AnsiString(args[0].VAnsiString));
or just writeln(String(args[0].VAnsiString));
which works.
V.
______________________________________________________________
> Od: Darius Blaszyk <dhkblaszyk at zeelandnet.nl>
> Komu: FPC-Pascal users discussions <fpc-pascal at lists.freepascal.org>
> Datum: 29.10.2017 00:59
> Předmět: [fpc-pascal] Problem with array of const
>
Consider the application below. When I run it I do get the following output:
name
rg��������name�F&{00000000-0000-0000-C000-000000000046}
In other words I lose the first character (a) from the arguments supplied and the string returns with a lot of garbage. What am I doing wrong here?
Rgds, Darius
program test_args;
procedure test(name: string; args: array of const);
begin
writeln(name);
writeln(args[0].VString^);
end;
begin
test('name', ['arg']);
end.
----------
_______________________________________________
fpc-pascal maillist - fpc-pascal at lists.freepascal.org
http://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal <http://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal>
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.freepascal.org/pipermail/fpc-pascal/attachments/20171029/57faecea/attachment.html>
More information about the fpc-pascal
mailing list