Examples Delphi

  1. Home
  2. Delphi
  3. Examples
  4. Create an elliptic window
VAR
h: THandle;
begin
h := CreateEllipticRgn(40, 40, 300, 200);
SetWindowRgn(Handle,h,TRUE);
Well.. that's all !