************************************************ FUNCTION NumToDword ************************************************ * Author............: Ed Rauh * : From clsHeap.prg found on the UT. *) Description.......: Creates a C LONG (signed 32-bit) 4 byte string *) : from a number. *) : For full description see clsHeap.prg * Calling Samples...: * Parameter List....: tnNum - Number to convert. * Major change list.: *-------------------------------------------------------------------------------------------------- LPARAMETER tnNum DECLARE RtlMoveMemory IN WIN32API AS RtlCopyLong ; STRING @pDestString, ; INTEGER @pVoidSource, ; INTEGER nLength LOCAL cString cString = SPACE(4) =RtlCopyLong(@cString, BITOR(tnNum,0), 4) RETURN cString *-- EOF NumToDword --------------------------------------------------------------------------------HTH