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
On Sun, 5 Apr 2015, leledumbo wrote:
I tested in Delphi XE, it also crashes. So, yes it is intended behaviour.
It is not desirable, of course. But there is no way the compiler can
decide
whether the 'raise e' statement is correct.
That's bad to know :|
What if you ask Embarcadero first? Pro
> I tested in Delphi XE, it also crashes. So, yes it is intended behaviour.
>
> It is not desirable, of course. But there is no way the compiler can
> decide
> whether the 'raise e' statement is correct.
That's bad to know :|
What if you ask Embarcadero first? Probably they missed the point. I
On Tue, 31 Mar 2015, leledumbo wrote:
Consider the following program:
{$mode objfpc}
uses sysutils;
begin
try
try
raise exception.create('test');
except
on e: exception do begin
e.message := 'tset';
raise e; // correct re-raise should only have raise; no excep
> Is there anybody? (The archive stops on May, 7th ...)
> I am new to the list - so tell me, if this is the wrong place for my
> questions. I wrote a freePascal program under Linux (Free Pascal Compiler
> version 1.0.10 [2003/06/26] for i386), which reads information from serial
> ports and send
> Thank You, Marco, for Your immidiate response!
>> >I wrote a freePascal program under Linux (Free Pascal Compiler
>> > version 1.0.10 [2003/06/26] for i386), which reads information from
>> serial
>> > ports and sends information to serial ports and does some
>> calculations.
>> > There are no po
Thank You, Marco, for Your immidiate response!
> >I wrote a freePascal program under Linux (Free Pascal Compiler
> > version 1.0.10 [2003/06/26] for i386), which reads information from serial
> > ports and sends information to serial ports and does some calculations.
> > There are no pointers, invo