Re: Add shadow to a form

Article View: borland.public.cppbuilder.nativeapi

Article #9834

Back to borland.public.cppbuilder.nativeapi Previous Next

#9834

From: Mario Sernicola
Date: Thu, 10 Jun 2004 16:42

26 lines
1606 bytes

The right code seems to be

void __fastcall TForm1::Button6Click(TObject *Sender)
{
   const CS_DROPSHADOW = 0x002000;
   SetClassLong(Form1->Handle, GCL_STYLE, GetClassLong(Form1->Handle,
GCL_STYLE) | CS_DROPSHADOW) ;
   SystemParametersInfo(0x1025, true, NULL, 0);
   RecreateWnd();
}
//--------------------------------------------------------------------------
-

Now the problem is that I've executed this function:

...
SystemParametersInfo(0x1025, false, NULL, 0);
...

and now the shadow don't appear even if I reboot my computer!

Someone can help me and solve these issues?

Thanks

Mario Sernicola

Technical Details

Message-ID: <40c88f63$1@newsgroups.borland.com>

Path:

arc1-ca.pugleaf.net!g2news1.google.com!news2.google.com!news.maxwell.syr.edu!newsfeed.frii.net!newsfeed.frii.net!news.compaq.com!newsfeeds.ihug.co.nz!ihug.co.nz!newsgroups.borland.com!not-for-mail

References: <40c6e830@newsgroups.borland.com> <40c84615$1@newsgroups.borland.com>

Show Full Headers

Complete Article Headers

X-Google-Language: ENGLISH,ASCII-7-bit
X-Google-Thread: 10cc67,700c24ec51a7d447
X-Google-Attributes: gid10cc67,public
Reply-To: "Mario Sernicola" <mariosernicola@nospam.libero.it>
From: "Mario Sernicola" <mariosernicola@nospam.libero.it>
Newsgroups: borland.public.cppbuilder.nativeapi
References: <40c6e830@newsgroups.borland.com> <40c84615$1@newsgroups.borland.com>
Subject: Re: Add shadow to a form
Date: Thu, 10 Jun 2004 18:42:16 +0200
Lines: 28
X-Priority: 3
X-MSMail-Priority: Normal
X-Newsreader: Microsoft Outlook Express 6.00.2800.1409
X-MimeOLE: Produced By Microsoft MimeOLE V6.00.2800.1409
NNTP-Posting-Host: 80.181.137.60
Message-ID: <40c88f63$1@newsgroups.borland.com>
X-Trace: newsgroups.borland.com 1086885731 80.181.137.60 (10 Jun 2004 09:42:11 -0700)
Path: arc1-ca.pugleaf.net!g2news1.google.com!news2.google.com!news.maxwell.syr.edu!newsfeed.frii.net!newsfeed.frii.net!news.compaq.com!newsfeeds.ihug.co.nz!ihug.co.nz!newsgroups.borland.com!not-for-mail

Reply to Parent Message