Am 13.08.2015 22:17 schrieb "Michael Van Canneyt" :
>> if (i=0) then begin
>>writeln ('node was empty / non existant');
>>exit;
>> end;
>> for c:=0 to i do
>> writeln (node[c]);// line 85
>
>
> This should be
>
> for c:=0 to i-1 do
>
> writeln (node[c]);// line 85
O
On 13 Aug 2015 10:15 PM, "Chris Moody" wrote:
>
> Hi all,
>
> I have this procedure in my program:
>
> procedure DisplayNode (var node:astring);
> var c, i:integer;
> begin
> i:=SizeOf(node);
> if (i=0) then begin
> writeln ('node was empty / non existant');
> exit;
> end;
> for c:
On Thu, 13 Aug 2015, Chris Moody wrote:
Hi all,
I have this procedure in my program:
procedure DisplayNode (var node:astring);
var c, i:integer;
begin
i:=SizeOf(node);
This should be length(node)
if (i=0) then begin
writeln ('node was empty / non existant');
exit;
end;
for c:=0
Hi all,
I have this procedure in my program:
procedure DisplayNode (var node:astring);
var c, i:integer;
begin
i:=SizeOf(node);
if (i=0) then begin
writeln ('node was empty / non existant');
exit;
end;
for c:=0 to i do
writeln (node[c]);// line 85
end;
astring is an Ar
On Wed, 12 Aug 2015, Chris Moody wrote:
___
Hi Michael,
Thanks or the feedback. Just to make sure I'm understanding this, here is
some more information, part of the JSON feed I'm working with will look like
this:
"add":["URL1","URL2","URL3"]
