uses GraphWPF; begin Pen.Width := 1; Rectangle(0,0,Window.Width-1,Window.Height-1); Ellipse((Window.Width-1)/2,(Window.Height-1)/2,(Window.Width-1)/2,(Window.Height-1)/2); end.