equal
deleted
inserted
replaced
759 glMatrixMode(GL_MODELVIEW); |
759 glMatrixMode(GL_MODELVIEW); |
760 end; |
760 end; |
761 |
761 |
762 procedure SetScale(f: GLfloat); |
762 procedure SetScale(f: GLfloat); |
763 begin |
763 begin |
764 if cScaleFactor <> f then |
764 // This lazy update conflicts with R7103 at the moment, missing the initial SetScale(2.0) |
765 begin |
765 //if cScaleFactor <> f then |
|
766 //begin |
766 cScaleFactor:=f; |
767 cScaleFactor:=f; |
767 UpdateProjection; |
768 UpdateProjection; |
768 end; |
769 //end; |
769 end; |
770 end; |
770 |
771 |
771 //////////////////////////////////////////////////////////////////////////////// |
772 //////////////////////////////////////////////////////////////////////////////// |
772 procedure AddProgress; |
773 procedure AddProgress; |
773 var r: TSDL_Rect; |
774 var r: TSDL_Rect; |