• Status: Solved
  • Priority: Medium
  • Security: Public
  • Views: 187
  • Last Modified:

Irregular form shapes in Win 95

Does anybody know how to make the main application's form irregularly shaped (just like circular clock for Win 95) in Delphi 2 ?

Thanx, Bocian
0
Bocian
Asked:
Bocian
1 Solution
 
ygolanCommented:
Take a look at the SetWindowRgn API call.

The following code will create an elliptic window (adapted from UNDU issue #17) :

procedure MakeEllipticForm(Form: TForm);
Var
  R: HRgn;
begin
  R := CreateEllipticRgn(-15,-15,Width+15,Height+15);
  SetWindowRgn(Form.Handle,R,True);
end;


0
Question has a verified solution.

Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.

Have a better answer? Share it in a comment.

Join & Write a Comment

Featured Post

Cloud Class® Course: Amazon Web Services - Basic

Are you thinking about creating an Amazon Web Services account for your business? Not sure where to start? In this course you’ll get an overview of the history of AWS and take a tour of their user interface.

Tackle projects and never again get stuck behind a technical roadblock.
Join Now