jo das funzt net:
Code:
procedure TForm1.FormCreate(Sender: TObject);
var
CLFRgn: HRgn;
begin
CLFRgn := CreateEllipticRgn(0, 0, Form1.Width, Form1.Height);
SetWindowRgn(Form1.Handle, CLFRgn, True);
end;
sagt er mir "Undefinierter Bezeichner: '
Handle'"
wie Christian Seehase schon gesagt hat. da muss es doch noch ne andere möglichkeit geben. in der hilfe steht nichts dazu.
