Rund Form

Prøv at søg her på eksperten, det sp. har været her før, med et svar

/Martin

Der findes nogle API kald til dem. I stedet for jeg forklarer en masse her vil jeg opfordere dig til at gå ind på http://borrisholt.com under VCL tricks hvor du skal downloade eksemplet TForm

Jens b

Ganske hurtigt og simpelt...

procedure TForm1.FormCreate(Sender: TObject);
var
  R : HRgn;
  a: integer;
begin
  a:=-25;
  Height:=500;
  Width:=550;
  R := CreateEllipticRgn(-a,-a,Width-45,Height-45);
  SetWindowRgn(Handle,R,True);
end;

MVH abpdk