boolean evaluation error

[Jo]

I’ve ported a delphi app (without the gui) to wince and it runs ok on the emulator. However, I get strange boolean evaluation, always getting ‘false’. Is this known issue or a compiler switch?

[Marc]

Do you have sample code ?

[Jo]

This is a sample of a record:

TSRec=record
   ID:integer;
   Name:string[150];
   Tp:shortint
   kat:byte
   rem:string[10];
   Admin,IsFromUser:boolean;
   Place:string[100];
   ....
 end;        

And this is how the file is loaded:

  assignfile(f,Fname);
  {$I-} reset(f); {$I+}
  if IOResult<>0 then exit;
  seek(f,HeadJump-1050+HJ2-545);
  MultiList.SetCapacity(filesize(f) div sizeof(SymptRec));
 
  while not eof(f) do
  begin
    read(f,SymptRec);
    //if SymptRec.Admin then
    MultiList.Add([SymptRec.Name],SymptRec.ID,SymptRec.kat],[SymptRec.Admin,SymptRec.IsFromUser]);
  end;
 
  closefile(f);    
                     

When the file is loaded in lazarus/win32 everything works fine, but when I use the wince all records show “Admin=0” although the file contain records with various values. All other parts seem to function correctly.

[Bart]

A wild guess.
Could it have anything to do with the alignment of the data in your records?

If you store it like this, and change platform, alignement may differ. I'm not even sure that SizeOf(Integer) is always the same under different OS's.

Try to use a packed record (first write the file with packed records under win32) and see what you get?

Bart

[Jo]

I had the same thought and change the delphi compiler alignment but it didn't work out. I will try your idea with the packed record option.

[Marc]

since other values are OK, I don't think it has something to do with aligning (and iirc aling rules for fpc are the same for every platform)
Who is writing the booleans and what (integer) value do they have ?

There is a difference between a C boolean and a pascal boolean. In C anything <> 0 is equal to true, where in pascal it depends on implementation what the value of true is.

[Jo]

The files originated from D2007 and they have a value of -1 or 0. When reading the file on wince I get 0 for all records.

[Marc]

didn't notice before, but are the values in the Place member OK ? since you're not using them in your example

[Jo]

As you've suggested this post will continue in the pda forum. Thanks.