Article View: borland.public.cppbuilder.nativeapi
Article #14172Re: Scroll Bars
From: Rodolfo Frino
Date: Wed, 03 Sep 2003 07:20
Date: Wed, 03 Sep 2003 07:20
28 lines
1772 bytes
1772 bytes
If you don't mind doing it with VCL, then you can use the
TControlScrollBar::IsScrollBarVisible() method.
This example is for a TScrollBar, but the principle is applicable to all
controls that are able to display scroll bars.
void __fastcall TForm1::BitBtn1Click(TObject *Sender)
{
if (ScrollBox1->HorzScrollBar->IsScrollBarVisible())
Label1->Caption = "Horz ScrollBar is Visible";
else
Label1->Caption = "Horz ScrollBar is Not Visible";
if (ScrollBox1->VertScrollBar->IsScrollBarVisible())
Label2->Caption = "Vert ScrollBar is Visible";
else
Label2->Caption = "Vert ScrollBar is Not Visible";
}
Rodolfo
"Gary C" <garyc@gjcsoftware.com> wrote in message
news:3f5524d2$1@newsgroups.borland.com...
> Hi
>
> Is there an API function that I can call to check to see if a scrollbar is
> visible or not?
Technical Details
Message-ID:
<3f55963d$1@newsgroups.borland.com>Path:
arc1-ca.pugleaf.net!archiver1.google.com!news1.google.com!sn-xit-02!sn-xit-03!sn-xit-06!sn-xit-05!sn-xit-08!supernews.com!newsfeed.wirehub.nl!news.kweb.on.ca!KWeb!newsgroups.borland.com!not-for-mailReferences:
<3f5524d2$1@newsgroups.borland.com>Show Full Headers
Complete Article Headers
X-Google-Language: ENGLISH,ASCII-7-bit X-Google-Thread: 10cc67,359104d6b2f9c05a X-Google-Attributes: gid10cc67,public X-Google-ArrivalTime: 2003-09-03 00:32:20 PST From: "Rodolfo Frino" <rodolfofrino@yahoo.com> Newsgroups: borland.public.cppbuilder.nativeapi References: <3f5524d2$1@newsgroups.borland.com> Subject: Re: Scroll Bars Date: Wed, 3 Sep 2003 17:20:59 +1000 Lines: 30 X-Priority: 3 X-MSMail-Priority: Normal X-Newsreader: Microsoft Outlook Express 6.00.2800.1158 X-MimeOLE: Produced By Microsoft MimeOLE V6.00.2800.1165 NNTP-Posting-Host: 203.206.23.69 Message-ID: <3f55963d$1@newsgroups.borland.com> X-Trace: newsgroups.borland.com 1062573629 203.206.23.69 (3 Sep 2003 00:20:29 -0700) Path: arc1-ca.pugleaf.net!archiver1.google.com!news1.google.com!sn-xit-02!sn-xit-03!sn-xit-06!sn-xit-05!sn-xit-08!supernews.com!newsfeed.wirehub.nl!news.kweb.on.ca!KWeb!newsgroups.borland.com!not-for-mail