[MAXIUM]

Usando PutPixel

Image.Canvas.Pixels[Pto.X, Pto.Y] := Color;

Aunque tampoco sé que clase de imagen quieres dibujar. Si lineas entre puntos o solo los puntos.