equal
deleted
inserted
replaced
840 |
840 |
841 if topy < ViewBottomY then |
841 if topy < ViewBottomY then |
842 begin |
842 begin |
843 VertexBuffer[0].X:= lx; |
843 VertexBuffer[0].X:= lx; |
844 VertexBuffer[0].Y:= topy; |
844 VertexBuffer[0].Y:= topy; |
845 VertexBuffer[1].X:= RightX; |
845 VertexBuffer[1].X:= rx; |
846 VertexBuffer[1].Y:= topy; |
846 VertexBuffer[1].Y:= topy; |
847 VertexBuffer[2].X:= ViewRightX; |
847 VertexBuffer[2].X:= ViewRightX; |
848 VertexBuffer[2].Y:= ViewBottomY; |
848 VertexBuffer[2].Y:= ViewBottomY; |
849 VertexBuffer[3].X:= ViewLeftX; |
849 VertexBuffer[3].X:= ViewLeftX; |
850 VertexBuffer[3].Y:= ViewBottomY; |
850 VertexBuffer[3].Y:= ViewBottomY; |