Re: [fpc-pascal] Function to set high and low Dword of a QWord

2007-02-28 Thread Florian Klaempfl
Jonas Maebe schrieb: > > On 28 feb 2007, at 18:06, Florian Klaempfl wrote: > >> Jonas Maebe schrieb: >>> >>> function makeqword(d1, d2: dword): qword; >>> begin >>> result:=(qword(d2) shl 32) or d1; >>> end; >> >> Cleaner imo: >> >> lo(result):=d1; >> hi(result):=d2; > > I think this is a lot

Re: [fpc-pascal] Function to set high and low Dword of a QWord

2007-02-28 Thread Jonas Maebe
On 28 feb 2007, at 18:06, Florian Klaempfl wrote: Jonas Maebe schrieb: function makeqword(d1, d2: dword): qword; begin result:=(qword(d2) shl 32) or d1; end; Cleaner imo: lo(result):=d1; hi(result):=d2; I think this is a lot less clean (if only because lo/hi have different meanings i

Re: [fpc-pascal] Function to set high and low Dword of a QWord

2007-02-28 Thread Florian Klaempfl
Jonas Maebe schrieb: > > On 28 feb 2007, at 17:51, Luiz Americo Pereira Camara wrote: > >> I'm looking to a function that will take two DWord as arguments and >> and returns a Qword where the low 4 bytes are the first DWord and the >> High 4 bytes the second DWord. > > function makeqword(d1, d2

Re: [fpc-pascal] Function to set high and low Dword of a QWord

2007-02-28 Thread Luiz Americo Pereira Camara
Jonas Maebe wrote: On 28 feb 2007, at 17:51, Luiz Americo Pereira Camara wrote: I'm looking to a function that will take two DWord as arguments and and returns a Qword where the low 4 bytes are the first DWord and the High 4 bytes the second DWord. function makeqword(d1, d2: dword): qword;

[fpc-pascal] Function to set high and low Dword of a QWord

2007-02-28 Thread Luiz Americo Pereira Camara
Hi, I'm looking to a function that will take two DWord as arguments and and returns a Qword where the low 4 bytes are the first DWord and the High 4 bytes the second DWord. Something like MakeLong of win unit. BTW TQWordRec = record D1: Dword; D2: DWord; end; TQWordRec will have the

Re: [fpc-pascal] Function to set high and low Dword of a QWord

2007-02-28 Thread Jonas Maebe
On 28 feb 2007, at 17:51, Luiz Americo Pereira Camara wrote: I'm looking to a function that will take two DWord as arguments and and returns a Qword where the low 4 bytes are the first DWord and the High 4 bytes the second DWord. function makeqword(d1, d2: dword): qword; begin result:=(

[fpc-pascal] Function to set high and low Dword of a QWord

2007-02-28 Thread Luiz Americo Pereira Camara
Hi, I'm looking to a function that will take two DWord as arguments and and returns a Qword where the low 4 bytes are the first DWord and the High 4 bytes the second DWord. Something like MakeLong of win unit. BTW TQWordRec = record D1: Dword; D2: DWord; end; TQWordRec will have t