NumLock, ну не издевайся так откровенно над новичком
who, в помощь тебе придёт свойство формы (или другого объекта, например, TImage) Canvas (хороший ман
тут). Скорее всего, тебе понадобятся свойства Pen и Brush, а так же методы MoveTo, LineTo и Ellipse.