🚀 go-pugleaf

Hi

>   if (qryStatus.FieldByName('oldstatus').AsInteger in
[STATUS_NEW..STATUS_CANCELLED]) then


Are you sure that qryStatus.FieldByName('oldstatus').AsInteger return a
value between 10 and 1000, where 10 and 1000 in included?

I can not see any thing wrong with it?


Something else:

(1)
var
  a: DWORD;
begin
  a := 9;
  if a in [9,20] then
  begin
    beep
  end;
end;


this code will beep, but


(2)

 if 9 in [9,20] then
  begin
    beep
  end;


will not beep?

I know the statement (2) is by default true, so it should make the beep, but
it does not?


if you say
(3)

 if not (9 in [9,20]) then
  begin
    beep
  end;


the compiler ignores the while block of code?


Any ideas?
Regards
Brendan Bosman




















"Stephen Froude" <sfroude@teleplan-uk.c0m> wrote in message
news:3dde1a3b$1@newsgroups.borland.com...
>
> Can anyone tell me why this if statement always return False?
>
>   if (qryStatus.FieldByName('oldstatus').AsInteger in
[STATUS_NEW..STATUS_CANCELLED]) then
>
> where STATUS_NEW & STATUS_CANCELLED are constants declared as
>
> STATUS_NEW: Integer = 100;
> STATUS_CANCELLED: Integer = 1000;
>
> I've descovered that the AsInteger property returns a LongInt so tried
copyying the value into a local Integer variable but it still returns False.
>
> However if I substitute the constants for their values the if statement
returns True.