Wie kann ich auf einem Panel eine Grafik, z.B. einen Kreis zeichnen.
Mit canvas erscheint der Kreis unter dem Panel, also auf der Grundform.
Wenn ich auf dem Panel eine Paintbox anlege und mit diesem canvas zeichne, klappt es auch nicht. Dei Graphik blitzt kurz auf und ist wieder weg.
Hallo,
am einfachsten per Paintbox oder anstatt Paintbox mit irgendeinem Objekt, bei dem Du Zugriff auf Canvas hast.
Paintbox auf Panel und los:
procedure TForm1.Button1Click(Sender: TObject);
begin
with Paintbox.Canvas do
begin
Brush.Color:=clRed;
Fillrect(Paintbox1.Clientrect);
end;
end;
Klappt hervorragend.
Gruss und viel Erfolg
RQ