>  I have a record type object
>   
>  Type
>
>              MyRec = record
>                          Str1: array[0..25] of char;
>                          Str2: array[0..55] of char;
>                          Int: Integer;
>
>                          Str3: array[0..50] of char;
>              End;
>   
>   
>
>   

var
  x :myrec;
  off :integer;

  off := integer(@x.str3) - integer(@x);



---------------------------------------------------------------------------
    New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
                  Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED] 
with body of "unsubscribe delphi"
Web Archive at: http://www.mail-archive.com/delphi%40delphi.org.nz/

Reply via email to