Unit mselinetria

Uses

Constants

Variables

Description

Name	Description
Record `lineshiftvectorty`
Record `lineshiftinfoty`

function linestria(var drawinfo: drawinfoty; out apoints: ppointty; out apointcount: integer): boolean;

procedure linesegmentstria(var drawinfo: drawinfoty; out atriangles: ptrianglety; out atrianglecount: integer);

procedure updatestarttria(var drawinfo: drawinfoty; var li: lineshiftinfoty);

procedure updatestartstrip(var drawinfo: drawinfoty; var li: lineshiftinfoty);

procedure updateendtria(var drawinfo: drawinfoty; var li: lineshiftinfoty);

procedure updateendstrip(var drawinfo: drawinfoty; var li: lineshiftinfoty);

plineshiftinfoty = ˆlineshiftinfoty;