🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: borland.public.cppbuilder.nativeapi
Article #14172

Re: Scroll Bars

#14172
From: Rodolfo Frino
Date: Wed, 03 Sep 2003 07:20
28 lines
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-mail
References: <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