Source position: lresources.pp line 483
function CreateLRSWriter(
s: TStream;
var DestroyDriver: Boolean
):TWriter;