Solved

i want make form in Circle

Posted on 1998-12-02
4
153 Views
Last Modified: 2010-04-04
i want make form in circle or other form, not rectangle (Ex Norton Crash Guard)
0
Comment
Question by:jamiguel
[X]
Welcome to Experts Exchange

Add your voice to the tech community where 5M+ people just like you are talking about what matters.

  • Help others & share knowledge
  • Earn cash & points
  • Learn & ask questions
  • 2
4 Comments
 
LVL 27

Expert Comment

by:kretzschmar
ID: 1348962
hi  jamiguel,

look at CoolForm on
Delphi Super Page
or
Torry Pages

other Experts can give the URL
(i haven't it on this PC)

meikl
0
 

Accepted Solution

by:
guntherDS earned 0 total points
ID: 1348963
Here's a tip: more than one year ago there were some articles in 'The Delphi Magazine' about this topic, maybe you can find some useful information in that article (Issue 25, September 1997).
The complete code for this topic can be found on the site: www.itecuk.com

0
 
LVL 4

Expert Comment

by:erajoj
ID: 1348964
It's very, very easy:

procedure TMainForm.FormCreate(Sender: TObject);
var
  Region : hrgn;
begin
  Region := CreateEllipticRgn(0, 0, ClientWidth, ClientHeight);
  SetWindowRgn(Handle, Region, True);
end;

That's it.

/// John
0
 
LVL 4

Expert Comment

by:erajoj
ID: 1348965
Did the answer really help you?
I searched the "www.itecuk.com"-site and didn't find any source code at all!?
Just making sure you get what you came for...

/// John

0

Featured Post

Free Tool: ZipGrep

ZipGrep is a utility that can list and search zip (.war, .ear, .jar, etc) archives for text patterns, without the need to extract the archive's contents.

One of a set of tools we're offering as a way to say thank you for being a part of the community.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Suggested Solutions

The uses clause is one of those things that just tends to grow and grow. Most of the time this is in the main form, as it's from this form that all others are called. If you have a big application (including many forms), the uses clause in the in…
Have you ever had your Delphi form/application just hanging while waiting for data to load? This is the article to read if you want to learn some things about adding threads for data loading in the background. First, I'll setup a general applica…
Nobody understands Phishing better than an anti-spam company. That’s why we are providing Phishing Awareness Training to our customers. According to a report by Verizon, only 3% of targeted users report malicious emails to management. With compan…
Exchange organizations may use the Journaling Agent of the Transport Service to archive messages going through Exchange. However, if the Transport Service is integrated with some email content management application (such as an antispam), the admini…

752 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question