Routine returning multiples of 65536

here's a strange one: I'm using this sort routine from a 3rd party vendor. It's in the form of a DLL...one of its parameters is a LONGINT which returns back to the calling program the final number of sorted records output. I was instructed to put a VAR in front of the parameter when I call this DLL.
  When I call the DLL when sorting a file...it sorts the file correctly, but always returns a crazy number in this recnum count field. And it always seems to be in multiples of 65536! If my input file has less than 65536 records, it'll return 0...if it has between 65536 and 131072, it'll return 65536...weird!
  I tried asking the people who make this sort routine, but they're idiots and they couldn't give me an answer. All they said is that it looks like the low order byte is being taken as the high order byte and so on. But didn't provide a solution. If this is in fact the case, is there a way to flip the bytes around in this longint field to yield the correct answer?

Thanks!
   Shawn Halfpenny
   drumme59@sprint.ca
aztecAsked:
Who is Participating?
 
EmmDiehConnect With a Mentor Commented:
first try a DWORD as a Parameter, then a pointer to a DWORD.
Otherwise swap hi and lo word with something like
swapped := {Highword->Lo}(Res div 65536) +
           {Loword->Hi}(Res mod 65536) * 65536.
this does not work for negative values of course.
method 2:
var
  l: longint;
  r: record r1, r2: word; end absolute l;
  h: Word;
begin
  h := r.r1; r.r1 := r.r2; r.r2 := h;
end;

or method 3:
var
  l: record
     case boolean of
     true : (l: Longint);
     false: (r1, r2: word);
     end;
  h: Word;
begin
  h := l.r1; l.r1 := l.r2; l.r2 := h;
end;

0
 
erajojCommented:
Is your declaration using stdcall as calling convention?

I.e: procedure ExtSort( var cRec: LongInt ); stdcall; // <<<<<<
external 'sort.dll' name 'Sort';

Could be it.

/// John
0
 
pjdbCommented:
do you use 32bit integer and do they use 32bits integer?

JDB
0
Get your problem seen by more experts

Be seen. Boost your question’s priority for more expert views and faster solutions

 
aztecAuthor Commented:
Hi John...
   Nah...tried every type of calling convention...none worked.
And in reply to JDB, I called the sort routine people and they say their sort routine in 32 bit also...I'm stumped!

Shawn
0
 
rickpetCommented:
Can  you give me some return values and what the real value should be???
0
 
aztecAuthor Commented:
Hello EmmDieh...
   Success! Simply declaring that field as a DWORD (instead of Longint) seems to solve the problem! How large a number can a DWORD variable hold? It's a 32-bit field, yes? I would imagine it's a very large value.

Cheers
   Shawn
0
 
EmmDiehCommented:
Yes, a DWORD is a 32bit unsigned integer. Strange enough that
this solves your problem. I would have thought that high
and low word had to be swapped. Guess I'll have to look it
up in the SDK,
0
 
aztecAuthor Commented:
Right on! DWORD works great!

Cheers
   Shawn Halfpenny
0
Question has a verified solution.

Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.

Have a better answer? Share it in a comment.

All Courses

From novice to tech pro — start learning today.