c语言添加滚动条,帮帮我呀，使用滚动条设置颜色

淩亂°似流年 2022-10-15 00:40 32阅读 0赞

老是说我没有定义labelR,labelB,labelG,怎么回事呀？

高手帮帮忙，谢谢

//—————————————————————————

\#include

\#pragma hdrstop

\#include “Unit1.h”

//—————————————————————————

\#pragma package(smart\_init)

\#pragma resource “\*.dfm”

TForm1 \*Form1;

//—————————————————————————

\_\_fastcall TForm1::TForm1(TComponent\* Owner)

: TForm(Owner)

\{

\}

//—————————————————————————

void \_\_fastcall TForm1::ScrollBarRChange(TObject \*Sender)

\{

LabelR->Caption=IntToStr(ScrollBarR->Position);

Shape1->Brush->Color=RGB(ScrollBarR->Position,

ScrollBarG->Position,ScrollBarB->Position);

\}

//—————————————————————————

void \_\_fastcall TForm1::ScrollBarBChange(TObject \*Sender)

\{

LabelB->Caption=IntToStr(ScrollBarB->Position)  ;

Shape1->Brush->Color=RGB(ScrollBarR->Position,

ScrollBarG->Position,ScrollBarB->Position);

\}

//—————————————————————————

void \_\_fastcall TForm1::ScrollBarGhange(TObject \*Sender)

\{

LabelG->Caption=IntToStr(ScrollBarY->Position)  ;

Shape1->Brush->Color=RGB(ScrollBarR->Position,

ScrollBarG->Position,ScrollBarB->Position);

\}

//—————————————————————————

void \_\_fastcall TForm1::Button1Click(TObject \*Sender)

\{

Timer->Enable=true;

\}

//—————————————————————————

void \_\_fastcall TForm1::Button2Click(TObject \*Sender)

\{

Timer->Enable=false;

\}

//—————————————————————————

void \_\_fastcall TForm1::Button3Click(TObject \*Sender)

\{

Form1=close();

\}

//—————————————————————————

void \_\_fastcall TForm1::Timer1Timer(TObject \*Sender)

\{

randomsize();

ScrollBarR->Position=rand()%256;

ScrollBarY->Position=rand()%256;

ScrollBarB->Position=rand()%256;

Shape1->Brush->Color=RGB(ScrollBarR->Position,

ScrollBarY->Position,ScrollBarB->Position);

\}

发表评论取消回复

表情：

评论列表（有 0 条评论，32人围观）

还没有评论，来说两句吧...

相关阅读

相关设置滚动条

横向竖向滚动条都有：style="overflow: scroll;" 只显示横向滚动条：style="overflow-x: scroll;" 只显示竖向滚动条：styl

雨点打透心脏的1/2处/ 2023年07月24日 09:19/ 0 赞/ 43 阅读

相关 c语言添加滚动条,帮帮我呀，使用滚动条设置颜色

老是说我没有定义labelR,labelB,labelG,怎么回事呀？高手帮帮忙，谢谢 //————————————————————————— \include \p

淩亂°似流年/ 2022年10月15日 00:40/ 0 赞/ 33 阅读

相关 div 滚动条同步控制 div 滚动条滚动

<html> <head> <title>div scroll</title> <mce:style type="text/css"><!-- DIV \{width:200;

系统管理员/ 2022年07月13日 11:17/ 0 赞/ 353 阅读

相关 bootstrap列表添加滚动条

有时候列表中数据过多，导致超出页面，影响视觉感受。这时我们需要添加一个滚动条。初始状态如图： ![Center][] 代码如下： <ul class="

心已赠人/ 2022年06月15日 02:08/ 0 赞/ 825 阅读

相关 Vue封装滚动条组件(可自定义滚动滚动条速率、颜色等)

<template> <div class="v-scroll-bar" @wheel.pre

不念不忘少年蓝@/ 2022年05月13日 12:16/ 0 赞/ 890 阅读

相关 echarts设置图表滚动条设置滚动条高度

在option配置项中设置dataZoom属性即可，height即可指定滚动条的高度，这里我就设置14。 dataZoom: [

￡神魔★判官ぃ/ 2022年03月12日 10:50/ 0 赞/ 1377 阅读

相关 textarea设置滚动条

[http://www.divcss5.com/html/h50395.shtml][http_www.divcss5.com_html_h50395.shtml] [ht

╰+攻爆jí腚メ/ 2021年11月09日 05:58/ 0 赞/ 523 阅读

相关 js 滚动条属性、设置滚动条滚动速度

返回不带px的数值,没用负数,最小为0 .scrollTop 竖直滚动条到顶部的距离,即浏览器视口外的高度 .scrollLeft 水平

冷不防/ 2021年07月24日 20:07/ 0 赞/ 1926 阅读

相关 Bootstrap列表添加滚动条

有时候列表中数据过多，导致超出页面，影响视觉感受。这时我们需要添加一个滚动条。初始状态如图： ![在这里插入图片描述][20190104152524451.png]

淩亂°似流年/ 2021年06月26日 16:06/ 0 赞/ 589 阅读

相关 jqgrid 添加水平滚动条

<div style="overflow-x:auto"><table id="treegrid2"></table></div> 通过设置： shrinkToFit:fa

小灰灰/ 2021年05月12日 11:50/ 0 赞/ 570 阅读