[r66]: / branches / timvh / library / FB_XmlControl / ReadFile / svnobj  Maximize  Restore  History

Download this file

12 lines (11 with data), 3.9 kB 

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
(* should have valid pointer to buffer *)
// check if buffer is correctly set
IF Buffer.pStrBuf = 0 OR Buffer.BufferSize = 0 THEN
    ReadFile := E_XmlError.ErrorNoBufferSet;
    RETURN;
END_IF
// open file
        // Everytime the next offset is added to the total offset to read the file in multiple steps.
        iFileOffset := iFileOffset + udiNextOffset;
        File.SetPos(TO___XWORD(iFileOffset));
	END_IF