[[Caral]]

Hola
Tiene un mejor efecto asi:

Código Delphi [-]
rgn := CreateRoundRectRgn(R.Left, R.Top, R.Right, R.Bottom, 7, 7);

y sin esto:

Código Delphi [-]
Edit1.BorderStyle := bsNone;

De todos modos me gusta mas con el shape.
Saludos