- FQuadric: PGLUquadric;
- ...
- FQuadric := gluNewQuadric;
- ...
- procedure TParticle.PDraw;
- begin
- glPushMatrix;
- gluSphere(Self.FQuadric, Self.FRadius, 50, 50);
- glTranslateF(Self.FPos.X, Self.FPos.Y, Self.FPos.Z);
- glPopMatrix;
- end;
Ball erstellen und bewegenModerator: DGL-Team
|