22 respuestas en este tema

[escafandra]

He esperado a tener algo de tiempo para escribir un pequeño componente que he denominado TRoundEdit que derivado de la clase TEdit se muestra con las esquinas redondas con un radio y borde de color seleccionables.

Lo he colocado en el foro de Controles: TRoundEdit.

Espero que sea de utilidad y que se se asemeje a lo que busca romfrost13


Saludos.

[egostar]

He esperado a tener algo de tiempo para escribir un pequeño componente que he denominado TRoundEdit que derivado de la clase TEdit se muestra con las esquinas redondas con un radio y borde de color seleccionables.

Lo he colocado en el foro de Controles: TRoundEdit.

Espero que sea de utilidad y que se se asemeje a lo que busca romfrost13

Saludos.

Yo creo que no puede encontrar un componente mejor que ese amigo, muy bueno

Salud OS

[genyus00]

TadvSmoothcontrol... puede ser tu solucion...

por otro lado.. hablando de controles con esquinas redondeadas.

delphi

procedure TFrmMedios.FormaRedonda(Forma: TFrmMedios;v1:integer);
var rect  : TRect;
rgn   : HRGN;
begin
rect := Forma.ClientRect;
rgn := CreateRoundRectRgn(rect.Left,rect.top,rect.right,rect.bottom, (-4*v1), (-4*v1));
Forma.BorderStyle := bsNone;
Forma.Perform(EM_GETRECT, 0, lparam(@rect));
InflateRect(rect, v1, v1);
Forma.Perform(EM_SETRECTNP, 0, lparam(@rect));
SetWindowRgn(Forma.Handle, rgn, true);
end;

utilizo la anterior funcion que en algun lugar me encontre para redondear en mi caso los bordes de un formulario, la pregunta es, como desactivo el efecto de redondeo aplicado.. pregunto por que actualmente uso una forma con bordes redondeados usando el codigo del ejemplo, pero en tiempo de ejecucion yo cambio el estilo del donde de la forma a [bssizeable] y cuando voy a modificar el tamaño de la forma, la forma solo crece hasta el tamaño maximo (alto,ancho) el cual tenia al momento de aplicar redondear. ya probe sin aplicar el efecto y si puedo ampliar el tamaño del formulario a mi gusto, sin limites, la idea es tener un boton al cual le diga redondea esquinas, y quita redondeo de esquinas, y al quitar el redondeo.