encontre este truco buscando por el foro.
Saludos. El truco es bastante sencillo, pero lo voy a explicar con pelos y señales. Para darle forma a un form, se puede usar fotografías con un color "especial" y darle forma. El color "especial" es
TransparentColor del form, y la opción
Transparent tiene que estar en True. Si pones que TransparentColor sea Rojo, y pones que el formulario sea de color rojo (y activas Transparent), no tendrás formulario. Entonces si
cojes una fotografía, pintas un circulo azul, y al rededor
de color rojo, pones
TransparentColor=ClRed, pones la fotografía que ocupe todo el form, y quitas el borde
(BorderStyle=BSNone) tendrás un form azul y redondo
.
he encontrado un problema con este truco y es que agregue un checkbox al formulario con este codigo:
Código Delphi
[-]procedure TFrm_Login.CBCambiarClaveClick(Sender: TObject);
var
i: integer;
begin
if CBCambiarClave.checked= true then begin
for i:=358 to 595 do
height:=i;
exit;
end
else
if CBCambiarClave.checked = false then
for i:=595 downto 358 do
height:=i;
end;
el problema esta que hasta que no se termine el for el formulario no aparece y solo se ven los componentes! si pudiera alguno de ustedes ser tan amable y ayudarme a resolver este problemita, gracias por adelantado