Joaquin Llamas wrote in a message to Trevor Cook:
JL> type pkt=record
JL> orgnode,
JL> destnode,
JL> year,
JL> month,
JL> day,
JL> hour,
JL> min,
JL> sec,
JL> baud,
JL> pktver,
JL> orgnet,
JL> dstnet :integer;
JL> prdcodl,
JL> pvmajor:char;
JL> password:array [1..8] of char;
JL> qorgzone,
JL> qdestzone:integer;
JL> filler:char;
JL> capvalid:integer;
JL> prdcodh,
JL> pvminor:char;
JL> capword,
JL> origzone,
JL> destzone,
JL> origpoint,
JL> destpoint:integer;
JL> proddta: longint;
JL> pktterm:longint;
JL> end;
Trevor,
Remember that in delphi 2 and 3 an Integer is the same as Longint. You
will probably have to replace the occurances of Integer with smallint. Also
unless you turn off Aligned Record Fields you will also have to make this a
Packed Record instead of just a Record. This is of course is any of that
code works to begin with.
Thanks,
Ryan
---
---------------
* Origin: Midnight Express, Fairlawn Ohio (1:157/110)
|