Handel-Zeichnen

[theomega]

was ist den dann daran falsch?

Code:

procedure TForm1.Button1Click(Sender: TObject);
var hd:HDC;
Brush: HBRUSH;
Pen: HPEN;
hd2:HDC;
begin
hd := createdc('Display',nil,nil,nil);
Brush := CreateSolidBrush(RGB(255,0,0));
SelectObject(hd, Brush);
Pen := CreatePen(PS_SOLID, 3, RGB(75,0,255));
SelectObject(hd, Pen);
ellipse(hd,0,0,50,50);

hd2 := getdc(form1.Handle);
BitBlt(hd2,200,200,50,50,hd,0,0,SRCCOPY );

DeleteDC(hd);
end;

warum entsteht aber ein zweiter Kreis in der rechten oberen Ecke meines Bildschirms? Eignetlich müßte ja bloß einer auf meinem Form sein!