I've found the problem... !
if the record is
Myrecord=record
MyInteger:integer;
Mystring:string;
end;
compiled with c:\lazarus\pp\bin\i386-bin\ppc386 without any other parameter,
sizeof(Myrecord.Myinteger) shows 2.
compiled inside Lazarus sizeof(Myrecord.Myinteger) shows 4 !
Because of this, Mystring is readed wrong from the file.
I think this is a trivial problem, but I don't know how to force MyInteger to
be 2 bytes long inside and outside Lazarus... Or 4 bytes long ?
Thanks !
>
> Inpromptu wrote:
> [...]
> >
> >
> >> Are you sure that exactly the same definition of TSomeType is
> >> used when you compile GUI and console version of your program ?
> >> Maybe some structures are aligned differently when you compile
> >> GUI and console version of your program ? Are you sure that the
> >> unit where TSomeType type is declared is always compiled in the
> >> same FPC $mode ? Maybe you use "string" inside your TSomeType
> >> and sometimes it's understood as "ShortString" and sometimes as
> >> "AnsiString" ?
> >>
> >
> >
> > This seems to be the problem. Is there any way to stop the
> > compilation of the non-delphi part, to avoid string problem ? Is
> > there anyway to force ShortStrings in the console app ?.
> >
>
> You can always just write "ShortString" instead of writing
> "string", then you know that you're for sure using ShortStrings.
> Also, you can use compiler directive {$H-} to say that "string"
> should mean "ShortString". {$H+} means that "string" is
> "AnsiString". The default state of $H depends on FPC $mode that you
> use.
>
> Note that ShortString length is limited to 255 characters. Usually
> you shouldn't use ShortString at all in new programs, unless you're
> really sure that your data will always fit within these 255
> characters.
>
> However, storing AnsiStrings in a file cannot be done using Pascal
> typed files (because AnsiString is a special pointer, so you can't
> simply read/write it to a file). So if it sounds like you don't
> want to actually use ShortString, you may want to drop using typed
> files.
>
> Michalis
>
> _______________________________________________
> fpc-pascal maillist - fpc-pascal@lists.freepascal.org
> http://lists.freepascal.org/mailman/listinfo/fpc-pascal
--
_______________________________________________
Surf the Web in a faster, safer and easier way:
Download Opera 8 at http://www.opera.com
_______________________________________________
fpc-pascal maillist - fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/mailman/listinfo/fpc-pascal
