Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss

form without caption

0 views
Skip to first unread message

Schau

unread,
Feb 11, 1999, 3:00:00 AM2/11/99
to
I need a form without caption, so that I can use the complete client
area. How can I do it?


bogdan

unread,
Feb 11, 1999, 3:00:00 AM2/11/99
to
Hi,

You must set the borderstyle form property at bsnone

Regards,
Bogdan

Schau <hs...@cy910e.tuev-mannheim.de> wrote in article
<36C2A2D1...@cy910e.tuev-mannheim.de>...

Martin Plücker

unread,
Feb 17, 1999, 3:00:00 AM2/17/99
to Schau
Try the following code:

procedure TForm1.FormCreate(Sender: TObject);
begin
SetWindowLong(Handle,GWL_Style, GetWindowLong(Handle,GWL_Style) and
not WS_Caption)
ClientHeight:=Height;
Refresh;
end;

Schau wrote:

> I need a form without caption, so that I can use the complete client
> area. How can I do it?

--
Martin Plücker
MAPLe-Soft

Home : Http://www.maple.soft-ware.de
E-Mail: MAPLE...@GMX.de

Martin Plücker

unread,
Feb 17, 1999, 3:00:00 AM2/17/99
to Schau

Elliott

unread,
Feb 17, 1999, 3:00:00 AM2/17/99
to

> Schau wrote:
>
> I need a form without caption, so that I can use the complete client
> area. How can I do it?


I presume you stil want borders so you can resize the form, and also be able
to drag the form around the screen. Otherwise, you wouldn't have asked the
question: a borderless form would do the job.

Follow this URL to the Ask the Delphi Pro site, where there's a complete
discussion on this matter. I used this advice myself.

http://www.inquiry.com/scripts/frmqadocument.asp?pro=delphi_pro&docid=649

Elliott

"I don't want to achieve immortality through my work. I want to achieve
it by not dying."

Elliott

"I don't want to achieve immortality through my work. I want to achieve
it by not dying."

-----------== Posted via Deja News, The Discussion Network ==----------
http://www.dejanews.com/ Search, Read, Discuss, or Start Your Own

0 new messages