die bisher gepostete Variante malt nur etwas rundes. Einen Button wirklich rund machen kannst du so
Delphi-Quellcode:
var LRgn: HRGN;
begin
LRgn := CreateEllipticRgn(0, 0, Button1.Width, Button1.Height);
SetWindowRgn(Button1.Handle, LRgn, True);
DeleteObject(LRgn);
Anstelle von Button1 kannst du auch jedes anderen WinControl nehmen