Source position: textstrings.pas line 44
type TTextLineRange = record
StartPos: Integer;
EndPos: Integer;
Line: String;
TheObject: TObject;
end;